摘要:
错误一来源:Dim objcn As New Connection Dim objrs As New Recordset Dim strsql As String objcn.ConnectionString = "provider=microsoft.jet.oledb.4.0;" & "data source=" & App.Path & "\1.mdb" objcn.Open strsql = "select 密码,身份 from 用户信息表 where 账号='" & 阅读全文
摘要:
今天做数据库的时候又想当然了一把!结果一道题花了一个半小时才解决。前提是这样的,我在查数据库中的某列时,把查询列跟已知列搞混了,我觉得不管我输入那个列,只要数据库中存在,这个objrs.eof 就不会是true,结果是不可以想当然!objRs.EOF 的理解:判断结果集是否为空。程序会根据你给出的已知列来判断,而不是要查询的列。例如: 查询语句为:strSQL = "SELECT 口令,身份 FROM 系统用户 WHERE 用户名='" & UserName & "'"我在账户框中输入一个账户,如果数据库中 存在这个账户则 阅读全文