query.asp

电子商城代码

<!--#include file="top.asp"-->
<%
'on error resume next
Dim order_number,order_1,order_2,rs2
order_number=safereplace(request("order_number"))
strwebtitle=www56770com_word355
response.write c_skin_56770(c_skin_word(skin_head))
topmenu()
%>
<table width="<%=webwidth%>" border=0 cellpadding=0 cellspacing=0 align="center">
<TR>
<td valign="top">
<table width="98%" border=0 cellpadding=0 cellspacing=0 align="center">
<TR>
<td valign="top">
<%
sql="select * from [56770_orders] where order_number='"&order_number&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql, conn, 1, 1
if rs.eof Then
        response.write"<meta http-equiv=refresh content=5;url=javascript:history.go(-1)>"
        tl=www56770com_word355
        mes="路"&www56770com_word256&""
        mes=mes&"<br><br>路<a href='javascript:history.go(-1)'><img border=0 src=images/re.gif align=absmiddle>"&www56770com_word345&"</a>"
		mes=mes&"<br><br>"&loading&""
        call sendinfo(tl,mes)
else
%>
<table width="100%" cellpadding="0" cellspacing="1" align="center" CLASS="bk">
<tr class="bk_h">
<td height="25"><%=www56770com_word141%></td><td><%=order_number%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" width="21%" class="bg_l"><%=www56770com_word258%></td>
<td height="25">
<%=www56770com_word259%><input type=checkbox <%if Instr(rs("orderzt"), 1)>0 then response.write"checked disabled" end if%>>
<%=www56770com_word260%><input type=checkbox <%if Instr(rs("orderzt"), 2)>0 then response.write"checked disabled" end if%>>
<%=www56770com_word261%><input type=checkbox <%if Instr(rs("orderzt"), 3)>0 then response.write"checked disabled" end if%>>
<%=www56770com_word262%><input type=checkbox <%if Instr(rs("orderzt"), 4)>0 then response.write"checked disabled" end if%>>
<%=www56770com_word263%><input type=checkbox <%if Instr(rs("orderzt"), 5)>0 then response.write"checked disabled" end if%>>  
</td>
</tr>
<tr class=bg_l>
<td colspan="2" height="25" align=right>
<%if rs("hg")=0 then%><%=www56770com_word264%>锛