返回列表 回复 发帖

通用商品进销存系统(用户管理)

Rs.Open "Select * form [user]", sqlConnection, _
            adOpenDynamic  '打开记录集

实时错误'-2147467259(80004005)':
找不到可安装的ISAM

按了运行,就出现这句话.然后上面这句程序就变成黄色.是什么意思?该怎么改啊???急用急用!
!!!!
你大概连数据库都没有吧。。。还在不?
程序下有个jxc.mdb文件,你应该也从这个网站上下载了吧,很显然你那是没连上数据库啊
回复 1# 米爷


    最好检查一下数据库连接的代码。
回复 2# 小胖子选手登场


    怎样连接啊
最好贴一下你的数据库连接代码。
在网上购买本书的读者,请给本书发一个好评。谢谢大家。
回复 6# fwbook


    Private Sub Form_Load()
  Set Rs = New ADODB.Recordset    '建立记录集
  Rs.LockType = adLockOptimistic  '记录集锁定方式
  sqlConnection = "provider=microsoft.jet.oledb.4.0;_data source=" & App.Path & "\jxc.mdb"
  Rs.Open "Select * form [user]", sqlConnection, _
            adOpenDynamic  '打开记录集
     Call disprecord
End Sub



这样的有错吗?
回复 5# 米爷

给我看下你错误代码的上一行代码
回复 8# 小胖子选手登场


    Private Sub Form_Load()
  Set Rs = New ADODB.Recordset    '建立记录集
  Rs.LockType = adLockOptimistic  '记录集锁定方式
  sqlConnection = "provider=microsoft.jet.oledb.4.0;_data source=" & App.Path & "\jxc.mdb"
  Rs.Open "Select * form [user]", sqlConnection, _
            adOpenDynamic  '打开记录集
     Call disprecord
End Su


这样的!
等下哈,我装个VB试试
在网上购买本书的读者,请给本书发一个好评。谢谢大家。
回复 10# 小胖子选手登场


    好的'谢谢你!!1
本帖最后由 米爷 于 2014-3-4 11:16 编辑

加你Q行吗?下课就不能用电脑问你了..加你q方便点.好吗?
回复 10# 小胖子选手登场


    加你Q行吗?下课就不能用电脑问你了..加你q方便点.好吗?
本帖最后由 小胖子选手登场 于 2014-3-4 12:27 编辑

回复 13# 米爷


    尽量加这个群哟~361515365零起点起飞学VB群~我不是随时都有时间的,总之这个问题先帮你解决
我安装、复制代码文件、直接运行没出现问题啊。。。q上说
在网上购买本书的读者,请给本书发一个好评。谢谢大家。
返回列表