请问如何实现以下的一个登录界面?

zhujiajia2000 2003-05-19 10:56:09
请问如何实现以下的一个登录界面?
功能如下:
根据用户输入的用户名和密码进行判断,如果同数据库内的useid和password相同,则进入操作界面。
...全文
7 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
victorwu 2003-05-20
可以用sql语句来进行判断
先用select查找出该用户 再用语句来判断 pw
回复
netwar 2003-05-20
private sub cmd_login()
dim username as string
dim userpass as string
dim cn,fs,path
username=trim(text1.text)
userpass=trim(text2.text)
set cn=createobject("adodb.connection")
cn.open "provider=microsoft.jet.oledb.4.0;data source=" & app.path & "\system.mdb"
set fs=createobject("adodb.recordset")
sql="select * from member where username='" & name & "' and userpass='" & userpass & "'"
fs.open sql,cn,1,1
if fs.eof then
msgbox "对不起,登录错误",vbokonly+vbinformation,"系统消息"
else
......
end if
回复
bhhxd 2003-05-19
你用向导生成一个程序,参考一下
回复
相关推荐
发帖
VB基础类
创建于2007-09-28

7489

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2003-05-19 10:56
社区公告
暂无公告