"SELECT sno,sco FROM sco WHERE sno='" & text1.text & "'"
因为现在不弄VB6了,所以具体怎么连接的代码我忘了,大概就是如果得到的结果RecordSet是空的,即Bof And Eof,则用户名错误,否则如果规定了用户名不可重复,就有且仅有1条记录,再比较其中的sco与Text2.Text是否相等,是则正确通过,否则密码错误。
查询用select。
set rs="select * from sc where sno='"&text1.text&"' and sco='"&text2.text&"'"
if rs.eof and rs.bof then'查询不到数据
'用户和密码不匹配
else
'成功,自己写其他代码
end if