edit.asp

来自「实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下：管理员」· ASP 代码 · 共 192 行

<!--#include file="../prohead.asp"-->
  <!--#include file="../checkrole.asp"-->
 <%
      call checkuser("zp")
	  %>
<script language="javascript">
function show_sader(mylink)
{
window.open(mylink,'','top=50,left=120,width=457,height=450,scrollbars=yes')
}
</script>
<%
const MaxPerPage=15
dim totalPut 
dim CurrentPage
dim TotalPages
dim i
if Chkrequest(request("page")) then
currentPage=request("page")
else
currentPage=1
end if
dim sql
dim rs
dim gsid,qymc
gsid=session("id")
sql="select * from Yixiang_work where gsid="&gsid&" order by info_id desc"
set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
if rs.eof and rs.bof then 
response.write "<script language='javascript'>"
response.write "alert('您还没有发布招聘信息，请发布！');"
response.write"this.location.href='work.asp';</SCRIPT>"
response.end 
else 
totalPut=rs.recordcount 
if currentpage<1 then 
currentpage=1 
end if 
if (currentpage-1)*MaxPerPage>totalput then 
if (totalPut mod MaxPerPage)=0 then 
currentpage= totalPut \ MaxPerPage 
else 
currentpage= totalPut \ MaxPerPage + 1 
end if 
end if 
if currentPage=1 then 
showContent 
showpage totalput,MaxPerPage,"edit.asp"
content 
else 
if (currentPage-1)*MaxPerPage<totalPut then 
rs.move (currentPage-1)*MaxPerPage 
dim bookmark 
bookmark=rs.bookmark 
showContent 
showpage totalput,MaxPerPage,"edit.asp"
content 
else 
currentPage=1 
showContent 
showpage totalput,MaxPerPage,"edit.asp"
content 
end if 
end if 
end if 
sub showContent 
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
 
<br>
<TABLE width=778 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
  <TR>
    <TD 
    style="BACKGROUND-POSITION: right 50%; BACKGROUND-IMAGE: url(i../mages/bg1.gif); BACKGROUND-REPEAT: repeat-y; BACKGROUND-COLOR: #ffffff" 
    vAlign=top align=middle>      <TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
        <TBODY>
        <TR>
              <TD width="6%"><IMG height=32 src="../images/edit_work.gif" 
            border=0></TD>
              <TD width="94%" background="../images/info_bg.gif">&nbsp;</TD>
        </TR></TBODY></TABLE>
        <TABLE align="center" cellSpacing=0 cellPadding=0 width="100%" border=0 style="border-collapse: collapse">
          <TBODY>
<tr>
<TD width="100%" bgcolor="#FFFFFF" height="75" valign="top">

<table align="center" border="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber1" cellpadding="0">
                  <tr>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber1">
<tr>
<td width="100%"> 

<table width="100%" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse"> 
<tr>
<td align="center" width="100%" valign="top"> 
<table border="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber6" cellpadding="0">
                                      <tr>
<td align="center" width="100%" bgcolor="#FBFDFF"><table border="1" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber7" height="50" bordercolorlight="#ACD6FF" cellspacing="1" cellpadding="3" bordercolordark="#ACD6FF">
                                          <tr> 
                                            <td width="37%" bgcolor="#DDEEFF" height="23"> 
                                              <div align="center"> <span style="LETTER-SPACING: 5px">招聘职位</span></div></td>
                                            <td width="37%" bgcolor="#DDEEFF" height="23"> 
                                              <p align="center">发布日期</td>
                                            <td height="23" colspan="2" bgcolor="#DDEEFF"> 
                                              <p align="center">操作</td>
                                          </tr>
                                          <%do while not rs.eof%>
                                          <tr> 
                                            <td width="37%" height="23" bgcolor="#FFFFFF"> 
                                              &nbsp;<a style="text-decoration: none" href="javascript:show_sader('work_info.asp?info_id=<%=rs("info_id")%>')"><%=rs("showname")%></a></td>
                                            <td width="37%" height="23" bgcolor="#FFFFFF"> 
                                              <p align="left"><%=rs("dateandtime")%></td>
                                            <td width="15%" height="23" bgcolor="#FFFFFF"> 
                                              <p align="center"> <a href="edit1.asp?info_id=<%=rs("info_id")%>"> 
                                                <img src="../images/Edit_2.gif" width="47" height="18" border="0"></a></td>
                                            <td width="11%" height="23" bgcolor="#FFFFFF"> 
                                              <p align="center"> <a href="del.asp?ID=<%=rs("info_id")%>" onClick="return sureok();"> 
                                                <img src="../images/A_delete.gif" width="52" height="16" border="0"></a></td>
                                          </tr>
                                          <% 
i=i+1
if i>=MaxPerPage then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
                                        </table>
<%
end sub 
function showpage(totalnumber,maxperpage,filename) 
dim n 
if totalnumber mod maxperpage=0 then 
n= totalnumber \ maxperpage 
else 
n= totalnumber \ maxperpage+1 
end if 
response.write "<form method=Post action="&filename&">" 
if CurrentPage<2 then 
response.write "<table border=0 width=98% cellspacing=0 cellpadding=0>"
response.write "<tr height=0><td colspan=2></td></tr>"
response.write "<tr height=0>"
response.write "<td align=left valign=top>"
response.write "<font color=red><b>共"&n&"页&nbsp;第"&CurrentPage&"页 " 
response.write "共发布"&totalnumber&"&nbsp;条信息</b></font>" 
response.write "</td>"
response.write "<td VALIGN=middle align=right >"
response.write "【最前页】【上一页】" 
else 
response.write "<table border=0 width=98% cellspacing=0 cellpadding=0>"
response.write "<tr height=0><td colspan=2></td></tr>"
response.write "<tr height=0>"
response.write "<td align=left valign=top>"
response.write "<font color=red><b>共"&n&"页&nbsp;第"&CurrentPage&"页 " 
response.write "共发布"&totalnumber&"&nbsp条信息</b></font>" 
response.write "</td>"
response.write "<td VALIGN=center align=right >"
response.write "【<a href="&filename&"?page=1&id="&gsid&">最前页</a>】" 
response.write "【<a href="&filename&"?page="&CurrentPage-1&"&id="&gsid&">上一页</a>】" 
end if 
if n-currentpage<1 then 
response.write "【下一页】【最后页】" 
else 
response.write "【<a href="&filename&"?page="&(CurrentPage+1)&"&id="&gsid&">" 
response.write "下一页</a>】【 <a href="&filename&"?page="&n&"&id="&gsid&">最后页</a>】" 
end if 
response.write "</form>" 
response.write "</td>"
response.write "</tr>"
response.write "</table>"
end function
%></tr>
</table>
</table>
</center>
</td> 
<%sub content%> 
</tr> 
</table> 
<%end sub%>
</td>
</tr>
</table>

</TD>
</tr>
</TBODY></TABLE></TD>
  </TR>
</TABLE>