如何解决通过 ADO 建 VFP 表时路径问题

youyiwuyi 2004-05-05 04:33:43
我发现,如果本窗体或其他窗体有通用对话框时,通过ADO建VFP表时路径会改到通用对话框的路径,如何解决?例如以下代码就可能因此而出错:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset

cn.open "PROVIDER=MSDASQL;DRIVER={Microsoft Visual Foxpro Driver};SourceDB=" & App.Path + "\;SourceType=dbf"

'改变路径(如C:\)选择一个文件
CommonDialog1.ShouOpen

'新建的表路径与选择的文件同,而不在 App.Path
cn.Execute "create table test.dbf(word char(10))"

'会提示找不到表,把 test.dbf copy 到 App.Path 能正确执行
rs.open "select * from test.def",cn

...全文
88 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
youyiwuyi 2004-05-07
  • 打赏
  • 举报
回复
我已经解决了:create table 的时候可以加上路径的:cn.Execute "create table " & app.path & "\test.dbf(word char(10))"
youyiwuyi 2004-05-05
  • 打赏
  • 举报
回复
试了,在程序里赋值不管用!急……
yinweihong 2004-05-05
  • 打赏
  • 举报
回复
给CommonDialog一个初始路径试试
commondialog1.initdir="..."

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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