⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mana.asp

📁 嘉缘人才6.0精简 ,很好用的人才系统
💻 ASP
字号:
<!--#include file="menu.asp" -->
<%if request("action")="oedit" then%>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<form method="POST" action="mana_save.asp?action=oedit" target="_self">
  <tr>
    <td height=30 align="center">广告位类型名称: <input type="text" name="pricename" size="20" maxlength="50" value='<%=request("price")%>'>
<input type="hidden" name="ID" value='<%=request("ID")%>'>
<input name="cmdok" type="submit" class="inputs" value=" 修 改 ">
&nbsp;
<input name="cmdcancel" type="reset" class="inputs" value=" 复 原 ">
&nbsp;
<input name="ok" type="button" class="inputs" onClick="javascript:window.open('mana.asp','_self')" value=" 放 弃 "></td>
  </tr>
</form>
</table>
<%elseif request("action")="odel" then
ID = Request("ID")
price=request("price")%>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<form action="mana_save.asp?action=odel" method=post target="_self">
<input type="hidden" name="price" value="<%=price%>">  <tr>
    <td height=30 align="center">删除广告位种类:[ <font color="#FF0000"><%=price%></font> ]?(此操作将一起删除相应的所有广告设置!并且删除后将无法恢复!)
	<input name="alert_button" type=submit class="inputs" value="  是  ">
&nbsp;&nbsp;
<input type=button class="inputs" onClick="javascript:window.open('mana.asp','_self')" value="  否  "></td>
  </tr>
</form>
</table>
<%elseif request("action")="tedit" then%>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<%set adsrs1=server.createobject("adodb.recordset")
adssql1="select * from JOB_place where JOB_placeid="& request("ID") &""
adsrs1.Open adssql1,conn,1,1%>
<form method="POST" action="mana_save.asp?action=tedit"  target="_self">
<input type="hidden" name=priceid value="<%=request("priceid")%>">
  <tr>
    <td height=30 align=center>广告位置名称: <input type="text" name="placename" size="20" maxlength="20" Class="text" value="<%=adsrs1("JOB_placename")%>"> 行列<input type="text" name="aa" size="10" maxlength="20" Class="text" value="<%=adsrs1("JOB_aa")%>"> 尺寸<input type="text" name="cc" size="10" maxlength="20" Class="text" value="<%=adsrs1("JOB_cc")%>"> 编号: <input type="text" name="place" size="3" maxlength="20" Class="text" value="<%=adsrs1("JOB_place")%>">
 价格: <input type="text" name="jg" size="6" maxlength="20" Class="text" value="<%=adsrs1("JOB_jg")%>">元/
<select size="1" name="jgg">
<option value="年"<%if adsrs1("JOB_jgg")="年" then%> selected<%end if%>>年</option>
<option value="月"<%if adsrs1("JOB_jgg")="月" then%> selected<%end if%>>月</option>
<option value="天"<%if adsrs1("JOB_jgg")="天" then%> selected<%end if%>>天</option>
</select>
<input type="hidden" name="ID" value='<%=request("ID")%>'>
<input name="cmdok" type="submit" class="inputs" value=" 修 改 ">
&nbsp;<input name="cmdcancel" type="reset" class="inputs" value=" 复 原 ">
&nbsp;<input name="ok" type="button" class="inputs" onClick="javascript:window.open('mana.asp?priceid=<%=request("priceid")%>','_self')" value=" 放 弃 "></td>
  </tr>
</form>
<%adsrs1.Close
set adsrs1=nothing%>
</table>
<%elseif request("action")="tdel" then%>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<form action="mana_save.asp?action=tdel" method=post  target="_self">
<input type="hidden" name=priceidone value="<%=request("priceid")%>">
<input type="hidden" name="priceid" value="<%=request("priceid")%>">
<input type="hidden" name="place" value="<%=request("place")%>">
<input type="hidden" name="id" value="<%=request("id")%>">
  <tr>
    <td height=30 align="center">删除广告位:[<font color="#FF0000"> <%=request("place")%> </font>]?(此操作将一起删除相应的所有广告设置!并且删除后将无法恢复!)
	<input type=submit class="inputs" value="  是  ">
&nbsp;&nbsp;
<input type=button class="inputs" onClick="javascript:window.open('mana.asp','_self')" value="  否  "></td>
  </tr>
</form>
</table>
<%elseif request("action")="code" then%>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td height=30 align="center"><input type="text" size="70" value="<script language=javascript src=/ads/ads.asp?priceid=<%=request("priceid")%>&place=<%=request("place")%>></script>"><br><font color=red>请注意文件目录,请将此代码插入到相应位置。</font></td>
  </tr>
</table>
<%end if%>
<!--========================================================================-->
<table width="98%" border="0" cellspacing="1" cellpadding="2" align="center" class="tableBorder">
  <tr align="center" bgcolor=#ffffff>
    <th width=27% height=25>广告种类管理</th>
    <th width=73%>广告位管理</th>
  </tr>
  <tr align="center" bgcolor=#ffffff>
<form method="post" action="mana_save.asp?action=addone" name="price" target="_self">
	<td height=25><input class=text type="text" name="price" size="20" maxlength="50">
<input name="Submit3" type="submit" class="inputs" value="添加"></td>
</form>

<form method="post" action="mana_save.asp?action=tadd" name="type"  target="_self">
<input type="hidden" name=priceid value="<%=request("priceid")%>">
    <td><%set adsrs=server.createobject("adodb.recordset")
adssql="select * from JOB_price order by JOB_priceID asc"
adsrs.Open adssql,conn,1,1%>在 
<select size="1" name="price" style="font-size: 9pt">
<%if adsrs.EOF then %>
<option>暂无大类</option>
<%else
while not adsrs.EOF%>
<option value="<%=adsrs("JOB_price")%>"
<%
if request("priceid")<>"" then
	if cint(request("priceid"))=cint(adsrs("JOB_priceid")) then
		response.Write "selected"
	end if
end if
%>
><%=trim(adsrs("JOB_price"))%></option>
<%adsrs.MoveNext
wend
end if
adsrs.Close
set adsrs=nothing%>
</select>
<input class=text type="text" name="placename" size="12" value="广告位名称">
<input class=text type="text" name="aa" size="7" value="行*列">
<input class=text type="text" name="cc" size="7" value="宽*高">
编号:<input class=text type="text" name="place" size="2">
价格:<input class=text type="text" name="jg" size="6">元/
<select size="1" name="jgg">
<option value="年">年</option>
<option value="月" selected>月</option>
<option value="天">天</option>
</select>
<input name="Submit3" type="submit" class="inputs" value="添加">
	</td>
</form>
  </tr>
  <tr bgcolor=#ffffff>
    <td valign=top>
<!--====================-->
<table width="100%" border="0" cellspacing="1" cellpadding="0">
  <tr bgcolor=#cccccc align=center>
    <td width="15%" height=20 class="amrow"><strong>序号</strong></td>
    <td width="51%" class="amrow"><strong>广告位种类名称</strong></td>
    <td width="34%" class="amrow"><strong>操作</strong></td>
  </tr>
<%set adsrs=server.createobject("adodb.recordset")
adssql ="SELECT * From JOB_price order by JOB_priceID"
adsrs.open adssql,conn,1,1		
do while not adsrs.eof%>
  <tr bgcolor=#efefef align=center>
    <td height=20><%=adsrs("JOB_priceID")%></td>
    <td><a href=mana.asp?priceid=<%=adsrs("JOB_priceid")%>&action=priceid><font color=#000000><%=adsrs("JOB_price")%></font></a></td>
    <td><a href="mana.asp?ID=<%=adsrs("JOB_priceID")%>&price=<%=adsrs("JOB_price")%>&action=oedit" style="text-decoration: none">编辑</a> 
      <a href="mana.asp?ID=<%=adsrs("JOB_priceID")%>&price=<%=adsrs("JOB_price")%>&action=odel" style="text-decoration: none">删除</a></td>
  </tr>
<%adsrs.MoveNext
Loop
adsrs.close%>
</table>
<!--====================-->
	</td>
    <td valign=top>
<!--====================-->
<table width="100%" border="0" cellspacing="1" cellpadding="0">
  <tr bgcolor=#cccccc align=center>
    <td width="8%" height=20 class="amrow"><strong>代码</strong></td>
    <td width="13%" class="amrow"><strong>广告种类</strong></td>
    <td width="20%" class="amrow"><strong>广告位置</strong></td>
    <td width="4%" class="amrow"></td>
    <td width="10%" class="amrow"><strong>行列</strong></td>
    <td width="10%" class="amrow"><strong>尺寸</strong></td>
    <td width="6%" class="amrow"><strong>编号</strong></td>
    <td width="16%" class="amrow"><strong>价格</strong></td>
    <td width="13%" class="amrow"><strong>操作</strong></td>
  </tr>
<%
set adsrs=server.createobject("adodb.recordset")
if request("action")="priceid" or request("priceid")<>"" then
adssql ="SELECT  * From JOB_place where JOB_priceid="&request("priceid")&" order by JOB_place asc"
else
adssql ="SELECT  * From JOB_place order by JOB_place asc"
end if
adsrs.open adssql,conn,1,1	
	
do while not adsrs.eof%>
<%set adsrs1=server.createobject("adodb.recordset")
adssql1="select * from JOB_ads where JOB_place="&adsrs("JOB_place")&" and JOB_priceid="&adsrs("JOB_priceid")&" and JOB_act=1 order by JOB_id desc"
adsrs1.open adssql1,conn,1,1
sum=adsrs1.recordcount
adsrs1.close
if sum>0 then
sum=sum
color="efefef"
else
sum="<strong>×</strong>"
color="ffff00"
end if

%>
  <tr bgcolor=<%=color%> align=center>
    <td height=20 class="amrow"><a href=mana.asp?priceid=<%=adsrs("JOB_priceid")%>&place=<%=adsrs("JOB_place")%>&action=code>代码</a></td>
    <td><%=adsrs("JOB_price")%></td>
    <td><a href=view.asp?priceid=<%=adsrs("JOB_priceid")%>&place=<%=adsrs("JOB_place")%>&action=search><%=adsrs("JOB_placename")%></a></td>
    <td><%=sum%></td>
    <td><%=adsrs("JOB_aa")%></td>
	<td><%=adsrs("JOB_cc")%></td>
    <td><%=adsrs("JOB_place")%></td>
    <td>¥<strong><%="<font color=red>"&adsrs("JOB_jg")&"</font>/"&adsrs("JOB_jgg")%></strong></td>
    <td> <a href="mana.asp?ID=<%=adsrs("JOB_placeID")%>&place=<%=adsrs("JOB_place")%>&priceid=<%=request("priceid")%>&action=tedit" style="text-decoration: none">编辑</a> 
      <a href="mana.asp?ID=<%=adsrs("JOB_placeID")%>&place=<%=adsrs("JOB_place")%>&priceid=<%=adsrs("JOB_priceid")%>&action=tdel" style="text-decoration: none">删除</a>    </td>
  </tr>
<%adsrs.MoveNext
Loop
adsrs.close%>
</table>
<!--====================-->
	</td>
  </tr>
</table>
<!--========================================================================-->

⌨️ 快捷键说明

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