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

📄 sj_edit.asp

📁 中国库存信息网 完整版 [已通过安全检测]Symantec AntiVirus 企业版 10.0.0.0.359 ║ ║ [病毒定义文件版本] 2006-5-5 rev.24 ║  ║ [已通
💻 ASP
字号:
<%@ codepage ="936" %>
<%
if id=session("id") then
session("pageid")="glsj"
response.redirect "index.asp"
else
id=session("id")
%>
<!--#include file="dbconn2.asp"-->
<script language="javascript">
function show_sader(mylink)
{
window.open(mylink,'','top=50,left=120,width=520,height=450,scrollbars=yes')
}
</script>
<%end if%>
<%
const MaxPerPage=5
dim totalPut 
dim CurrentPage
dim TotalPages
dim i
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim sql
dim rs
dim gsid,qymc
gsid=session("id")
sql="select * from info where gsid="+cstr(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='publish_info.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,"sj_edit.asp"
content 
else 
if (currentPage-1)*MaxPerPage<totalPut then 
rs.move (currentPage-1)*MaxPerPage 
dim bookmark 
bookmark=rs.bookmark 
showContent 
showpage totalput,MaxPerPage,"sj_edit.asp"
content 
else 
currentPage=1 
showContent 
showpage totalput,MaxPerPage,"sj_edit.asp"
content 
end if 
end if 
end if 
sub showContent 
%><head>
 
<a name="a"></a>
<LINK href="css.css" rel=stylesheet type=text/css>
<STYLE type=text/css>
<!--
td { font-family: "宋体"; font-size: 9pt; line-height: 14pt; }
-->
</STYLE>
</head>
<BODY text=#000000 leftMargin=0 topMargin=0 
marginheight="0" marginwidth="0">
<div align="center">
<center> 
<table border="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber6" cellpadding="0">
<tr>
<td align="center" width="100%"> 
<div align="center">
<center> 
<table border="0" cellspacing="0" cellpadding="0" width="100%" style="border-collapse: collapse" bordercolor="#111111" height="23"> 
<tr align=center height=30 bgcolor=#ececec>
<td width="100%" height="23" bgcolor="#C5E9FA"><font color=#ff6600 class=f12><b><span style="font-size: 10.5pt; letter-spacing: 1">
我的商贸信息</span></b></font></td></tr>
</table>
</center>
</div>
<center>
<table border="0" cellspacing="0" cellpadding="0" width="100%" style="border-collapse: collapse"> 
<tr height=10><td width="252"></td></tr> 
</TABLE> 
<%do while not rs.eof%> 
<TABLE border=0 cellSpacing=0 width="100%" style="border-collapse: collapse" height="75" cellpadding="0">
<TBODY>
<TR height="30">
                <TD align=left height="21" width="782" colspan="3" bgcolor="#F4FAFF"> <img src="images/logo_min.gif" width="28" height="16" border="0"><b><span style="font-size: 10.5pt"><a href="javascript:show_sader(&quot;../../syjh/business_info.asp?info_id=<%=rs("info_id")%>&quot;)"><%=rs("showname")%></a></span></b><span style="font-size: 10.5pt"> </span><%=rs("dateandtime")%><font color="#fc9603">&nbsp;&nbsp; 
【<%=rs("type")%>】</font></TD>
</TR>
<TR height="30"> 
<TD height="25" width="782" colspan="3" bgcolor="#E4F4FC">
<table border="0" cellspacing="1" style="border-collapse: collapse" width="100%" id="AutoNumber4" cellpadding="2" height="28">
<tr>
<TD height="23" width="100%"><%=mid(rs("content"),1,88)%>..<a href="javascript:show_sader(&quot;business_info.asp?info_id=<%=rs("info_id")%>&quot;)">[详细信息]</a></TD> 
</tr>
</table>
</TD> 
</TR> 
<tr>
<TD height="17" width="669" bgcolor="#F4FAFF"></TD> 
<TD height="17" width="57" bgcolor="#F4FAFF">
<a href="sj_edit1.asp?info_id=<%=rs("info_id")%>">
<img border="0" src="images/Edit_2.gif"></a></TD> 
<TD height="17" width="56" bgcolor="#F4FAFF">
<a href="sj_delv.asp?ID=<%=rs("info_id")%>">
<img border="0" src="images/A_delete.gif"></a></TD> 
</tr>
<tr>
<TD height="11" width="782" bgcolor="#F4FAFF" colspan="3">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber7">
<tr>
<TD background=images/bg_b.gif style="color: #000; font-family: 宋体; font-size: 12px; line-height:100%" bgcolor="#EEF7FF"><IMG 
height=1 src="" width=1></TD>
</tr>
</table>
</TD> 
</tr>
</TBODY>
</TABLE>
<% i=i+1
if i>=MaxPerPage then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
<%
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=95% cellspacing=0 cellpadding=0>"
response.write "<tr height=5>"
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=95% cellspacing=0 cellpadding=0>"
response.write "<tr height=5>"
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>
</center>
</div>

⌨️ 快捷键说明

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