index.asp

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

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/Commoncode.asp"-->
<!--#include file="../inc/CommonFunction.asp"-->
<%'读取模版内容
set rs=conn.execute("select * from JOB_Template where ChannelID=9999 and IsDefault="&FR_HR_True&" and IsDefaultInProject="&FR_HR_True&" and typeid=19")
if not rs.eof then
TemplateContent=rs("TemplateContent")
else
Response.Write("读取模板出错!")
Response.end()
end if
rs.close
set rs=nothing
html=TemplateContent
'读取开通的支付方式
Paymode="<select name=""paymode"">"
set rs=server.CreateObject("adodb.recordset")
sql="select payflag,pay_name from Job_pay_online where chk=1"
rs.open sql,conn,1,1
do while not rs.eof
Paymode=Paymode&"<option value='"&rs("payflag")&"'>"&rs("pay_name")&"</option>"
rs.movenext
loop
set rs=nothing
Paymode=Paymode&"</select>"
html=ReplaceLableFlag(ReplaceAllLabel(html))
html=Replace(html,"{$FR_支付类型}",Paymode)
Response.Write(CreateHTMLReplace(html))
conn.close
set conn=nothing
%>