尸横遍野,血流满地……
adodb原来不能和msflex绑定……天哪。。
换成data就可以。。我晕了。。怎么办。。
datagrid又不了解。。
Set Con = New ADODB.Connection
strcon = "driver=mysql odbc 3.51 driver;" & _
"server=" & text3.Text & ";" & _
"database=dtserver;" & _
"port=3306;" & _
"uid=root;" & _
"pwd=waj"
Con.Open strcon
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
strrs = "select * from tab_user where user_user='" & text1.Text & "'"
rs.Open strrs, Con, 3, 2
If rs.RecordCount = 0 Then
MsgBox "用户名不存在!", , "请重试!"
Else
If rs("user_pwd") = text2.Text Then
'成功登陆
'加事件代码
g_ip = text2.Text
Else
MsgBox "密码错误!", , "错误"
End If
End If
'Set rs = Nothing
'Set Con = Nothing
set msflexgrid1.DataSource= rs
换成datagrid就没问题……有没方法解决 ??
用datagrid的话,一次都没用过……只能用data的话 谁能帮我用把下面的msflex换成data...