百色仔物流:ASP表单内容判断

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 14:31:33
一个表单,把表单提交的内容用JMail发送到信箱里.
但是没加判断,现在我想加上判断,就是让表单的字段不能是空的.请问怎么在本页判断提交的内容.
具体我是在按下"确定"按钮之后,就对表单内容进行判断,是否有空,如果为空返回重填.
还有我写的这段为什么会出错?

<%
if Request.form("action")="确定发送" then
if fromuser="" or email="" or conp="" or tel="" or title="" then
Response.write "<script language=JavaScript>" & "alert('您的内容没有填写完整,请返回重新填写!');" & "history.back()" & "</script>"
Elseif Instr(Email, "@") = 0 Or Right(Email, 1) = "@" Or Left(Email, 1) = "@" Then
response.write "<script language=JavaScript>" & chr(13) & "alert('请检查您的邮件地址是否正确!');" & "history.back()" & "</script>"
Response.End
End If
End if
%>

建议用户在填写表单时先加以JaveScript验证,若在接收页面验证的话会浪费资源。
为你做了个例子你参考一下:
下面为填写页面。
........
<form action="/JMail.asp" method="post" id="mail" name="JMail_S" onsubmit="gengse">
<input name="title" type="text" id=" title" size="20" maxlength="20">
<input name="email" type="text" id="email" size="26" maxlength="40">
<input type="submit" name="Submit" value="提 交" onclick='return gengse();'>

.........

SCRIPT LANGUAGE="JavaScript">
<!--
function IsDigit()
{
return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}

function gengse()
{
if(checkspace(document.JMail_S.title.value)) {
document.JMail_S.title.focus();
alert("对不起,请填写邮件标题!");
return false;
}

if(document.JMail_S.email.value.length!=0)
{
if (document.JMail_S.email.value.charAt(0)=="." ||
document.JMail_S.email.value.charAt(0)=="@"||
document.JMail_S.email.value.indexOf('@', 0) == -1 ||
document.JMail_S.email.value.indexOf('.', 0) == -1 ||
document.JMail_S.email.value.lastIndexOf("@")==document.JMail_S.email.value.length-1 ||
document.JMail_S.email.value.lastIndexOf(".")==document.JMail_S.email.value.length-1)
{
alert("Email地址格式不正确!");
document.JMail_S.email.focus();
return false;
}
}
else
{
alert("Email不能为空!");
document.JMail_S.email.focus();
return false;
}
}
//-->
</script>

接收页面JMail.asp:

<%
title = Request.form("title")
....
if title .. 判断 then
Response.write "<script language=JavaScript>" & "alert('问题');" & "history.back()" & "</script>"
Response.End
End If
%>
......