announce.asp

嘉缘人才6.0精简 ,很好用的人才系统

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn/conn.asp"-->
<!--#include file="inc/Commoncode.asp"-->
<!--#include file="inc/CommonFunction.asp"-->
<%
Announceid=Trim(Request("Announceid"))
if Announceid="" or not IsNumeric(Announceid) then
Response.Write("<SCRIPT language=JavaScript>alert('参数错误！');window.close();</script>")
response.end()
else
set rs=conn.execute("select * from JOB_Announce where JOB_id="&Announceid&"")
if not rs.eof then
AnnAuthor=rs("JOB_Author")
if AnnAuthor="" then
AnnAuthor="系统"
end if
AnnDateAndTime=rs("JOB_DateAndTime")
Anncontent=rs("JOB_Content")
Anntitle=rs("JOB_Title")
else
Response.Write("<SCRIPT language=JavaScript>alert('参数错误！');window.close();</script>")
response.end()
end if
rs.close
set rs=nothing
end if
'读取模版内容
set rs=conn.execute("select * from JOB_Template where ChannelID=9999 and IsDefault="&FR_HR_True&" and IsDefaultInProject="&FR_HR_True&" and typeid=5")
if not rs.eof then
TemplateContent=rs("TemplateContent")
else
Response.Write("读取模板出错!")
Response.end()
end if
rs.close
set rs=nothing
html=TemplateContent
html=ReplaceLableFlag(ReplaceAllLabel(html))
html=Replace(html,"{$FR_公告内容}",Anncontent)
html=Replace(html,"{$FR_公告标题}",Anntitle)
html=Replace(html,"{$FR_公告时间}",AnnDateAndTime)
html=Replace(html,"{$FR_公告作者}",AnnAuthor)
Response.Write(CreateHTMLReplace(html))
conn.close
set conn=nothing
%>