VB制作网站登陆器

来源:百度知道 编辑:UC知道 时间:2024/05/13 03:47:12
刚在网站上收集了些资料 我想自己为自己的网站拿VB做个登录器
但不知道这代码是什么意思 希望大家能帮忙下 解释下
Private Sub Command1_Click()
If Text1.Text = "" Then MsgBox "用户名不能为空": Exit Sub
If Text2.Text = "" Then MsgBox "密码不能为空": Exit Sub
Dim strFormData As String
strFormData = "uid=" + Text1.Text + "&pwd=" + Text2.Text
Shell "cmd /c start Iexplore.exe www.baidu.com",vbHide
End Sub

第一行代码的意思是你的帐户名不能为空,否则不能链接到网址
第二行代码的意思是你的密码不能为空,否则不能链接到网址
第三行代码的意思是定义一个字符串,
第四行代码的意思是把帐户名和密码转换成数据库查询语句
第五行代码的意思是如果帐户名和密码都正确,就链接网址