做DBF导入MDB这样对吗??我是菜鸟!

ligis 2004-05-08 08:33:34
Dim conn As Connection
Set conn = New Connection
conn.Open "Provider=MSDASQL.1;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\实验.dbf


conn.Execute "select * into [c:\TEST.mdb].[test] from " 实验.DBF"
...全文
136 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
三楼の郎 2004-05-09
  • 打赏
  • 举报
回复
Dim conn As New ADODB.Connection
conn.Open "Provider=MSDASQL.1;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\"
conn.Execute ("select * into [......].test from 实验")

文件"实验.dbf"的表名是"实验",而不是"实验.dbf",所以在Select语句中应该使用"实验"而不是"实验.dbf"
然后[......]中的内容记不清了,自己去查一查吧!
ryuginka 2004-05-09
  • 打赏
  • 举报
回复
楼主还没有解决吗?
planetike 2004-05-09
  • 打赏
  • 举报
回复
用两个连接,一个边DBF,一个连MDB,一个记录集返回DBF中的所有数据,用一个循环一条一条加到MDB中去.

莫依MM可是个热心人哟!
broown 2004-05-09
  • 打赏
  • 举报
回复
就是 ryuginka(ryuginka) 兄说的方法比较保守,同时也比较安全的 !
ligis 2004-05-08
  • 打赏
  • 举报
回复
northwolves(野性的呼唤)

conn.Execute ("select * into test in TEST.mdb from 实验.DBF")这样不可以啊!
northwolves 2004-05-08
  • 打赏
  • 举报
回复
try:

Dim conn As New ADODB.Connection
conn.Open "Provider=MSDASQL.1;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\"
conn.Execute ("select * into test in TEST.mdb from 实验.DBF")
ryuginka 2004-05-08
  • 打赏
  • 举报
回复
dbf是FOXPRO,都是微软的,应该可以的.
你可以把DBF的结果取出来,然后写程序保存到MDB中啊
比如
rec = select * from dbf数据库
然后最这个结果集进行操作
do while not rec.eof
这里打开mdb
'用insert 操作啊.一条一条的写到数据库中
rec.movenext
loop
以上是我的思路,应该可以解决的吧
ligis 2004-05-08
  • 打赏
  • 举报
回复
没人理我了
ligis 2004-05-08
  • 打赏
  • 举报
回复
帮忙啊!!!!!!!!!
ligis 2004-05-08
  • 打赏
  • 举报
回复
还是要谢谢你
daisy8675 2004-05-08
  • 打赏
  • 举报
回复
偶要斷線了,不能找了,你自己搜索一下去。
daisy8675 2004-05-08
  • 打赏
  • 举报
回复
偶沒有測試過dbf,最保險還是循環加,我看看有沒有關於dbf的資料

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧