Solved

Connecting to SQL 2005 database using Domain Account

Posted on 2010-09-16
4
304 Views
Last Modified: 2012-08-13
I am trying to connect to a database on SQL 2005 using the only thing that has perms to it right now -- a windows account.   It's a service account though, not the IUSR account on the web server.  Anyone have an example of a working ASP script to connect to a SQL 2005 database with a domain service account?

Thanks in advance,
TWB
0
Comment
Question by:TWB_Systems
  • 2
4 Comments
 
LVL 15

Expert Comment

by:AmmarR
ID: 33697324
for your particular site, change the IIS settings, and make it instead of anonymous access authentication method, change it to Integrated windows authentication.

or if you cant do that

you can login with your code as a different windows user and access sql.

check code below



public sub connecttosql()

        If impersonateValidUser('validuser', _

        'validdomain', 'validpassword') Then

            'Insert your code that runs under the security context of a specific user here.

            ' insert the code to connect to sql under this user

            undoImpersonation()

        Else

            'Your impersonation failed. Therefore, include a fail-safe mechanism here.

        End If

end sub





    Public Function impersonateValidUser(ByVal userName As String, _

    ByVal domain As String, ByVal password As String) As Boolean



        Dim tempWindowsIdentity As WindowsIdentity

        Dim token As IntPtr = IntPtr.Zero

        Dim tokenDuplicate As IntPtr = IntPtr.Zero

        impersonateValidUser = False



        If RevertToSelf() Then

            If LogonUserA(userName, domain, password, LOGON32_LOGON_INTERACTIVE, LOGON32_PROVIDER_DEFAULT, token) <> 0 Then

                If DuplicateToken(token, 2, tokenDuplicate) <> 0 Then

                    tempWindowsIdentity = New WindowsIdentity(tokenDuplicate)

                    impersonationContext = tempWindowsIdentity.Impersonate()

                    If Not impersonationContext Is Nothing Then

                        impersonateValidUser = True

                    End If

                End If

            End If

        End If

        If Not tokenDuplicate.Equals(IntPtr.Zero) Then

            CloseHandle(tokenDuplicate)

        End If

        If Not token.Equals(IntPtr.Zero) Then

            CloseHandle(token)

        End If

    End Function

Open in new window

0
 
LVL 22

Expert Comment

by:Om Prakash
ID: 33698763
Please check the following link which contains all the options for connecting to SQL server 2005
http://www.connectionstrings.com/sql-server-2005
0
 
LVL 22

Accepted Solution

by:
Om Prakash earned 500 total points
ID: 33698771
Example:

dim conn

strConn = "Driver={SQL Server};Server=Server_name;Database=database_name;Trusted_Connection=Yes;"

Set conn = Server.CreateObject("ADODB.Connection")

conn.ConnectionString= strConn

conn.Open

Open in new window

0
 

Author Closing Comment

by:TWB_Systems
ID: 33737170
Not the route I wanted to go, but the route I ended up taking.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

INTRODUCTION: While tying your database objects into builds and your enterprise source control system takes a third-party product (like Visual Studio Database Edition or Red-Gate's SQL Source Control), you can achieve some protection using a sing…
Data architecture is an important aspect in Software as a Service (SaaS) delivery model. This article is a study on the database of a single-tenant application that could be extended to support multiple tenants. The application is web-based develope…
This Micro Tutorial will give you a basic overview how to record your screen with Microsoft Expression Encoder. This program is still free and open for the public to download. This will be demonstrated using Microsoft Expression Encoder 4.
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.

895 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now