📄 resourceadd.asp
字号:
<!--#include file="check_login.asp"-->
<!--#include file="conn.asp"-->
<%
addyes=trim(request.QueryString("add"))
addyes2=trim(request.QueryString("add2"))
idd=trim(request.QueryString("idd"))
if addyes="addRe" then
'如果编辑的内容很多，上传速度太慢，请设置以下的时间，单位秒
Server.ScriptTimeout = 1000
'==============
Dim sContent1, i
sContent1=""
For i = 1 To Request.Form("content1").Count
sContent1 = sContent1 & Request.Form("content1")(i)
Next
Rname=trim(request.Form("Rname"))
Rman=trim(request.Form("Rman"))
Rredress=trim(request.Form("Rredress"))
RWages=trim(request.Form("RWages"))
Rput=trim(request.Form("Rput"))
'===================================
if len(Rname)=0 or isempty(Rname) then
response.write "<script language=javascript> alert('职位名称必填！');history.back(-1);</script>"
response.end
end if
if len(Rredress)=0 or isempty(Rredress) then
response.write "<script language=javascript> alert('工作地点必填!');history.back(-1);</script>"
response.end
end if
if len(RWages)=0 or isempty(RWages) then
response.write "<script language=javascript> alert('工资待遇必填!');history.back(-1);</script>"
response.end
end if
if len(sContent1)=0 or isempty(sContent1) then
response.write "<script language=javascript> alert('该招聘信息的详细内容不可少！\n请编辑好后再发布！');history.back(-1);</script>"
response.end
end if
'===================================
if addyes2="yestoupdate" then
sql = "select * from Resume where id="&idd&""
else
sql="select * from Resume where (id is null)"
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if addyes2="yestoupdate" then
rs("Rname")=Rname
rs("Rman")=Rman
rs("Rredress")=Rredress
rs("RWages")=RWages
rs("Rput")=Rput
rs("Rjie")=sContent1
rs.update
response.Redirect "ResourcesAll.asp"
rs.close
set rs=nothing
else
rs.addnew
rs("Rname")=Rname
rs("Rman")=Rman
rs("Rredress")=Rredress
rs("RWages")=RWages
rs("Rput")=Rput
rs("Rjie")=sContent1
rs.update
response.Redirect "ResourcesAll.asp"
rs.close
set rs=nothing
end if
end if
'=========取得修改内容==========================
if addyes="UpdateRe" then
set rs = server.createobject("adodb.recordset")
rs.source = "select * from Resume where id="&idd&""
rs.open rs.source,conn,1,1
Rname=trim(rs("Rname"))
Rredress=trim(rs("Rredress"))
Rman =trim(rs("Rman"))
RWages =trim(rs("RWages"))
content1=trim(rs("Rjie"))
end if
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="text.css" rel="stylesheet" type="text/css">
</head>
<body topmargin="0" leftmargin="0" rightmargin="0" <%=kkk%>>
<!--#include file="top/Ltop06.asp"-->
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="5"></td>
</tr>
</table>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#EFEBEF">
<form name="LPform" method="post" action="ResourceAdd.asp?add=addRe&add2=<%=addyes2%>&idd=<%=idd%>">
<tr>
<td width="9%" align="right" bgcolor="#DEDFDE">职位名称：</td>
<td width="91%" bgcolor="#EBEBEB">
<input name="Rname" type="text" class="myput" id="Rname" value="<%=Rname%>" size="35">
<span class="BLUE">*</span></td>
</tr>
<tr>
<td width="9%" align="right" bgcolor="#DEDFDE">发布日期：</td>
<td bgcolor="#EBEBEB"><%=date()%></td>
</tr>
<tr>
<td width="9%" align="right" bgcolor="#DEDFDE">工作地点：</td>
<td bgcolor="#EBEBEB"><input name="Rredress" type="text" class="myput" id="Rredress" value="<%=Rredress%>" size="20">
<span class="BLUE">*</span>（如：深圳） </td>
</tr>
<tr>
<td width="9%" align="right" bgcolor="#DEDFDE">需求人数：</td>
<td bgcolor="#EBEBEB"><input name="Rman" type="text" class="myput" id="Rman" value="<% if Rman="" then
response.Write"1"
else
response.Write Rman
end if %>" size="20">
人
<span class="BLUE">*</span>（如：1）</td>
</tr>
<tr>
<td width="9%" align="right" bgcolor="#DEDFDE">工资待遇：</td>
<td bgcolor="#EBEBEB"><input name="RWages" type="text" class="myput" id="RWages" value="<% if RWages="" then
response.Write"面议"
else
response.Write RWages
end if %>"
size="20">
<span class="BLUE">*</span>（如：3000元/月，面议）</td>
</tr>
<tr>
<td align="right" bgcolor="#DEDFDE">具体要求：</td>
<td bgcolor="#EBEBEB"><span class="BLUE">*</span> 利用本编辑工具，可以编辑图文并茂的新闻内容图文，也可上传多幅图片和制作表格等。</td>
</tr>
<tr valign="top" bgcolor="#EBEBEB">
<td colspan="2">
<INPUT type="hidden" name="content1" value="<%=Server.HtmlEncode(content1)%>">
<IFRAME ID="NwebEditor1" src="../WebEditor/eWebEditor.asp?id=content1" frameborder="0" scrolling="no" width="550" height="350"></IFRAME></td>
<td width="0%"></td>
</tr>
<tr>
<td width="9%" align="right" bgcolor="#DEDFDE">是否发布：</td>
<td bgcolor="#EBEBEB"><input name="Rput" type="radio" value="1" checked>
是
<input type="radio" name="Rput" value="0">
否 （选 <strong>是</strong> 时表立即发布，否则暂存于数据库中）</td>
</tr>
<tr valign="top" bgcolor="#DEDFDE">
<td height="50" valign="middle" style='BORDER-BOTTOM: #333333 1px solid'> </td>
<td height="50" valign="middle" style='BORDER-BOTTOM: #333333 1px solid'><input type="submit" name="Submit" value=" 添 加 ">
<input type="reset" name="Submit2" value=" 重 置 "></td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -