Office中国论坛/Access中国论坛

标题: 求助 急! 谢谢 [打印本页]

作者: shilixi    时间: 2009-6-19 18:49
标题: 求助 急! 谢谢
Public Function login() As Boolean
Dim rs As New ADODB.Recordset
Dim strsql As String
strsql = "select * from 密码库 where '" & Me.cbouser & "'"
rs.Open strsql, CurrentProject.connextion
adOpenStatic , adLockReadOnly
If rs.RecordCount > 0 Then
if rs! 密码=me. txtpwd then
login = True
End If
End If
rs.Close
Set rs = Nothing
End Function
这段代码中的if rs! 密码=me. txtpwd then提示错误,在哪?
作者: shilixi    时间: 2009-6-19 19:10
adOpenStatic 编译错误  属性的使用无效
if rs! 密码=me. txtpwd then也出错  谢谢
作者: erperp    时间: 2009-9-29 17:26
不太明白
作者: manzeyi    时间: 2009-10-24 20:41
不太明白
作者: liyong0080    时间: 2009-10-27 11:19
我也不怎么明白




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3