VB登录框与网页登陆框结合!赐教!
现在软件做好了··为了有会员制度的···就是进行验证啦·····假如:VB:text1和text2分别用户名和密码、和登录按钮~在网页中(在网站中的数据库)··数据库中表...
现在软件做好了··
为了有会员制度的···
就是进行验证啦·····
假如:VB: text1 和 text2 分别用户名和密码、和登录按钮~
在网页中(在网站中的数据库)··
数据库中 表user 中 user 和 pass
如何做到
user(用户) 和 pass(密码)在VB框中输入和网页数据中存在的··才能登录vb软件呢··
如果错误或不存在用户,显示错误
不知道能不能实现得到哦·····
需要什么控件不??、 展开
为了有会员制度的···
就是进行验证啦·····
假如:VB: text1 和 text2 分别用户名和密码、和登录按钮~
在网页中(在网站中的数据库)··
数据库中 表user 中 user 和 pass
如何做到
user(用户) 和 pass(密码)在VB框中输入和网页数据中存在的··才能登录vb软件呢··
如果错误或不存在用户,显示错误
不知道能不能实现得到哦·····
需要什么控件不??、 展开
2个回答
展开全部
利用两个循环函数,进行匹配比较
追问
请问如何比较呢???
数据库用户名和密码·很多的··不是单一的··
有代码么??
追答
首先,你的数据库连接、访问没有问题,然后,执行下面代码:
dim i as integer,j as integer,rs as adodb.recordset
dim user as string,psw as string
dim ok1 as boolen,ok2 as boolen
i=1
j=1
ok1=false
ok2=false
user=trim(text1.text)
psw=trim(text2.text)
rs.movefirst
do until rs.eof
if user=rs.fields("user") then
ok1= true
if psw=rs.fields("psw") then
ok2=true
'打开进入后的界面
exit do
else
msgbox"密码错误"
end if
else
if rs.eof then
msgbox"用户名错误"
exit do
end if
rs.movenext
end if
loop
展开全部
这个要用到网页设计中的标签getelementsbyid或getelementsbyname
当然这两个标签的要根据你的网页代码中id 或name来选择
如果你要使用登录框(input 标签)属性中的ID 那么 你要选择getelementbyid 如果要使用name属性则要选择getelementsbyname
要注意的是在你的VB程序中要有一个WEBbrowser 控件要把这个控件与你要访问的网页相连 才能进行登录操作
当然这两个标签的要根据你的网页代码中id 或name来选择
如果你要使用登录框(input 标签)属性中的ID 那么 你要选择getelementbyid 如果要使用name属性则要选择getelementsbyname
要注意的是在你的VB程序中要有一个WEBbrowser 控件要把这个控件与你要访问的网页相连 才能进行登录操作
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询