如何

[vivaldi16]

1. 首先建立两个DataConnection,一个和SQl Server database 连接，一个和 Access数据库连接
Set Conn1=Server.CreateObject("ADODB.connection")
Conn1.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\SAMPLE.MDB;"

Set Conn2=Server.CreateObject("ADODB.connection")
Conn2.Open "Provider=SQLOLEDB.1;Password= pwd;Persist Security Info=True;User ID=user ;Initial Catalog= dbName;Data Source=serverName"

2. 得到Sql_Server 中的数据集:
Set rs_Sql=Server.CreateObject("ADODB.Recordset")
Set cmdTemp=Server.CreateObject("ADODB.Command")
Set cmdTemp.ActiveConnection=conn2
sql="Select * from sqlserver table"
cmdTemp.CommandText=sql
cmdTemp.CommandType=1
rs_sql.Open cmdTemp,,1,1
这样得到sql Server 中的数据集 rs_sql
3. 用哪些语句写入 Access 数据库中... 等待

[lbd8848]

sql="select * into accesstab from sqlservertable"

[vivaldi16]

sql="select * into accesstab from sqlservertable"
用哪个连接来执行？

[lbd8848]

rs_sql.Open cmdTemp,,1,1

[vivaldi16]

rs_sql.Open cmdTemp,,1,1，执行是相当于用SQL Server 的 conn2.Execute "select * into accesstab from sqlServertab",accesstab 该具体怎么写，因为accesstab数据Conn1连接，Conn2 如何知道conn1?

[Coolyu0916]

如果是倒数据可以直接调用BCP命令