标题: （已解决）想做一个C/S结构的程序，但用ADO连接数据库时，老提示出错，代码如下 [打印本页] 作者: dreamice01 时间: 2008-2-3 11:31 标题: （已解决）想做一个C/S结构的程序，但用ADO连接数据库时，老提示出错，代码如下 以下有几个错误：1、连接字符串属性无效
2、连接无法用于执行此操作，在此上下文中他可能已关闭或无效
3、数据类型不符
Private Sub Command6_Click()
Dim cn As ADODB.Connection
Dim rx As ADODB.Recordset
Dim user_online As Integer
Dim user_id As Integer
Dim user_name As String
user_online = 0
Set cn = New ADODB.Connection
cn.CursorLocation = adUseClient
cn.Open "provider=sqloledb;password=120979120979;" & _
"user_id=sa;initial catalog=accesstata;data source=wangqiang"
Set rx = New ADODB.Recordset
'On Error GoTo Err_Command6_Click
If IsNull(Text2) Or IsNull(Text4) Then
MsgBox "没有输入用户名或密码，请重新输入", vbInformation, "系统提示"
Exit Sub
End If
rx.Open "select * from user_tbl where user_name=' Text2 ' and user_password=' Text4 '", cn, adOpenStatic, adLockBatchOptimistic, adCmdText
[ 本帖最后由 dreamice01 于 2008-2-27 09:40 编辑 ]作者: 小铁匠 时间: 2008-2-3 12:21
看不懂你
Dim user_id As Integer
Dim user_name As String这为什么要声名变量，从 rx.Open "select * from user_tbl where user_name=' Text2 ' and user_password=' Text4 里看出好象是user_tbl 表中有这字段，这些代码中好象好多错误唉，你最好说明想要达到什么目地，最好上传文档修改