📄 admin_addtemp.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../../conn/conn.asp" -->
<!--#include file="../../inc/commoncode.asp"-->
<!--#include file="../checkvalid.asp"-->
<%If Not FRAdminLevel(307) Then
Call ErrorMsg()
End If
'#########################################################
'
' Software name: Finereason HRCMS 6.0
' 软件名称:嘉缘人才网站内容管理系统 V6.0
' Email: service@finereason.com . QQ:109530926
' Web: http://www.finereason.com http://www.yjys.net
' Copyright (C) FineSincere Network All Rights Reserved.
' 版权所有 嘉挚科技 未经嘉挚公司授权不得用于任何商业用途
'
'#########################################################
wid=request.QueryString("wid")
TemplateID=request.QueryString("id")
action=request.QueryString("action")
tempname=request.form("tempname")
tempfa=request.form("tempfa")
content=request.form("content")
typeid=request.form("typeid")
de=request.form("de")
if tempname<>"" and tempfa<>"0" and temppd<>"0" and content<>"" then
if action<>"edit" then
'*********************这是添加的**************************
set rsc=server.CreateObject("adodb.recordset")
sql="select * from JOB_Template where ProjectName='"&tempfa&"' and ChannelID="&wid
rsc.open sql,conn,1,3
if not rsc.eof then
do while not rsc.eof
rsc("IsDefault")=False
rsc.movenext
loop
end if
rsc.close
set rsc=nothing
'*********************查看方案是否默认*****************************
set rsp=server.CreateObject("adodb.recordset")
sql="select * from JOB_TemplateProject where TemplateProjectName='"&tempfa&"'"
rsp.open sql,conn,1,1
IsDefaultInProject=rsp("IsDefault")
rsp.close
set rsp=nothing
'**************************************************
set rs=server.CreateObject ("adodb.recordset")
sql="select * from JOB_Template"
rs.open sql,conn,1,3
rs.addnew
rs("ChannelID")=wid
rs("TemplateName")=tempname
rs("TemplateContent")=server.HTMLEncode(content)
rs("IsDefault")=de
rs("ProjectName")=tempfa
rs("IsDefaultInProject")=IsDefaultInProject
rs("typeid")=typeid
rs.update
rs.close
set rs=nothing
else
'*********************这是修改的**************************
if de then
set rsc=server.CreateObject("adodb.recordset")
sql="select * from JOB_Template where ProjectName='"&tempfa&"' and ChannelID="&wid
rsc.open sql,conn,1,3
if not rsc.eof then
do while not rsc.eof
rsc("IsDefault")=False
rsc.movenext
loop
end if
rsc.close
set rsc=nothing
end if
set rs=server.CreateObject ("adodb.recordset")
sql="select * from JOB_Template where TemplateID="&TemplateID
rs.open sql,conn,1,3
rs("TemplateName")=tempname
rs("TemplateContent")=server.HTMLEncode(content)
rs("IsDefault")=de
rs("ProjectName")=tempfa
rs("typeid")=typeid
rs.update
rs.close
set rs=nothing
end if
response.write "<script language=javascript>alert('操作成功');location.href='Admin_Template.asp?wid="&wid&"';</script>"
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="../css/style.css" rel=stylesheet type=text/css />
<title>文章模块模板管理</title>
<script language="javascript" src="../Inc/Admin.js"></script><script language="javascript">
function check(){
if(form1.tempname.value=="")
{
alert("对不起模板名称不能为空！");
return false;
}
if(form1.tempfa.value==0)
{
alert("对不起请选择模板方案！");
return false;
}
if(form1.typeid.value==10000)
{
alert("对不起请选择模板类型！");
return false;
}
if(form1.content.value=="")
{
alert("对不起模板内容不能为空！");
return false;
}
return true;
}
</script><style type="text/css">
<!--
.style11 {color: #0066CC;
font-weight: bold;
}
-->
</style>
</head>
<body>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr class="title">
<th height="22" colspan="8" align="center" ><%call ChannelNametitle()%>模板管理</th>
</tr>
<tr class="amrow">
<td height="20" colspan="6"><font color="ff6600"><b class="style11"> 管理选项</b></font>： <a href="addinfo.asp?wid=<%=wid%>">添加
<%call ChannelNametitle()%>
</a> | <a href="index.asp?wid=<%=wid%>">管理
<%call ChannelNametitle()%>
</a> | <a href="Class_Ok.asp?action=add_class_1&wid=<%=wid%>">添加信息类别</a> | <a href="type.asp?wid=<%=wid%>">管理信息类别</a> | <a href="Admin_AddTemp.asp?wid=<%=wid%>">添加模板</a> | <a href="Admin_Template.asp?wid=<%=wid%>">模板管理</a> | [<a href="javascript:location.reload()">刷新页面</a>] </td>
</tr>
</table>
<%
if action="edit" and TemplateID<>"" then
set rs1=server.CreateObject("adodb.recordset")
sql="select * from JOB_Template where TemplateID="&TemplateID
rs1.open sql,conn,1,1
TemplateName=rs1("TemplateName")
ProjectName=rs1("ProjectName")
ChannelID=rs1("ChannelID")
TemplateContent=rs1("TemplateContent")
IsDefault=rs1("IsDefault")
rs1.close
set rs1=nothing
end if
%>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<form id="form1" name="form1" method="post" action="?wid=<%=wid%>&action=<%=action%>&id=<%=TemplateID%>" onsubmit="return check();">
<tr class="title">
<th height="22" colspan="5" align="center" ><%call ChannelNametitle()%>
添加模板 </th>
</tr>
<tr class="amrow">
<td width="100" height="20" align="right" bgcolor="#F0F0F0">模板名称： </td>
<td width="663" height="20" colspan="2" bgcolor="#F0F0F0"><label>
<input name="tempname" type="text" id="tempname" value="<%=TemplateName%>" />
</label>
</td>
</tr>
<tr class="amrow">
<td height="20" align="right" bgcolor="#F0F0F0">选择方案：</td>
<td height="20" colspan="2" bgcolor="#F0F0F0"><label>
<select name="tempfa" id="tempfa">
<option value="0">请选择方案</option>
<%
Set rs= Server.CreateObject(FR_HR_RS)
sql="select * from JOB_TemplateProject order by TemplateProjectID desc"
rs.open sql,conn,1,1
do while not rs.eof
if ProjectName = rs("TemplateProjectName") then
response.write "<option value="&rs("TemplateProjectName")&" selected>"&rs("TemplateProjectName")&"</option>"
else
response.write "<option value="&rs("TemplateProjectName")&">"&rs("TemplateProjectName")&"</option>"
end if
rs.movenext
loop
rs.close
set rs=nothing
%>
</select>
</label></td>
</tr>
<tr class="amrow">
<td height="20" align="right" bgcolor="#F0F0F0">选择类型： </td>
<td height="20" colspan="2" bgcolor="#F0F0F0"><select name="typeid" id="typeid">
<option value="10000" selected="selected">请选择模板类型</option>
<%typeid=10000'如果不给初始值，那么typeid将是0.
if TemplateID<>"" then
sql="select * from JOB_Template where TemplateID="&TemplateID
set rs=conn.execute(sql)
if not rs.eof then
typeid=rs("typeid")
end if
rs.close
set rs=nothing
end if%>
<option value="1" <%if typeid=1 then Response.Write"selected"%>><%=myarray(1)%></option>
<option value="10" <%if typeid=2 then Response.Write"selected"%>><%=myarray(2)%></option>
<option value="11" <%if typeid=3 then Response.Write"selected"%>><%=myarray(3)%></option>
<option value="12" <%if typeid=4 then Response.Write"selected"%>><%=myarray(4)%></option>
</select></td>
</tr>
<tr class="amrow">
<td height="20" align="right" bgcolor="#F0F0F0">模板内容：</td>
<td width="762" height="20" colspan="-3" bgcolor="#F0F0F0"><textarea name="content" rows="10" id="t1" style="width:100%;"><%=TemplateContent%></textarea></td>
<td width="60" bgcolor="#F0F0F0"><span class="td2"><a href="javascript:admin_Size(-5,'t1')"><img
src="../Images/minus.gif" width="20" height="20" border="0" unselectable="on" /></a> <a
href="javascript:admin_Size(5,'t1')"><img src="../Images/plus.gif" width="20" height="20"
border="0" unselectable="on" /></a><img
src="../Images/viewpic.gif" width="45" height="19" onclick="runscript(t1)" /></span></td>
</tr>
<tr class="amrow">
<td height="20" align="right" bgcolor="#F0F0F0">是否默认：</td>
<td height="20" colspan="2" bgcolor="#F0F0F0"><label>
<%
if IsDefault=True then
%>
<input name="de" type="radio" class="checkbox" value="True" checked="checked" />
<% else %>
<input name="de" type="radio" class="checkbox" value="True" />
<% end if %>
</label>
是
<label>
<%
if IsDefault=False then
%>
<input name="de" type="radio" class="checkbox" value="False" checked="checked" />
<% else %>
<input name="de" type="radio" class="checkbox" value="False" />
<% end if %>
</label>
否</td>
</tr>
<tr class="amrow">
<td height="20" colspan="3" align="center" bgcolor="#F0F0F0"><label>
<input name="Submit" type="submit" class="inputs" value="<%
if action="edit" then
response.write "修改"
else
response.write "提交"
end if
%>" />
<input name="Submit2" type="reset" class="inputs" value="重置" />
</label></td>
</tr>
</form>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -