首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

有哪位高手知道怎样连接.DB数据库

2012-04-20 
有谁知道怎样连接.DB数据库我公司有喷标程序,内有.DB数据库,请问怎么打开,还有我想用此数据库连接后导出数

有谁知道怎样连接.DB数据库
我公司有喷标程序,内有.DB数据库,请问怎么打开,还有我想用此数据库连接后导出数据,请问怎样连接
还有我想了解一下.DB数据库是什么类的数据库

[解决办法]
Public Const Sdatah = " Provider=SQLOLEDB.1;Persist Security Info=False;User ID=baodao;Initial Catalog=baodao;Data Source=192.9.201.202;password=passpass"Public DAcon As Connection 'Public DHR(100) As Recordset 'recordsetPublic NUM As Integer 'DIM DATA'NUMBER Public Sub datahs() 'On Error GoTo overSet DAcon = New ConnectionDAcon.Open SdatahDAcon.CursorLocation = adUseClientExit Subover:MsgBox "严重错误:资料库路径不正确", vbOKOnly, "错误"End End Sub Public Sub Dar(Str As String)NUM = NUM + 1 If NUM > 10 Then '上之三数组溢出处理NUM = 0End If Set DHR(NUM) = New RecordsetDHR(NUM).Open Str, DAcon, , adLockPessimisticEnd SubPublic Sub dataclose(NUM1 As Integer) 'close all DAropeneOn Error GoTo err35DHR(NUM1).CloseSet DHR(NUM1) = NothingNUM = NUM - 1err35:Exit SubEnd Sub 然后就可以很方便的调用了call dar(ssql) '这样就可以了

热点排行
Bad Request.