注册 登录
编程论坛 ASP技术论坛

版主看我错在哪里了!

孤独冷雨 发布于 2007-09-18 16:31, 399 次点击

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<script language="javascript">
function myfrm()
{
if(document.myfrom.zhiwei.value == "")
{
alert("请添加招聘职位!");
return false;
}
if(document.myfrom.yxq.value == "")
{
alert("请填写有效日期!");
return false;
}
if(document.myfrom.miaoshu.value == "")
{
alert("职位描述不能为空!");
return false;
}
}
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<%
if request("action")="add" then
zhiwei=trim(request("zhiwei"))
if zhiwei="" then
response.write"<script language='javascript'>alert('职位不能为空');history.go(-1)</script>"
end if

set conn=server.CreateObject("adodb.connection")
conn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database/yczp.mdb")
set rs = server.CreateObject("adodb.recordset")

rs.open "select * from zpb where zhiwei='"&zhiwei&"'",conn,1,3
if not rs.bof then
response.Write "该职位已存在!"
response.Write "<a href='zp_add.asp'>"
Response.Write "返回"
Response.Write("</a>")
response.end
end if

rs.addnew
rs("zhiwei")=trim(request("zhiwei"))
rs("renshu")=trim(request("renshu"))
rs("xueli")=trim(request("xueli"))
rs("waiyu")=trim(request("waiyu"))
rs("sex")=trim(request("sex"))
rs("age")=trim(request("age"))
rs("yxq")=trim(request("yxq"))
rs("gongzi")=trim(request("gongzi"))
rs("miaoshu")=trim(request("miaoshu"))
rs.update()
response.write "<script language='javascript'>alert('添加成功');history.go(-1)</script>"
end if
'rs.close
'set rs=nothing
'conn.close
'set conn=nothing
%>
<body>
<form name="myfrom" method="post" action="zp_add.asp?action=add">
<table width="600" border="0" align="center" cellpadding="0" cellspacing="2">
<tr>
<td width="121" height="30" align="center" valign="middle">职  位:</td>
<td width="193" height="30"><label>
<input name="zhiwei" type="text" id="zhiwei" size="20" maxlength="30">
</label></td>
<td width="85" height="30" align="center" valign="middle">人  数:</td>
<td width="191" height="30"><input name="renshu" type="text" id="renshu" size="20" maxlength="20"></td>
</tr>
<tr>
<td height="30" align="center" valign="middle">学  历:</td>
<td height="30"><input name="xueli" type="text" id="xueli" size="20" maxlength="20"></td>
<td height="30" align="center" valign="middle">外  语:</td>
<td height="30"><input name="waiyu" type="text" id="waiyu" size="20" maxlength="50"></td>
</tr>
<tr>
<td height="30" align="center" valign="middle">性  别:</td>
<td height="30"><input name="sex" type="text" id="sex" size="20" maxlength="10"></td>
<td height="30" align="center" valign="middle">年  龄:</td>
<td height="30"><input name="age" type="text" id="age" size="20" maxlength="10"></td>
</tr>
<tr>
<td height="30" align="center" valign="middle">工  资:</td>
<td height="30"><input name="gongzi" type="text" id="gongzi" size="20" maxlength="20"></td>
<td height="30" align="center" valign="middle">有效日期:</td>
<td height="30"><input name="yxq" type="text" id="yxq" size="20" maxlength="30"></td>
</tr>
<tr>
<td align="center" valign="middle">职位描述:</td>
<td colspan="3"><label>
<textarea name="miaoshu" cols="58" rows="10" id="imaoshu"></textarea>
</label></td>
</tr>
<tr>
<td height="30">&nbsp;</td>
<td height="30" colspan="3"><label>
<input type="submit" name="Submit" value="提交" onClick="return myfrm();">
 
<input type="reset" name="Submit2" value="重置">
</label></td>
</tr>
</table>
</form>
</body>
</html>

这个一个招聘的系统?发布招聘信息的?如果相同的职位已经发布过了,就不能再发了!
红色加粗的那一段怎么都没有判断啊?我错在哪里了?帮找一下?

4 回复
#2
孤独冷雨2007-09-18 16:32
回复:(孤独冷雨)版主看我错在哪里了!

<%
if request("action")="add" then
zhiwei=trim(request("zhiwei"))
if zhiwei="" then
response.write"<script language='javascript'>alert('职位不能为空');history.go(-1)</script>"
end if

set conn=server.CreateObject("adodb.connection")
conn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database/yczp.mdb")
set rs = server.CreateObject("adodb.recordset")

rs.open "select * from zpb where zhiwei='"&zhiwei&"'",conn,1,3
if not rs.bof then
response.Write "该职位已存在!"
response.Write "<a href='zp_add.asp'>"
Response.Write "返回"
Response.Write("</a>")
response.end
end if

rs.addnew
rs("zhiwei")=trim(request("zhiwei"))
rs("renshu")=trim(request("renshu"))
rs("xueli")=trim(request("xueli"))
rs("waiyu")=trim(request("waiyu"))
rs("sex")=trim(request("sex"))
rs("age")=trim(request("age"))
rs("yxq")=trim(request("yxq"))
rs("gongzi")=trim(request("gongzi"))
rs("miaoshu")=trim(request("miaoshu"))
rs.update()
response.write "<script language='javascript'>alert('添加成功');history.go(-1)</script>"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

加粗的那一段怎么不判断啊?

#3
shaoli42612007-09-18 16:50
rs.bof的意思是当记录集是第一条记录就为真,你在他前面在加一个not使他变成假了!他当然就不执行if后面的语句了!
也就是你说的没有判断
应该改成not rs.eof
我的理解是这样字的!!应该是对的吧!你试一下吧~~~
#4
yms1232007-09-18 16:50
if not rs.EOF then
response.Write "该职位已存在!"
response.Write "<a href='zp_add.asp'>"
Response.Write "返回"
Response.Write("</a>")
response.end
end if
BOF是记录集以到第一条记录再往上则会BOF
EOF是指已到最后一条记录再往下则EOF
#5
孤独冷雨2007-09-18 18:50
谢谢了!搞定了!
1