您可以通過VBA運行訪問查詢,以添加新記錄並更新SQL Server中的以前記錄。連接字符串是相同的用於連接SQL表,因爲我在這個粗略的例子表明,這樣你就可以測試連接到相關的表,以獲得合適的字符串:
Dim db As Database
Set db = CurrentDb
strConnect = db.TableDefs("dbo_test").Connect
strSQL = "UPDATE [" & strConnect & "].[test] As s " _
& "INNER JOIN TestAccess As a " _
& "ON s.ID=a.ID " _
& "SET s.Descr=a.Descr WHERE s.Descr<>a.Descr"
db.Execute strSQL, dbFailOnError
Debug.Print db.RecordsAffected
strSQL = "INSERT INTO [" & strConnect & "].[test] (ID, Descr) " _
& "SELECT a.ID, a.Descr FROM TestAccess As a " _
& "LEFT JOIN [" & strConnect & "].[test] s " _
& "ON s.ID=a.ID " _
& "WHERE s.ID Is Null"
db.Execute strSQL, dbFailOnError
Debug.Print db.RecordsAffected
是的,這是我原來的計劃,不幸的是這是不可能的(政治上不是技術上的)。 Access數據庫需要保持獨立於SQL之一 – 2009-11-23 11:19:05
它有可能將SQL Server中的數據傳輸安排爲定期發生,但實際上並不理想。 – 2009-11-23 11:42:33