<% memberid = CheckUserID() if memberid = 0 then Response.Redirect userLogin end if Set cnConn = Server.CreateObject("ADODB.Connection") Set rsTable = Server.CreateObject("ADODB.Recordset") cnConn.Open strCONNECT %>

会员功能 <%= ShowUserMenu()%>  软件搜索

您的位置：首页＞免费软件＞我的刻录光盘 <%= actMsg%> <% strSql = "SELECT * FROM orders,order_pay,order_ship,order_status WHERE opay=opid AND oship=ohid AND ostatus=osid AND ouser="&memberid rsTable.Open strSql,cnConn while not rsTable.EOF Response.Write "" rsTable.MoveNext wend rsTable.Close %>  我的全部刻录光盘 "&rsTable("otitle")&" "&rsTable("owhen")&" "&rsTable("opname")&" "&rsTable("ohname")&" "&rsTable("osname")&"

<% cnConn.Close Set cnConn=Nothing Set rsTable=Nothing %>