将数据从 Access 复制到 SQL

Question

我正在将现有的 Access 数据库迁移到具有 Web 前端的 SQL 数据库。我已使用 SQL Server 迁移工具成功将数据库复制到 SQL，并正在开发该应用程序。由于我不会在这里讨论的原因，我们不能只将 Access 前端链接到 SQL DB 并使用 SQL DB 作为单个数据源，因此 Access DB 仍在使用中并且数据正在更新。

我试图找到一种简单的方法来使用 Access DB 中的新数据更新 SQL 数据库中的数据。表结构等是相同的，所以我需要做的就是复制数据，是否有脚本或简单的方法来执行此操作？我真的不想每次需要更新时都运行迁移向导。

Answer 1

我还建议使用 SQL Server 的链接表，但听上去这是你无法控制的。我希望这只是暂时的，以便用户可以在开发过程中继续使用 Access DB，而不是因为某些经理认为这种手动集成的系统是一个好主意“继续发展” 。

有一个更好的迁移到 SQL Server 的工具，称为 Sql Server 迁移Assistant (SSMA) 比 Access 中内置的“升迁向导”要好得多。您可以编写脚本以使任务可重复。

另一种方法是在 Access DB 所在的任何位置设置 SQL Server Express 版本并链接到该数据库，将其用作临时数据库。您可以将 SSEE 版本设置为复制订阅者，并同步您可以随时在该数据库和您的开发/生产数据库之间进行更改。对于用户来说，这将是透明的，您可以告诉管理层 Access DB 与开发/生产数据库完全分开。或者，如果您不愿意学习复制，则每次都复制数据库，但我认为复制可以使这一切变得更加简单。

Answer 2

您可以通过 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

Answer 3

可以将 SQL Server 表链接到 Access，Access 表单可以正常输入数据，但实际上会进入 SQL Server。