?? productclass2.asp
字號(hào):
<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="conn.asp" -->
<%
'##############################################################
'##【深圳 超市網(wǎng)網(wǎng)站系統(tǒng) v2.0】 ##
'##程序語(yǔ)言：ASP、SQL、VBScript、JavaScript、HTML。 ##
'##數(shù) 據(jù) 庫(kù)：Microsoft Access2000。 ##
'##運(yùn)行環(huán)境：WIN98+PWS、WIN2000/XP+IIS等支持ASP+ACCESS空間。 ##
'##1、本程序所有版權(quán)歸深圳市玉龍網(wǎng)絡(luò)技術(shù)有限公司所有。 ##
'##2、任何人未經(jīng)本公司同意與書面授權(quán)不得使用本程序或?qū)⒈境? ##
'## 序復(fù)制、發(fā)送給他人或提供下載。
'##3、經(jīng)本公司書面授權(quán)后您可以擁有本套系統(tǒng)的二次開發(fā)權(quán)利 ##
'## 但不可以把本系統(tǒng)來(lái)進(jìn)行二次轉(zhuǎn)讓、出售或以任何方式在網(wǎng)上 ##
'## 傳播。必須保證本系統(tǒng)源碼不能泄露給第三方或任何變相盜用 ##
'##4、如果你未遵守上述事項(xiàng)，由此帶來(lái)的后果和損失自負(fù)同時(shí)本公 ##
'## 司將依法追究相關(guān)的法律責(zé)任。 ##
'##5、請(qǐng)保留以上的版權(quán)信息，此項(xiàng)不會(huì)對(duì)本站程序有任何影響。 ##
'##############################################################
ProductClass_1=request("ProductClass_1")
ProductClass_1=FomaID(ProductClass_1)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<STYLE>BODY {
FONT-SIZE: 9pt
}
TD {
FONT-SIZE: 9pt
}
A {
TEXT-DECORATION: none
}
a:link { color: #000000; text-decoration: none}
a:visited { color:#000000; text-decoration: none}
a:hover { color: #CC0000; text-decoration: none; position: relative; right: 0px; top: 1px }
</STYLE>
<SCRIPT language=JavaScript>
<!--
function openbag(url,name){
window.open(url,name,"height=200,width=600,left=190,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no")}
-->
</SCRIPT>
<SCRIPT language=javascript>
<!--
function isok(theform)
{
if (theform.uid.value=="")
{
alert("會(huì)員帳號(hào)不能為空！");
theform.uid.focus();
return (false);
}
if (theform.pwd.value=="")
{
alert("對(duì)不起!密碼不能為空！");
theform.pwd.focus();
return (false);
}
return (true);
}
-->
</SCRIPT>
<title>產(chǎn)品分類</title>
</head>
<body leftmargin="0" topmargin="0">
<!--#include file="top.asp" -->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from Product Where Class_1='"& ProductClass_1 &"' order by id desc"
rs.open sqltext,conn,1,1
dim MaxPerPage
MaxPerPage=24
dim text,checkpage
text="0123456789"
Rs.PageSize=MaxPerPage
for i=1 to len(request("page"))
checkpage=instr(1,text,mid(request("page"),i,1))
if checkpage=0 then
exit for
end if
next
If checkpage<>0 then
If NOT IsEmpty(request("page")) Then
CurrentPage=Cint(request("page"))
If CurrentPage < 1 Then CurrentPage = 1
If CurrentPage > Rs.PageCount Then CurrentPage = Rs.PageCount
Else
CurrentPage= 1
End If
If not Rs.eof Then Rs.AbsolutePage = CurrentPage end if
Else
CurrentPage=1
End if
%>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="778" height="80" background="IMAGES/bg3.gif">
<tr>
<td width="172" valign="top">
<!-- 會(huì)員登錄入口-->
<%If Session("LoginSuccess")="" Then%>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#B8A194" height="1"></td>
</tr>
<tr>
<td width="100%" height="17" valign="bottom" bgcolor="#FFDF80"> <p align="center">會(huì) 員 登 錄
</td>
</tr>
<tr>
<td> <div align="center">
<center>
<table width="95%" border="0" cellpadding="4" cellspacing="3">
<form action=user/ReLoginCheck.asp method=post onSubmit="return isok(this)">
<tr>
<td> <div align="center"> 用戶:
<input type="text" name="uid" size="11">
<br>
</div></td>
</tr>
<tr>
<td><div align="center">密碼:
<input type="password" name="pwd" size="11">
</div></td>
</tr>
<tr>
<td><div align="center">
<input name="imageField" type="image" src="images/login_bt_login.gif" width="45" height="19" border="0">
<a href="newuser.asp"><img src="images/login_bt_zc.gif" width="45" height="19" border="0"></a>
</div></td>
</tr>
<tr>
<td><div align="center"><a href="#open" onClick="window.open('Fetchpsw.ASP', '', 'height=150, width=300, top=200, left=450, scrollbars=yes, resizable=1,' );">索取密碼</a>
<a href="myshop/login.asp">商家登錄</a> </div></td>
</tr>
</form>
</table>
</center>
</div></td>
</tr>
</table>
<% else%>
<!-- 會(huì)員登錄后顯示內(nèi)容-->
<table width="168" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="17" valign="bottom" bgcolor="#FFDF80"> <p align="center">會(huì) 員 信 息</td>
</tr>
<tr>
<td> <div align="center">
<center>
<table width="100%" border="0" cellpadding="4" cellspacing="4">
<tr bgcolor="#CCFFFF">
<td> <div align="center"><a href="#" onclick="window.open('user/odrsrchset.asp','','height=400,width=610,scrollbars=yes,resizable=1,top=10, left=15');">我的訂單</a></div></td>
<td> <div align="center"><a href="#" onclick="window.open('user/myinfo.asp','','height=280,width=582,scrollbars=yes,resizable=1,top=10, left=15');">統(tǒng)計(jì)信息</a></div></td>
</tr>
<tr bgcolor="#CCFFFF">
<td> <div align="center"><a href="#" onclick="window.open('user/reg.asp','','height=400,width=582,scrollbars=yes,resizable=1,top=10, left=15');">資料修改</a></div></td>
<td> <div align="center"><a href="user/loginout.asp?refe=<%=shop_name%>">退出登錄</a></div></td>
</tr>
</table>
</center>
</div></td>
</tr>
</table>
<%end if%>
<!-- 會(huì)員登錄后顯示內(nèi)容結(jié)束-->
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="145" height="3">
<tr>
<td height="3"> </td>
</tr>
</table>
</center>
</div>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -