2007-10-11
sub cmdTijiao_onClick() if frmRes.txtNum.value="" or frmRes.txtPasswd.value="" or (Not IsNumeric(frmRes.txtNum.value)) then Alert"请在帐号和密码中输入相应的内容,帐号必须为数字!" else frmRes.submit end if end sub |
sub cmdTijiao_onClick() if Not Numeric(frmNew.txtNum.value) or frmNew.txtPasswd.value<>frmNew.txtConfirm.value then Alert"输入不正确,请重新输入!" else frmNew.submit end if end sub |
<html><head> <meta http-equiv="Content-Type" content="text/html;charset=gb2312"> <meta name="GENERATOR" content="Microsoft Fronpage 3.0"> <titile>注册判断</title></head> <body><% Num=Request.form("txtNum") "把前面窗口传送来的内容赋给Num和Passwd两个字符串。 Passwd=Request.form("txtPasswd") dbname="Driver={Microsoft Access Driver(*.mdb)};DBQ="&Server.MapPath("\")"&"\ResDb\Res.mdb;" "dbname是打开数据库要用的 set Cres=Server.CreateObject("ADODB.Connection") "以下是利用Connection对像和Recordset对象联结数据库并查找的代码。 set res=Server.CreateObject("ADODB.Recordset") Cres.open dbname res.ActiveConnection=Cres res.source="Select*from res where 帐号="&Num&" and 密码="&Passwd&";" res.open if res.BOF then "如果查找结果为空,那么就说明注册不正确,所以在页面中显示下面的文本/ %><p>注册不正确, 请返回注册页面重新注册!</p> <% else “否则就说明注册成功,可以进入浏览页面! %> <!--#Include virtual="/success.htm"--> "这里采用了Server Side Include的方法,把允许浏览的页面包含在这个文件里面! <% res.Close “ 关闭刚才打开的数据库。 end if %> </body></html> |
<html> <head> <meta http-equiv="Content-Type" content="text/html;charset=gb2312"> <meta name="GENERATOR" content="Microsoft frontpage 3.0"> <title>输入数据库</title> </head> <body> <!--#Include virtual="/adovbs.inc"> “这个被包含进来的文件adovbs.inc是定义数据库对象ADO常量的文件。 <% Num=Request.form("txtNum") “把前面主页传送过来的内容赋给Num和Passwd两个变量。 Passwd=Request.form("txtPasswd") Set res=Server.CreateObject("ADODB.Recordset") “打开数据库。 dbname="Driver={Microsoft Access Driver(*.mdb)};DBQ="&ServerMapPath("\")&"\ResDb\Res.mdb;" sql="select*from res" res.open sql,dbName,adOpenKeyset,adLockOptimistic res.AddNew “添加新纪录 res(1)=Num “res(1)代表数据库中的第二个字段,存储的是用户的帐号。 res(2)=Passwd “res(2)代表数据库中的第三个字段,存储的是用户的密码。 res.Update “更新数据库/ res.Close %> <p><b><font face=楷体_gb2312 size=5>您的帐号和密码已经注册成功,您现在可以<a href="http://your/index.htm">进入</a>了!</font></p> </body></html> |