如何用一条语句将SQL里的表按要求引入ACCESS里
问题如上,请给出比较详细的过程包话DIM语句,还有是否要引用什么.具体是SQL里有数据只要一部分,而且要分类汇总,然后写入ACCESS里,能否实现?如何实现?如果不能用一条语句,用循环怎么做,谢谢
[解决办法]
请详细说明,不然就是天才也无法回答你呀
[解决办法]
通常情况下就是分别连接SQL和Access,打开SQL中要导出表的记录集,然后循环插入到Access表中,比如:
Dim cn_sql As Nwe ADODB.Connection 'SQL数据库连接
Dim cn_Access As Nwe ADODB.Connection 'Access数据库连接
dim rs as New ADODB.Recordset
'连接SQL,打开表记录集
cn_sql.open "连接SQL字符串 "
rs.CursorLocation = adUseClient
rs.Open "select * from tb ",cn_sql, adOpenKeyset, adLockOptimistic
'将数据插入Access表中
while not rs.eof
cn_Access.execute "insert into tb(f1,f2,f3) "& _
"values( ' "& rs!f1 & " ', ' "& rs!f2 & " ', "& rs!f3 & ") " 'int类型字段不用 ' '号
rs.movenext
wend
set rs=nothing
set cn_sql=nothing
set cn_access=nothing
根据需要不同,你还可以用其它办法,比如你可以通过ODBC数据源,在Access中直接链接SQL数据库中的相关表,这样连接access就可以直接使用SQL相关表的数据了,要导出数据到Access表更快捷简单了
[解决办法]
楼主的说明不够详细啊
[解决办法]
根据需要,并不一定要用二个连接,可以用T-SQL的openrowset函数,具体你看一下SQL数据库的T-SQL帮助