<% '****************************************************************************************************************** 'System Name : ELIS Ver 1.0 '****************************************************************************************************************** 'File Name : order_m.asp 'File Description : ELIS Main Summary 'Developer : Taejin Kwon 'Date : 7/10/2009 'Modifier(Date) : None '****************************************************************************************************************** Dim G_MENU G_MENU = "ORDERS" %> <%Call SubGlobalMenu() %>

<% CALL subTabIndexLink("ORDERS") %>

<% CALL subTopMenu() %>

Orders Detail

<% Dim order_cd order_cd = Trim(Request("order_cd")) Dim iPage, IsSearch iPage = Trim(Request("iPage")) IsSearch = Trim(Request("IsSearch")) Dim getTrade Set getTrade = funcGetRsOrderMain(objQuery, order_cd) Dim i %> <%'Start ========================================================================================================================%> Order Number : <%=order_cd%> Order Date/Time : <%=getTrade("insert_date")%> Status : selected<%End IF%>>¿¹¾àÁ¢¼ö selected<%End IF%>>ÇöÀç ó¸®Áß selected<%End IF%>>󸮿Ϸá selected<%End IF%>>¿¹¾àÃë¼Ò Payment : selected<%End IF%>>°áÁ¦ ´ë±âÁß selected<%End IF%>>°áÁ¦ ¿Ï·á      Paid Amount ($) " style="text-align:right;"> <% Dim rsCart, ix Set rsCart = funcGetOrderItemsInfo(objQuery, order_cd) Dim rsProd, opt Dim icon_imgType Dim optionArr, tprice Dim cart_cnt, total_buy_price, totalM cart_cnt = 0 '//»óÇ° Ç°¸ñ °³¼ö total_buy_price = 0 '//Ãѱ¸¸Å ±Ý¾× ix = 0 Do Until rsCart.eof ix = ix + 1 Set rsProd = funcGetCartPordInfo(objQuery, rsCart("prod_cd")) '//»óÇ°Á¤º¸ IF rsProd.EOF = False AND rsProd.BOF = False Then %> <%IF cdbl(rsCart("curr_price")) > 0 Then%> <%Else%> <%End iF%> <% End IF rsProd.close Set rsProd = Nothing rsCart.movenext Loop rsCart.close Set rsCart = Nothing %> #Item ¿©Çà»óÇ° »óÇ°°¡ Àοø Ãâ¹ß¿¹Á¤ÀÏ <%=ix%> <%=rsProd("prod_name")%> $ <%=PriceFormat(rsCart("curr_price"))%> ¹®Àǹٶ÷ <%=rsCart("option2")%> <%=rsCart("option1")%> * E-mail <%=getTrade("email")%> * À̸§ (ÇѱÛ) <%=getTrade("Nick_Name")%> * À̸§ (¿µ¹®) <%=getTrade("name_first")%> <%=getTrade("name_mid")%> <%=getTrade("name_last")%> ÁÖ¼Ò1 <%=getTrade("adr1")%> ÁÖ¼Ò2 <%=getTrade("adr2")%> City <%=getTrade("city")%> State/ Zip <%=getTrade("state")%>, <%=getTrade("zip")%> Country <%=getTrade("country")%> ÀüÈ­¹øÈ£ <%=getTrade("tel_1")%>-<%=getTrade("tel_2")%>-<%=getTrade("tel_3")%> °í°´¸Þ¸ð <%=replace(getTrade("comment"), chr(10), " ") %> °ü¸®ÀÚ¸Þ¸ð <%=getTrade("admin_comment")%> <% getTrade.close Set getTrade = Nothing %> <%'End =========================================================================================================================%>