?? e_shop.asp
字號:
<!--#include file="inc/conn.asp"-->
<%If Session("UserName")="" Then
response.redirect"Server.asp"
end if%>
<SCRIPT language=javascript>
function chkitem(str)
{
var strSource ="0123456789-";
var ch;
var i;
var temp;
for (i=0;i<=(str.length-1);i++)
{
ch = str.charAt(i);
temp = strSource.indexOf(ch);
if (temp==-1)
{
return 0;
}
}
if (strSource.indexOf(ch)==-1)
{
return 0;
}
else
{
return 1;
}
}
function FORM1_onsubmit()
{
if (chkitem(document.FORM1.Form_Id.value)==0)
{
alert("請輸入正確的訂單號碼。");
document.FORM1.Form_Id.focus();
return false;
}
}
</SCRIPT>
<!-- #include file="Inc/Head.asp" -->
<TABLE width="760" border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
<TBODY>
<TR>
<TD width=196 vAlign=top bgcolor="#FFFFFF">
<table width="92%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#f2f2f2">
<tr>
<td valign="top">
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="Img/index_01b.gif">
<TBODY>
<TR>
<TD height=15 bgcolor="#FFFFFF"></TD>
</TR>
<TR>
<TD height="26" background="Img/index_01.gif"><div align="center">會員中心</div></TD>
</TR>
<TR>
<TD height="22"> <div align="center"><a href="Manage.asp">修改會員資料</a></div></TD>
</TR>
<TR>
<TD
height=1 colspan="2"
background=img/naSzarym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height="22"> <div align="center"><a href="ManagePwd.asp">修改會員密碼</a></div></TD>
</TR>
<TR>
<TD
height=1 colspan="2"
background=img/naSzarym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height="22"><div align="center"><a href="E_shop.asp">購物訂單查詢</a></div></TD>
</TR>
<TR>
<TD
height=1 colspan="2"
background=img/naSzarym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height="22"><div align="center"><a href="NetBook.asp">站內(nèi)留言中心</a></div></TD>
</TR>
<TR>
<TD
height=1 colspan="2"
background=img/naSzarym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height="22"><div align="center"><a href="UserLogout.asp">退出會員中心</a></div></TD>
</TR>
<TR>
<TD
height=1 colspan="2"
background=img/naSzarym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
</TBODY>
</TABLE>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="Img/index_01b.gif">
<TBODY>
<TR>
<TD height=15 bgcolor="#FFFFFF"></TD>
</TR>
<TR>
<TD height="26" background="Img/index_01.gif"><div align="center">郵件列表
</div></TD>
</TR>
<TR>
<TD height="5"> </TD>
</TR>
<TR>
<form method="POST" action="chkemail.asp">
<TD vAlign=top><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25"> <div align="center">
<input name='email' type='text' value="@" size='15'>
</div></td>
</tr>
<tr>
<td height="25"><div align="center">
<input type="submit" value="訂閱" name="action">
<input type="submit" value="退訂" name="action">
</div></td>
</tr>
</table></TD>
</form>
</TR>
<TR>
<TD height="5"> </TD>
</TR>
<TR>
<TD
height=1 colspan="2"
background=img/naSzarym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
</table>
</TD>
<TD width=1 background=img/kropki_pion_naBialym.gif><IMG
height=2 src="img/1x1_pix.gif" width=1></TD>
<TD vAlign=top><TABLE width="90%" border=0 align="right" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD height=120> <div align="right">
<table width="555" height="125" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center">
<table width="75%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="5"></td>
</tr>
</table>
<table width="559" height="136" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="67" background="Img/0000.gif"> <div align="center">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="555" height="136">
<param name="movie" value="Img/32.swf">
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="Img/32.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="555" height="136"></embed></object>
</div></td>
</tr>
</table>
</div></td>
</tr>
</table>
</div></TD>
</TR>
<TR>
<TD background=img/naBialym.gif
height=1><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height=10><IMG height=1
src="img/1x1_pix.gif" width=1></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="555" border=0>
<TBODY>
<TR>
<TD height="25"><img src="Img/bgtop_21.gif" width="450" height="30"></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD background=img/naBialym.gif
height=1><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD><TABLE width=95% height="136" align="center" cellPadding=4 cellSpacing=1>
<TBODY>
<TR vAlign=top >
<TD width="100%" height="18"> <form action="orderofind.asp" method="post" name=FORM1 onsubmit="return FORM1_onsubmit()" language=javascript>
<p align="center"> <font color="#FF0000">親愛的 </font><font size="4" face="Arial"><%=Session("UserName")%></font></p>
<p style="word-spacing: 0; margin-left: 10; margin-right: 10; margin-top: 0; margin-bottom: 0" align="center">您好，下面是您已經(jīng)在本站提交的訂單。
<%rs.close%>
<%
Id=Session("UserName")
set Rs = Server.CreateObject("ADODB.recordset")
sql="select * from OrderList where UserName='"&Id&"'"
rs.open sql,conn,1,1
%>
</p>
<p align="center" style="word-spacing: 0; margin-top: 0; margin-bottom: 0">訂單詳細(xì)資料查詢，請輸入您要查詢的訂單號碼
<input type="text" name="Form_Id" size="11">
<input type="submit" value="查詢" name="B1">
</form>
<div align="center">
<TABLE cellSpacing=0 cellPadding=0 width=100%>
<TBODY>
<TR>
<TD align=middle width="100%"> <p align="center" style="word-spacing: 0; margin-top: 0; margin-bottom: 0">以下是您在本站提交的所有訂單列表</p>
<table border="0" cellpadding="2" cellspacing="1" width="100%" bgcolor="#000000">
<tr >
<td width="26%" align="center" height="20" bgcolor="#CCCCCC"><font color="#000000">訂單編號</font></td>
<td width="21%" align="center" height="20" bgcolor="#CCCCCC"><font color="#000000">客戶姓名</font></td>
<td width="53%" align="center" height="20" bgcolor="#CCCCCC"><font color="#000000">對您的訂單的處理情況</font></td>
</tr>
<% While Not rs.EOF %>
<tr >
<td width="26%" align="center" height="25" bgcolor="#FFFFFF">
<%=rs("Form_Id")%> </td>
<td width="21%" align="center" height="25" bgcolor="#FFFFFF"><%=rs("Somane")%></td>
<td width="53%" align="center" height="25" bgcolor="#FFFFFF">
<%If rs("Flag")="尚未處理" Then%>
您的款項尚未到我們的帳戶，此訂單本站尚未處理
<%else%> <font color="#FF0000">此訂單已經(jīng)發(fā)貨給您，請注意查收！</font>
<%End If%> </td>
</tr>
<%
rs.MoveNext
Wend
rs.close
%>
</table>
<%
rs.close
%> </TD>
</TR>
</TBODY>
</TABLE>
</div></TD>
</TR>
<TR vAlign=top >
<TD width="100%" height="15"> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD background=img/naBialym.gif
height=1><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD
height=45> </TD>
</TR>
</TBODY>
</TABLE> </TD>
</TR>
</TBODY>
</TABLE>
<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -