15问答网 > VB中这段代码是什么意思 Dim cnn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim sqlstring

VB中这段代码是什么意思 Dim cnn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim sqlstring

2024-12-01 20:50:05

推荐回答（4个）

回答1：

这一些语句是用来访问数据库的，如果要在VB中访问数据库，第一步是要确认在整个项目中有没有添加对ADO的引用，如果没有添加对ADO的引用，那么Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset 这两句定义会出错，第二 connectioncase 这个变量要提前赋值。

回答2：

cnn.ConnectionString = connectiondbcase

connectiondbcase没有定义，所以显示用户定义错误

回答3：

Sub test()
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sqlstring As String
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrator\桌面\test.mdb;Persist Security Info=False"
cnn.Open
sqlstring = "select * from sysadmin where sysadmin.管理员名 =" + "'" + logname + "'" + " And " + "sysadmin.密码 =" + "'" + logpwd + "'"
Set rs = cnn.Execute(sqlstring)
End Sub

回答4：

这是用来连接数据库并查询记录用的语句