Hallo liebe Gemeinde!
Ich verzweifle an folgendem Problem:
SQL Server 2000 wird durch SQL Server 2005 Express ersetzt.
Zugriff auf den SQL Server über VB 6.0 Programm -> ODBC -> SQL Native Client.
Lesen über Select: OK
Daten ändern in einem Data Grid: OK
Lesen und Schreiben über MS Access und gleicher ODBC Verbindung: OK
aber:
Dim sql As String
Dim Dr_Seek As ADODB.Recordset
sql = "SELECT * from " & TableName
Set Dr_Seek = New Recordset
Dr_Seek.Open sql, DataEnvMAT_Str, adOpenDynamic, adLockOptimistic
Dr_Seek.Delete
Set Dr_Seek = Nothing
... beim Delete über das Recordset kommt die verwirrende Fehlermeldung:
Could not find server 'xxx' in sysservers. Execute sp_addlinkedserver to add the server to sysservers.
Gleiches geschieht beim Update von mehreren Datensäten über ein Recordset.
Beim SQL Server 2000 trat das Problem nicht auf.
Kann mir jemand helfen??
- Vielen Dank -
Schandra
Ich verzweifle an folgendem Problem:
SQL Server 2000 wird durch SQL Server 2005 Express ersetzt.
Zugriff auf den SQL Server über VB 6.0 Programm -> ODBC -> SQL Native Client.
Lesen über Select: OK
Daten ändern in einem Data Grid: OK
Lesen und Schreiben über MS Access und gleicher ODBC Verbindung: OK
aber:
Dim sql As String
Dim Dr_Seek As ADODB.Recordset
sql = "SELECT * from " & TableName
Set Dr_Seek = New Recordset
Dr_Seek.Open sql, DataEnvMAT_Str, adOpenDynamic, adLockOptimistic
Dr_Seek.Delete
Set Dr_Seek = Nothing
... beim Delete über das Recordset kommt die verwirrende Fehlermeldung:
Could not find server 'xxx' in sysservers. Execute sp_addlinkedserver to add the server to sysservers.
Gleiches geschieht beim Update von mehreren Datensäten über ein Recordset.
Beim SQL Server 2000 trat das Problem nicht auf.
Kann mir jemand helfen??
- Vielen Dank -
Schandra