user_orders.asp

漂亮的企业网站系统v11 1、整体修改了上一版的一些BUG。 2、修改了页面底部的统计形式。 3、修改了“公告更新”栏目

<!-- #include file="include/config_user.asp" -->
<!-- #include file="include/jk_ubb.asp" -->
<!-- #include file="include/conn.asp" -->
<%
tit=tit_fir&"（"&login_username&"）"
tit_fir=""

call web_head(0,0,0,0,0)
if login_mode="" then
  set rs=nothing
  call close_conn()
  response.redirect "login.asp"
  response.end
end if
'------------------------------------left----------------------------------
call left_user()
'----------------------------------left end--------------------------------
call web_center(0)
response.write ukong&table1
%>
<tr<%response.write table2%>><td class=end>&nbsp;<%response.write img_small(us)%>&nbsp;&nbsp;<b>查看我的相关信息</b></td></tr>
<tr<%response.write table3%>><td align=center height=30>
<%response.write img_small("jt12")%><a href='user_putview.asp?action=news'<%if action="news" then response.write "class=red_3"%>>查看新闻</a>
<%response.write img_small("jt12")%><a href='user_putview.asp?action=article'<%if action="article" then response.write "class=red_3"%>>查看文章</a>
<%response.write img_small("jt12")%><a href='user_putview.asp?action=video'<%if action="video" then response.write "class=red_3"%>>查看影片</a>
<%response.write img_small("jt12")%><a href='user_putview.asp?action=down'<%if action="down" then response.write "class=red_3"%>>查看软件</a>
<%response.write img_small("jt12")%><a href='user_putview.asp?action=gallery'<%if action="gallery" then response.write "class=red_3"%>>查看图片</a>
<%response.write img_small("jt12")%><a href='user_orders.asp'>我的订单</a>
</td></tr>
</table>
<%
'-----------------------------------center---------------------------------
call user_orders()

'---------------------------------center end-------------------------------
sub user_orders()
if login_username<>"" then
    sql="select * from orders where username='"&login_username&"' order by id desc"
    set rs=conn.execute(sql)
	if rs.eof and rs.bof then
	   response.write"对不起，没有找到您的定单记录！"
	   else
	   dim wh
	   wh="white"
       response.write kong&table1
    response.write"<tr "&table2&" align=center><td width='5%'><font color="&wh&">序号</font></td>"
    response.write"<td><font color="&wh&">订单号</font></td>"
    response.write"<td><font color="&wh&">付款方式</font></td>"
    response.write"<td><font color="&wh&">提交时间</font></td></tr>"
  i=1
  do while not rs.eof
    response.write"<tr "&table3&" align=center><td>"&i&"</td>"
    response.write"<td><a href=shop_order.asp?uurl=order&ordernum="&rs("ordernum")&">"&rs("ordernum")&"</a></td>"
    response.write"<td>"&rs("payment")&"</td>"
    response.write"<td>"&rs("tim")&"</td></tr>"
  i=i+1
  rs.movenext
  loop
response.write"</table><br><br><center><font color=red>点击订单号查看相应的详细信息！</font></center>"
end if
  rs.close:set rs=nothing
else
response.write"您的登陆可能已超时，请重新登陆！"
end if
end sub
call web_end(0)

%>