1。在本机SQL SERVER2000中设的DTS如何搬到其他机器上用?.
2。MDB链接MS-SQL的表时有提示设主键,但用代码重新定向并RefreshLink后,键值丢失,导致表无法更新,如何解决。
Dim db As Database
Dim tbl As TableDef
Set db = CurrentDb
For Each tbl In db.TableDefs
If tbl.Attributes = 537001984 Then
tbl.Connect = "DSN=gdts;UID=saWD=sa;APP=;WSID=;DATABASE=tssh"
tbl.RefreshLink
End If
Next