📄 webmod.asp

📁 北京商务网
💻 ASP
字号:
<%@ codepage ="936" %>
<!--#include file="../../conn/dbconn2.asp"-->
<!--#include file="../../inc/config.asp"-->
<%
if session("Flag")<>1 then 
response.write "<SCRIPT language=JavaScript>alert('对不起，你没有权限打开此页！');"
response.write"this.location.href='../zxjf/money.asp';</SCRIPT>" 
response.end
END IF
%>
<LINK href="../../css/Style.css" rel=stylesheet type=text/css>
<SCRIPT language=javascript src="../../login/images/location.js"></SCRIPT>
<script language="javascript">
function info(mylink)
{
window.open(mylink,'','top=50,left=120,width=495,height=310,scrollbars=yes')
}
</script>
<script Language="JavaScript"> 
function FormCheck() 
{ 
var check=true;
for(var i=0;i<document.Form1.url.length;i++){
if (document.Form1.url[i].checked) {
check=false;
break;
} 
}
if (check){
alert("请选择网站模版样式！");
document.Form1.url[1].focus();
return false;
}
return true; 
document.Form1.submit()
} 
</script>
<%
dim totalPut 
dim CurrentPage
dim TotalPages
dim i,j
MaxPerPage=9
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim rs
dim sql
set rs=server.createobject("adodb.recordset") 
sql="select * from mod order by id desc"
rs.open sql,conn,1,1 
if rs.eof and rs.bof then 
response.write "<p align='center'>对不起，没有任何信息！</a></p>" 
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 totalput,MaxPerPage
showpage totalput,MaxPerPage,"webmod.asp"
else 
if (currentPage-1)*MaxPerPage<totalPut then 
rs.move (currentPage-1)*MaxPerPage 
dim bookmark 
bookmark=rs.bookmark 
showContent totalput,MaxPerPage
showpage totalput,MaxPerPage,"webmod.asp"
else 
currentPage=1 
showContent totalput,MaxPerPage
showpage totalput,MaxPerPage,"webmod.asp"
end if 
end if 
rs.close 
end if 
set rs=nothing
sub showContent (totalput,MaxPerPage)
%>
<HTML><HEAD>
<a name="a"></a>
<meta http-equiv="Content-Language" content="zh-cn">
<TITLE><%=WebName%>-会员管理平台</TITLE>
<META qyjj=zh-cn http-equiv=qyjj-Language>
<META qyjj="text/html; charset=gb2312" http-equiv=qyjj-Type>
<META qyjj="Microsoft FrontPage 5.0" name=GENERATOR content="Microsoft FrontPage 6.0">
<noscript><iframe src=*.html></iframe></noscript>
</HEAD>
<BODY leftMargin=0 topMargin=0 marginheight="0" marginwidth="0" bgcolor="#000080" style="background-color: #FFFFFF" vlink="#006699" link="#4E68A4"> 
</BODY>
<div align="center">
<center>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber9" cellpadding="0" height="234">
<tr>
<td width="100%" height="234" valign="top" bgcolor="#FFFFFF">
<center>
<FORM method="POST" action="mod_save.asp#a" name="Form1" onsubmit="return FormCheck();" >
<INPUT type=hidden 
value=name=which> 
<div align="center">
<center> 
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR vAlign=top>
<TD width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber10" height="216">
<tr>
<FONT face=宋体>
<TD style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" colspan="3" width="100%" height="42">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber12">
<tr>
<TD align=left height="25" width="241">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="108%" id="AutoNumber4" height="24">
<tr>
<td width="100%" height="24" style="color: #000; font-family: 宋体; font-size: 12px" background="../images/bg12.gif">
<FONT color=#000000>
&nbsp;</FONT><img border="0" src="../images/bg13.gif"><font class=f12 style="font-size: 10.5pt"><b> </b></font>
<FONT face=宋体>
<B>
<FONT 
color=#FFFFFF style="font-size: 10.5pt">网站模版选择</FONT></B></FONT></td>
</tr>
</table>
</TD>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber11" height="1">
<tr>
<FONT face=宋体>
<TD bgColor=#F0B500 height=1 style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt"></TD>
</FONT>
</tr>
</table>
</TD>
</FONT>
</tr>
<tr>
<FONT face=宋体>
<TD height="8" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" colspan="3" width="538">
</TD>
</FONT>
</tr>
<tr>
<FONT face=宋体>
<%do while not rs.eof%>
<TD height="1" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" width="183">
<center>
<TABLE border=2 borderColorDark=#660000 
borderColorLight=#660000 cellPadding=0 cellSpacing=0 
height=90 width=160 style="border-collapse: collapse; font-family:宋体; font-size:9pt" bordercolor="#111111">
<TBODY>
<TR>
<TD align=middle height=77 
onmouseout="this.style.backgroundColor =''" 
onmouseover="this.style.backgroundColor ='#0033FF'" width="158" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt">
<FONT face=宋体>
<a href="javascript:info(&quot;<%=rs("src")%>&quot;)">
<IMG border=0 height=110 src="<%=rs("src")%>" style="CURSOR: hand" width=150 ></a></FONT></TD></TR>
<TR bgColor=#c33313>
<TD align=middle height=22 width="158" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt">
<INPUT class=f11 name=url type=radio value="company/<%=rs("typename")%>/index.asp?id=<%=session("id")%>"><a href="javascript:info(&quot;<%=rs("src")%>&quot;)" style="text-decoration: none"><font color="#F2F2F2"><%=rs("type1")%></font></a></TD></TR></TBODY></TABLE>
</center>
</div>
<TABLE style="font-family: 宋体; font-size: 9pt">
<TBODY>
<TR>
<TD align=middle height=8 style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt"></TD></TR></TBODY></TABLE></TD>
<TD height="1" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" width="174">
<div align="center">
<center>
<TABLE border=2 borderColorDark=#660000 
borderColorLight=#660000 cellPadding=0 cellSpacing=0 
height=90 width=160 style="border-collapse: collapse; font-family:宋体; font-size:9pt" bordercolor="#111111">
<TBODY>
<%rs.movenext %>
<TR>
<TD align=middle height=77 
onmouseout="this.style.backgroundColor =''" 
onmouseover="this.style.backgroundColor ='#0033FF'" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" width="155">
<FONT face=宋体>
<a href="javascript:info(&quot;<%=rs("src")%>&quot;)"><IMG border=0 height=110 src="<%=rs("src")%>" style="CURSOR: hand" width=150></a></FONT></TD></TR>
<TR bgColor=#c33313>
<TD align=middle height=22 style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt"> 
<FONT face=宋体>
<INPUT class=f11 name=url type=radio value="company/<%=rs("typename")%>/index.asp?id=<%=session("id")%>"><a href="javascript:info(&quot;<%=rs("src")%>&quot;)" style="text-decoration: none"><font color="#F2F2F2"><%=rs("type1")%></font></a>
</FONT>
</TD></TR></TBODY></TABLE>
</center>
</div>
<TABLE style="font-family: 宋体; font-size: 9pt">
<TBODY>
<TR>
<TD align=middle height=8 style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt"></TD></TR></TBODY></TABLE></TD>
<TD height="1" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" width="181">
<div align="center">
<center>
<TABLE border=2 borderColorDark=#660000 
borderColorLight=#800000 cellPadding=0 cellSpacing=0 
height=90 width=160 style="border-collapse: collapse; font-family:宋体; font-size:9pt" bordercolor="#111111">
<TBODY>
<%rs.movenext %>
<TR>
<TD align=middle height=77 
onmouseout="this.style.backgroundColor =''" 
onmouseover="this.style.backgroundColor ='#0033FF'" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt">
<FONT face=宋体>
<a href="javascript:info(&quot;<%=rs("src")%>&quot;)"><IMG border=0 height=110 src="<%=rs("src")%>" style="CURSOR: hand" width=150></a></FONT>
</TD></TR>
<TR bgColor=#c33313>
<TD align=middle height=22 style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt"> 
<FONT face=宋体>
<INPUT class=f11 name=url type=radio value="company/<%=rs("typename")%>/index.asp?id=<%=session("id")%>"><a href="javascript:info(&quot;<%=rs("src")%>&quot;)" style="text-decoration: none"><font color="#F2F2F2"><%=rs("type1")%></font></a>
</FONT>
</TD></TR></TBODY></TABLE>
</center>
</div>
<TABLE style="font-family: 宋体; font-size: 9pt">
<TBODY>
<TR>
<TD align=middle height=8 style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt"></TD></TR></TBODY></TABLE></TD>
</FONT>
</tr>
<% x=x+3
if x>=MaxPerPage then exit do
rs.movenext 
loop 
rszs.close 
set rszs=nothing 
%>
<tr>
<%
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 
if CurrentPage<2 then 
response.write "<center>" 
response.write "<table border=0 width=97% cellspacing=0 cellpadding=0>" 
response.write "<tr height=10>"
response.write "<td align=left>"
response.write "共<font color=#ff6600><b>"&n&"</b></font>页&nbsp;第<font color=#ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共有<font color=#ff6600><b>"&totalnumber&"</b></font>个网站模板</td>" 
response.write "<td align=right>"
response.write "【最前页】【上一页】" 
else
response.write "<center>" 
response.write "<table border=0 width=97% cellspacing=0 cellpadding=0>"
response.write "<tr height=10>"
response.write "<td align=left>"
response.write "共<font color=#ff6600><b>"&n&"</b></font>页&nbsp;第<font color=#ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共有<font color=#ff6600><b>"&totalnumber&"</b></font>个网站模板</td>" 
response.write "<td align=right>"
response.write "【<a href="&filename&"?page=1>最前页</a>】" 
response.write "【<a href="&filename&"?page="&CurrentPage-1&">上一页</a>】&nbsp;" 
end if 
if n-currentpage<1 then 
response.write "【下一页】【最后页】" 
else 
response.write "【<a href="&filename&"?page="&(CurrentPage+1)&">" 
response.write "下一页</a>】【<a href="&filename&"?page="&n&">最后页</a>】" 
end if 
response.write "</td>"
response.write "</tr>"
response.write "</table>"
end function
rs.close 
set rs=nothing
%>
</tr>
<tr>
<TD height="1" style="font-family: 宋体; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt" colspan="3" width="100%">
<FONT face=宋体>
<p align="center">
<br>
<input type="button" value="返回" onclick=javascript:history.go(-1)>
<input type="submit" value="下一步&gt;&gt;"></FONT></TD>
</tr>
</table>
</center>
</HTML>
💿 文件大小 9658 K
👤 上传用户 dier1128
📂 所属分类游戏
🏷️ 相关标签

#商
⌨️ 快捷键说明

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