关于vb中ADo和SQL数据库的连接问题?
请问如何用代码直接生成ado和sql数据库的连接?
比如说我想通过ado和sql服务器是97的本地数据库"密码库"相连,
同时建立recordset与"密码库"中的"密码表"相连接,然后通过语句添加纪录!!
请问如何用代码实现!!
急急急!!!
问题点数：20、回复次数：3Top
1 楼allfourone（黄色班尼璐）回复于 2001-04-04 10:01:00 得分 0
dim Cn as new adodb.connection
cn.open "provider=microsoft.jet.oledb.4.0,data source = c:\密码库.mdb"
dim Rs1 as new recordset
set Rs1 = new adodb.recordset
rs1.open "select * from 密码表",Cn,adopenstatic,adlockoptimistic
.
.
然后再进行Insert操作Top
2 楼westwin（浮躁的很）回复于 2001-04-04 10:12:00 得分 0
朋友.我是连接sql数据库,不是Access数据库!!
我用的语句是
Dim cn As New ADODB.Connection
cn.Open "provider=sqloledb.1;data source=97;initial catalog=密码库;" _
& "user id=sa;password=;"
Dim rs As New ADODB.Recordset
rs.Source = "密码表"
rs.Open , cn
但是
rs.addnew
就会出错!!
多谢帮助!Top
3 楼valiant（海到无边心是岸）回复于 2001-04-04 10:28:00 得分 20
Dim cn As New ADODB.Connection
Dim strsql as String
cn.Open "provider=sqloledb.1;data source=97;initial catalog=密码库;" _
& "user id=sa;password=;"
strsql =" Insert into 表 values 1,2,3,4,...."
cn.execute strsqlTop
