ADO 连接ACCESS怎么写？

TigerHu 2002-03-06 04:09:15

Public adoCnn As New ADODB.Connection

adoCnn.open " ?????"

...全文

76 10 打赏收藏转发到动态举报

写回复

用AI写文章

10 条回复

切换为时间正序

请发表友善的回复…

发表回复

Cus 2002-03-06

打赏
举报

dim cn as new adodb.connection
dim ssql as string
ssql="Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + App.Path + "\clgl.mdb" '连接ACCESS 2000
ssql="Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + App.Path + "\clgl.mdb " '连接ACCESS 97
CN.OPEN

hhfh 2002-03-06

打赏
举报

Dim cnnO As New ADODB.Connection
Dim rstO As New ADODB.Recordset
StringO = "provider=microsoft.jet.oledb.4.0;data source=d:\pat.mdb"
cnnO.Open StringO
rstO.CursorType = adOpenDynamic
rstO.LockType = adLockOptimistic
SQLo = "select * from saftytj"
rstO.Open SQLo, cnnO, , , adCmdText

Fanks 2002-03-06

打赏
举报

如何不行？

TigerHu 2002-03-06

打赏
举报

这样写了，还是不行

cdwps 2002-03-06

打赏
举报

con.Open "Provider=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=RESTART.MDB;"
con.Execute mysql

Fanks 2002-03-06

打赏
举报

adoCnn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\AAA.mdb"

ferrytang 2002-03-06

打赏
举报

用 adodc生成阿

westwin 2002-03-06

打赏
举报

Dim StrCon As String
StrCon = " Provider = Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db.mdb" & ";Persist Security Info=False"
conn.Open StrCon