您所在位置：主题：[讨论]一点小问题,也会有错
星晴王子
[专家分：0] 发布于 2007-04-16 16:37:00
用户注册页面中写到:
<body>
<form action="checkuser.asp" method="post" enctype="multipart/form-data" name="form1" id="form1">
<table width="750" border="1">
<tr>
<th colspan="3" align="center" bgcolor="#669999">请输入注册信息 (带*号为必填)</th>
</tr>
<tr>
<th width="127" align="right" bgcolor="#CCCCCC">用户名</th>
<td width="384" align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtuserid" size="25"/>
*</label></td>
<td width="217" bgcolor="#CCCCCC"><p>25个字符以内的英文或汉字</p></td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">用户昵称</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtusernick" size="25" />
*</label></td>
<td bgcolor="#CCCCCC">25个字符以内的英文或汉字</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">用户密码</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="password" name="txtuserpwd" size="25" />
*</label></td>
<td bgcolor="#CCCCCC">建议6-18位</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">确认密码</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="password" name="txtpwdsubmit" size="25"/>
*</label></td>
<td bgcolor="#CCCCCC"> </td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">电子邮件</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtemail" size="35"/>
</label></td>
<td bgcolor="#CCCCCC">方便本站与您联系</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">性别</th>
<td bgcolor="#ECE9D8"> <label>
<input type="radio" name="rdusergender" value="男" />
男
<input type="radio" name="rdusergender" value="女" />
女
<input type="radio" name="rdusergender" value="保密" />
保密</label></td>
<td bgcolor="#CCCCCC"> </td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">生日</th>
<td bgcolor="#ECE9D8"> <label>
<select name="txtyear">
<%
for i=1950 to year(date)
response.write "<option>"&i&"</option>"
next
%>
</select>
年
<select size="1" name="txtmonth">
<%
for i=1 to 12
response.write "<option>"&i&"</option>"
next
%>
</select>
月
<select size="1" name="txtday">
<%
for i=1 to 31
response.write "<option>"&i&"</option>"
next
%>
</select>
日
</label></td>
<td bgcolor="#CCCCCC">请勿选择不存在的日期</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">联系方式</th>
<td align="center" bgcolor="#ECE9D8"> <label>
<input type="text" name="txtphone" size="25"/>
</label></td>
<td bgcolor="#CCCCCC">请填写住宅号码或移动电话</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">真实姓名</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtusername" size="25"/>
</label></td>
<td bgcolor="#CCCCCC">可以不填写任何信息</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">个人介绍</th>
<td colspan="2" align="center" bgcolor="#ECE9D8"><label>
<textarea name="txtdescription" cols="52" rows="5" col="50"></textarea>
</label></td>
</tr>
<tr>
<td colspan="3" align="center" bgcolor="#669999">
<label>
<input type="submit" name="btnsubmit" value="提交注册信息" />
<input type="reset" name="btnreset" value="清除注册信息" />
</label></td>
</tr>
</table>
</form>
</body>
而checksuer.asp中代码如下 :
<%
dim struserid,struserpwd,strpwdsubmit,strusernick
dim cn,rsusernew,rsusercheck
struserid=request.form("txtuserid")
struserpwd=request.form("txtuserpwd")
strpwdsubmit=request.form("txtpwdsubmit")
strusernick=request.form("txtusernick")
' response.write request.form("txtuserid")
response.write "asfdasfasfa"
'set cn=server.CreateObject("adodb.connection")
'set rsusernew=server.CreateObject("adodb.recordset")
'set rsusercheck=server.CreateObject("adodb.recordset")
if (len(struserid)=0 or len(struserpwd)=0 or len(strpwdsubmit) or len(strusernick)=0) then
response.Write "<p align=center> <front color=red> 输入信息不完整,请重新输入!</front></p>"
else
response.write "adasd"
end if
response.write struserid
%>
为什么我无论怎样测试,都输出是:输入信息不完整,请重新输入!(当我输入正确的注册信息时也是如此,高手请指教)
<body>
<form action="checkuser.asp" method="post" enctype="multipart/form-data" name="form1" id="form1">
<table width="750" border="1">
<tr>
<th colspan="3" align="center" bgcolor="#669999">请输入注册信息 (带*号为必填)</th>
</tr>
<tr>
<th width="127" align="right" bgcolor="#CCCCCC">用户名</th>
<td width="384" align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtuserid" size="25"/>
*</label></td>
<td width="217" bgcolor="#CCCCCC"><p>25个字符以内的英文或汉字</p></td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">用户昵称</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtusernick" size="25" />
*</label></td>
<td bgcolor="#CCCCCC">25个字符以内的英文或汉字</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">用户密码</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="password" name="txtuserpwd" size="25" />
*</label></td>
<td bgcolor="#CCCCCC">建议6-18位</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">确认密码</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="password" name="txtpwdsubmit" size="25"/>
*</label></td>
<td bgcolor="#CCCCCC"> </td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">电子邮件</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtemail" size="35"/>
</label></td>
<td bgcolor="#CCCCCC">方便本站与您联系</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">性别</th>
<td bgcolor="#ECE9D8"> <label>
<input type="radio" name="rdusergender" value="男" />
男
<input type="radio" name="rdusergender" value="女" />
女
<input type="radio" name="rdusergender" value="保密" />
保密</label></td>
<td bgcolor="#CCCCCC"> </td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">生日</th>
<td bgcolor="#ECE9D8"> <label>
<select name="txtyear">
<%
for i=1950 to year(date)
response.write "<option>"&i&"</option>"
next
%>
</select>
年
<select size="1" name="txtmonth">
<%
for i=1 to 12
response.write "<option>"&i&"</option>"
next
%>
</select>
月
<select size="1" name="txtday">
<%
for i=1 to 31
response.write "<option>"&i&"</option>"
next
%>
</select>
日
</label></td>
<td bgcolor="#CCCCCC">请勿选择不存在的日期</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">联系方式</th>
<td align="center" bgcolor="#ECE9D8"> <label>
<input type="text" name="txtphone" size="25"/>
</label></td>
<td bgcolor="#CCCCCC">请填写住宅号码或移动电话</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">真实姓名</th>
<td align="center" bgcolor="#ECE9D8"><label>
<input type="text" name="txtusername" size="25"/>
</label></td>
<td bgcolor="#CCCCCC">可以不填写任何信息</td>
</tr>
<tr>
<th align="right" bgcolor="#CCCCCC">个人介绍</th>
<td colspan="2" align="center" bgcolor="#ECE9D8"><label>
<textarea name="txtdescription" cols="52" rows="5" col="50"></textarea>
</label></td>
</tr>
<tr>
<td colspan="3" align="center" bgcolor="#669999">
<label>
<input type="submit" name="btnsubmit" value="提交注册信息" />
<input type="reset" name="btnreset" value="清除注册信息" />
</label></td>
</tr>
</table>
</form>
</body>
而checksuer.asp中代码如下 :
<%
dim struserid,struserpwd,strpwdsubmit,strusernick
dim cn,rsusernew,rsusercheck
struserid=request.form("txtuserid")
struserpwd=request.form("txtuserpwd")
strpwdsubmit=request.form("txtpwdsubmit")
strusernick=request.form("txtusernick")
' response.write request.form("txtuserid")
response.write "asfdasfasfa"
'set cn=server.CreateObject("adodb.connection")
'set rsusernew=server.CreateObject("adodb.recordset")
'set rsusercheck=server.CreateObject("adodb.recordset")
if (len(struserid)=0 or len(struserpwd)=0 or len(strpwdsubmit) or len(strusernick)=0) then
response.Write "<p align=center> <front color=red> 输入信息不完整,请重新输入!</front></p>"
else
response.write "adasd"
end if
response.write struserid
%>
为什么我无论怎样测试,都输出是:输入信息不完整,请重新输入!(当我输入正确的注册信息时也是如此,高手请指教)
