D
Don
Hello, I have an Access 97 application that links to mulitple SQL Server
2000 databases. I migrated one of the database to a new box running Windows
2003. All my users are fine except one. When this user tries to link to
the database on the new server if keeps prompting him with a connection
prompt everytime the application uses one of the linked tables.
When the user links to a different database, I drop the link tables and
relink the tables. I notificied for this user in column connect of the
MSysObjects table the TrusedConnect=true section is missing and instead
their is a section for QueryLogFile=yes. Any clue what's going on? I've
put some of the code I used to relink below.
Thanks for any Help.
Don
SQLCONNECTSTRING = "ODBC" & _
";DRIVER={SQL SERVER}" & _
";SERVER=" & SQLConnectSERVER & _
";AppName=" & gsAppName & _
";DATABASE=" & SQLConnectDatabase & _
";TRUSTED_CONNECTION=Yes;"
Dim MyDB As Database
Dim td As TableDef
Set td = MyDB.CreateTableDef(rs!TableName)
td.Connect = SQLCONNECTSTRING
td.SourceTableName = rs!TableName
MyDB.TableDefs.Append td
2000 databases. I migrated one of the database to a new box running Windows
2003. All my users are fine except one. When this user tries to link to
the database on the new server if keeps prompting him with a connection
prompt everytime the application uses one of the linked tables.
When the user links to a different database, I drop the link tables and
relink the tables. I notificied for this user in column connect of the
MSysObjects table the TrusedConnect=true section is missing and instead
their is a section for QueryLogFile=yes. Any clue what's going on? I've
put some of the code I used to relink below.
Thanks for any Help.
Don
SQLCONNECTSTRING = "ODBC" & _
";DRIVER={SQL SERVER}" & _
";SERVER=" & SQLConnectSERVER & _
";AppName=" & gsAppName & _
";DATABASE=" & SQLConnectDatabase & _
";TRUSTED_CONNECTION=Yes;"
Dim MyDB As Database
Dim td As TableDef
Set td = MyDB.CreateTableDef(rs!TableName)
td.Connect = SQLCONNECTSTRING
td.SourceTableName = rs!TableName
MyDB.TableDefs.Append td