I'm moving a VB6 app that has been used with SQL 2000 to SQL 2008. It connect, is functional, but very slow. Things that would take less than a second take a minute. Reading various posts it looks like a different connection string (driver) would help but I havent been able to get anything else to work. Appreciate the help, thanks.

SQL 2000:

Private Sub Form_Load()
IniFileName = App.Path & "\" & "SqlServer.ini"
Dim MyServer As String
Dim MyValue As String * 20
MyServer = GetPrivateProfileString("Database", "Server", _
"No INI File Located", MyValue, _
Len(MyValue), IniFileName)


Set m_con = New ADODB.Connection
Call m_con.Open("DRIVER={SQL Server};SERVER=" & _
MyValue & ";UID=CustServ;PWD=xxxxxxxx")