<%option explicit%> <% '****************************************************** ' VP-ASP 4.0 ' Administration Display Orders '****************************************************** dim myconn ShopCheckAdmin "shopa_displayorders.asp" AdminPageHeader ' Normal page header Openorderdb myconn oid=request.querystring("OID") Response.write tableDef Response.write tablecolumn response.write "" & LangEditOrder & "" Response.write tablecolumnend Response.write tablecolumn response.write "  " & LangOrderItems & "" Response.write tablecolumnend If getconfig("xtracking")="Yes" then Response.write tablecolumn response.write "  " & LangTracking & "" Response.write tablecolumnend end if response.write tabledefend ShopFormatOrder myconn, Oid, "Admin" If getconfig("xtracking")="Yes" then ShopFormatTracking myconn, Oid, "Admin" end if AdminPageTrailer ' Normal Shop page trailer shopclosedatabase myconn %>