加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

VB判断用户名和密码是否正确

(2019-03-03 09:57:47)
标签:

vb

用户名和密码登陆框

分类: 程序设计_VB
用户名和密码登陆通用代码

dim rs1 as new recordset
dim sql as string
sql="select * from zhanghu where 用户名='" & Text1.Text & "' and 密码='" & Text2.Text & "'"
rs1.open sql,cnn,3,3
if rs1.state=0 then 
  msgbox "记录集打开失败"
  exit sub
else
  if not rs1.eof then
    msgbox "登录成功"
  else
    msgbox "登录失败"
  endif
  rs1.close
endif

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有