VB怎样连接带有密码的[销项发票销货清单.DB]的数据库,(DBC2000的数据库)

时间:2021-02-01 17:27:03
销项发票销货清单.DB
销项发票销货清单.PX
销项发票销货清单.VAL

数据库目录下有这几个文件,用DBC2000和密码1234可以打开销项发票销货清单.DB
现在想用VB做一个小统计软件,不知道连接怎么写?
另是否支持adodb.recordset的一些操作?

6 个解决方案

#1


Dim Con   As New ADODB.Connection    Con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\销项发票销货清单.DB;Jet OLEDB:Database Password=1234;"
Con.Open

#2


楼上的,DB的数据库啊,你这样就会造成不可识别的数据格式

#3


connstr = "DRIVER=Microsoft Paradox Driver (*.db );Pwd=1FFKEC123Q4C26G;ParadoxNetPath=" & Trim(Text1.Text) & ";FIL=Paradox 5.X;DriverId=538;DefaultDir=" & Trim(Text1.Text) & ";CollatingSequence=ASCII"
   conn.Open connstr

我搞定了,新问题出来了,win2003可以连接,98就报错:

外部数据库驱动程序(10498)中的意外错误

怎么办???

#4


用Jet40连接,需要设置Extend Property 为Paradox 7.x,另外需要安装DBE

#5


继续求助,还是在win98下不能用,MDAC 7.1 也装了.DBE哪有下?

#6


DBE数据引擎也装了,还是不灵,怪事,除98以外都能运行.

#1


Dim Con   As New ADODB.Connection    Con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\销项发票销货清单.DB;Jet OLEDB:Database Password=1234;"
Con.Open

#2


楼上的,DB的数据库啊,你这样就会造成不可识别的数据格式

#3


connstr = "DRIVER=Microsoft Paradox Driver (*.db );Pwd=1FFKEC123Q4C26G;ParadoxNetPath=" & Trim(Text1.Text) & ";FIL=Paradox 5.X;DriverId=538;DefaultDir=" & Trim(Text1.Text) & ";CollatingSequence=ASCII"
   conn.Open connstr

我搞定了,新问题出来了,win2003可以连接,98就报错:

外部数据库驱动程序(10498)中的意外错误

怎么办???

#4


用Jet40连接,需要设置Extend Property 为Paradox 7.x,另外需要安装DBE

#5


继续求助,还是在win98下不能用,MDAC 7.1 也装了.DBE哪有下?

#6


DBE数据引擎也装了,还是不灵,怪事,除98以外都能运行.