⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 register1.asp

📁 这是我在大三的《asp程序设计教程》的课程设计
💻 ASP
字号:
<!-- #include file="retop.asp" -->
<html>
<head>
<link rel="stylesheet" href="common.css" type="text/css">

<script language="vbscript">
<!--
Sub pass2_OnBlur
	'判断两次密码是否相同
	if formreg.pass1.value <> formreg.pass2.value then
		document.formreg.elements(2).focus()
		MsgBox"两次输入的密码不一致!"
		end if
end Sub
Sub btnreg_OnClick
	'判断用户名是否正确
	if Trim(formreg.username.value)=Empty then
		document.formreg.elements(0).focus()
		MsgBox"用户名不能为空!"
		exit Sub
	else if len(formreg.username.value)>12 then
		document.formreg.elements(0).focus()
		MsgBox"用户名不能超过12个字符!"
		exit Sub
		end if
	end if
	''判断用户密码是否正确
	if Trim(formreg.pass1.value)=Empty then
		document.formreg.elements(1).focus()
		MsgBox"密码不能为空!"
		exit Sub
	else if len(formreg.pass1.value)>12 then
		document.formreg.elements(1).focus()
		MsgBox"密码不能超过12个字符!"
		exit Sub
		end if
	end if	
	formreg.Submit
end Sub
-->
</script>
<title>同学通讯录</title>
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
-->
</style>
</head>
<body>
<h4>请输入注册信息<h4>
<form method="post" name="formreg" action="register2.asp">
<p>用&nbsp;户&nbsp;名:<input type="text" name="username" size="12">
(<span class="STYLE1">* 必填,最长12个字符</span>)</p>
<p>用户密码:<input type="password" name="pass1" size="12">
(<span class="STYLE1">* 必填,最长12个字符</span>)</p>
<p>验&nbsp;证&nbsp;码:<input type="text" name="validatecode" size="12">
(<span class="STYLE1">* 请输入下图中的数字</span>)</p>&nbsp;<img src='imgchk/validatecode.asp' align='absmiddle' border='0' height="20" width="70" id="valiImg" >&nbsp;<A href="javascript:document.getElementById('valiImg').src='imgchk/validatecode.asp?'+new Date;void(0);">看不清,换一张</A></p>
<p>
	<INPUT style="WIDTH: 70px; HEIGHT: 25px" type=button size=17 value=确定 name=btnreg> 
	<INPUT style="WIDTH: 70px; HEIGHT: 25px" type=reset size=21 value=取消>
</p>
</form>
<br><br><br><br><br><br><br><br><br><br><br><br>
<!-- #include file="bottom.asp" -->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -