<% '//查询方法 '//----------------------------(1)------------------------------- Set RsWorkUserInfo = Server.CreateObject("ADODB.RecordSet") StrSql = "Select UsersId, LoginName, UserName, Password" StrSql = StrSql & " From Users" StrSql = StrSql & " Where UsersId=" & SqlStr(tUserID) If RsWorkUserInfo.State = 1 Then RsWorkUserInfo.Close End If RsWorkUs...
[ 查看全文 ]