已有23人关注
请问我这个用vb怎么始终实不了。
发表在VB答疑区 2011-03-05
是否精华
版块置顶:
Dim conn As ADODB.Connection
  Dim rs As ADODB.Recordset
  Dim strconn As String
  Dim i As Integer
  Set conn = New ADODB.Connection
  Set rs = New ADODB.Recordset
  strconn = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\zhu;Exclusive=No"

  conn.Open strconn
  conn.CommandTimeout = 3000
  
  rs.Open "select * into gg from cs", conn, adOpenDynamic, adLockOptimistic ①
以上是我的代码,在c:\zhu存放一个cs的dbf文件,连接查询等操作都可以,但是想通过查询语句实现生成一个新表gg,同样还放c:\zhu下,为什么运行总不成功,总提示,实时错误'-2147217887(80040e21)'odbc驱动程序不支持所需属性?
①换成这样的语句 rs.open "select * into [FoxPro2.6;database=c:\zhu].gg from cs",conn, adOpenDynamic, adLockOptimistic 

   rs.open "select * into [FoxPro2.5;database=c:\zhu].gg from cs",conn, adOpenDynamic, adLockOptimistic 

rs.open "select * into [dBaseIII;database=c:\zhu].gg from cs",conn, adOpenDynamic, adLockOptimistic 
均提示
实时错误'-2147217887(80040e21)'odbc驱动程序不支持所需属性?
请问怎么解决这个问题啊?谢谢!




分享到:
精彩评论 1
vb_music
学分:0 LV1
2011-03-08
沙发
你好:
    请问这个出错信息具体的指向哪一行呢,可能原因:出现这种情况请从以下方面检查:一是数据库的权限是否为只读;二是数据库的语法格式是否正确;如果确认数据库的权限正确,也可以通过升级到最新的版本来来完善这个问题。 或者据库中的字段值为空不让修改,这个解决办法可以使用IsNull函数等解决。
首页上一页 1 下一页尾页 1 条记录 1/1页
手机同步功能介绍
友情提示:以下图书配套资源能够实现手机同步功能
明日微信公众号
明日之星 明日之星编程特训营
客服热线(每日9:00-17:00)
400 675 1066
mingrisoft@mingrisoft.com
吉林省明日科技有限公司Copyright ©2007-2022,mingrisoft.com, All Rights Reserved长春市北湖科技开发区盛北大街3333号长春北湖科技园项目一期A10号楼四、五层
吉ICP备10002740号-2吉公网安备22010202000132经营性网站备案信息 营业执照