vb6 ADODB connection string to sql server 2008
        Posted  
        
            by phill
        on Stack Overflow
        
        See other posts from Stack Overflow
        
            or by phill
        
        
        
        Published on 2010-06-02T23:14:36Z
        Indexed on 
            2010/06/02
            23:34 UTC
        
        
        Read the original article
        Hit count: 766
        
I recently migrated a database from sql server 2005 to 2008 on windows server 2008. Clients connect fine from their XP machines and so does the SQL Management Studio 2008. I have also tested a remote connection using LINQPad which worked fine.
However on my VB6 app, the connection string seems to give me problems. Any ideas what I'm doing wrong?
    Dim strUserName As String
     Dim strPassword As String
     Dim sProc As String
     sProc = "Class_clsAdoFnx_Initialize"
        Me.DatabaseName = "db_app"
 'Connect to SQL Server
    strUserName = "admin"
    strPassword = "mudslinger"
    Set cSQLConn = New ADODB.Connection
    '**Original connection String
    'cSQLConn.CommandTimeout = 0
    'cSQLConn.ConnectionString = " PROVIDER=SQLOLEDB" & _
    '    ";SERVER=NET-BRAIN" & _
    '    ";UID=" & strUserName & _
    '    ";PWD=" & strPassword & _
    '    ";DATABASE=" & Me.DatabaseName
    '***First attempt, no dice
    'cSQLConn.ConnectionString = "Provider=sqloledb;" & _
    '       "Data Source=NET-BRAIN;" & _
    '       "Initial Catalog=DB_APP;" & _
    '       "User Id=admin;" & _
    '       "Password=mudslinger"
    'cSQLConn.Open
    '***3rd attempt, no dice 
    cSQLConn.Open "Provider=sqloledb;" & _
           "Data Source=NET-BRAIN;" & _
           "Initial Catalog=db_app;" & _
           "User Id=admin;" & _
           "Password=mudslinger", "admin", "mudslinger"
thanks in advance.
© Stack Overflow or respective owner