mbsys.asp

来自「人才招聘系统,用asp做的」· ASP 代码 · 共 129 行

ASP
129
字号
	<!--#include file=../conn.asp-->
	<!--#include file=cookies.asp-->
	<!--#include file=top.asp-->
    <meta http-equiv="Content-Language" content="zh-cn">
<link rel="stylesheet" type="text/css" href="../1.css">
<title>个人会员::模板设定</title>
<body topmargin="0" leftmargin="0">
<script language="javaScript">
<!--
function mOvr(src,clrOver){ 
	if (!src.contains(event.fromElement)) { 
		src.style.cursor = 'hand'; 
		src.bgColor = clrOver; 
	}
}
function mOut(src,clrIn)  { 
	if (!src.contains(event.toElement)) { 
		src.style.cursor = 'default'; 
		src.bgColor = clrIn; 
	}
} 
//-->
</script>
<div align="center">
  <center>
<%
dim select_1,rs1,sql1,jobid,k,total,sql
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="770" height="236">
  <tr>
    <td width="147" height="236" valign="top">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
      <tr>
        <td width="100%"><!--#include file=left.asp--></td>
      </tr>
    </table>
    </td>
    <td width="27" height="236" valign="top"> </td>
    <td width="580" height="236" valign="top">
<%
if request("ok")<>1 then
list
else
ok
end if
%>
    <%sub list()%>
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
      <tr>
        <td width="100%"> </td>
      </tr>
<%
sql="select count(id) from [moban]"
total=conn.execute(sql)(0)
%>
      <tr>
        <td width="100%">当前可供你使用的模板数量:<b><font color="#FF6600"><%=total%></font></b> 个<br>
 </td>
      </tr>
      <tr>
        <td width="100%">
<%
sql1="execute mbsys"
set rs1=conn.execute(sql1)
%>
        <table border="0" borderColor="#111111" cellPadding="0" cellSpacing="0" style="BORDER-COLLAPSE: collapse" width="580">
          <form action="?ok=1" method="POST">
            <tr>
              <td align="middle" height="25" width="58" bgcolor="#D9F1B4" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
              <p align="center">序号</td>
              <td align="middle" height="25" bgcolor="#D9F1B4" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
              模板名称</td>
              <td align="middle" height="25" width="197" bgcolor="#D9F1B4" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
              <p align="center">上传时间</td>
              <td align="middle" height="25"  width="198" bgcolor="#D9F1B4" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
              <p align="center">选择</td>
            </tr>
<%
k=1
do while not rs1.eof%>
    <tr bgcolor="#f7f7f7" onmouseout="mOut(this,'#f7f7f7');" onmouseover="mOvr(this,'#E5F6CC');">
      <td width="10%"  height="25" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
      <p align="center"><b><%=k%></b></td>
      <td width="27%"  height="25" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
      <p align="center"><a href="skin/<%=trim(rs1("filename"))%>?jobid=<%=request.cookies("ijob")("jobid")%>"><%=rs1("name")%></a></td>
      <td width="32%"  height="25" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
      <p align="center"><%=rs1("data")%></td>
      <td width="31%"  height="25" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#CCCCCC">
      <p align="center">
      <input type="radio" value="<%=rs1("id")%>" checked name="select"></td>
    </tr>
<%
rs1.movenext
k=k+1
loop
rs1.close
set rs1=nothing
%>
            <tr>
              <td colSpan="4" width="580">
              <p align="center"><br>
              <input border="0" name="I1" src="img/PublishJobs1.gif" type="image"></td>
            </tr>
          </form>
        </table>
 </td>
      </tr>
    </table>
    <%end sub%>
    <%sub ok()
    select_1=request("select")
    jobid=request.cookies("ijob")("jobid")
    set rs1=server.createobject("adodb.recordset")
    sql1="select mbsys from [person] where jobid='"&jobid&"'" 
    rs1.open sql1,conn,1,3
    rs1("mbsys")=select_1
    rs1.update
    rs1.close
    set rs1=nothing
    response.write "<br><br><li>设定模板成功!"
    end sub%>
    
    </td>
    <td width="16" height="236" valign="top"> </td>
  </tr>
</table>
</center>
</div>
<%closedb%><!--#include file=copyright.asp-->

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?