对access数据库怎么做逐条转入sql

将 Access 数据库中的数据逐条转移到 SQL 数据库，可以采用以下步骤：

1. 连接 Access 数据库：使用 ADO 或 DAO 对象连接 Access 数据库，并打开要读取数据的表或查询。

2. 连接 SQL Server 数据库：使用 ADO 对象连接 SQL Server 数据库，并打开要写入数据的表。

3. 逐条读取数据：使用 ADO 或 DAO 对象逐条读取 Access 数据库中的数据。

4. 将数据写入 SQL Server 数据库：将读取的数据逐条写入 SQL Server 数据库中。

5. 关闭数据库连接：关闭 Access 和 SQL Server 数据库的连接。

下面是一个示例代码，用于将 Access 数据库中的数据逐条转移到 SQL Server 数据库中：

Dim adoAccess As New ADODB.Connection
Dim adoSQL As New ADODB.Connection
Dim adoRS As New ADODB.Recordset
Dim strSQL As String

'连接 Access 数据库
adoAccess.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\access.accdb;"
adoAccess.Open

'连接 SQL Server 数据库
adoSQL.ConnectionString = "Provider=SQLOLEDB;Data Source=server;Initial Catalog=database;User ID=username;Password=password;"
adoSQL.Open

'打开要读取的表或查询
adoRS.Open "SELECT * FROM table", adoAccess, adOpenStatic, adLockOptimistic

'逐条读取数据
Do While Not adoRS.EOF
    '将数据写入 SQL Server 数据库
    strSQL = "INSERT INTO table (field1, field2, ...) VALUES (" & adoRS("field1") & ", '" & adoRS("field2") & "', ...)"
    adoSQL.Execute strSQL
    
    '移动到下一条记录
    adoRS.MoveNext
Loop

'关闭连接
adoRS.Close
adoAccess.Close
adoSQL.Close

需要注意的是，逐条转移数据的方法比较耗时，不适合大量数据的转移。如果数据量较大，可以考虑使用批量操作或其他高效的数据转移方法。