<%@language=vbscript%> <% If (session("TRACKING_ID_CONFIRM") = Session("ArtistPaymentTrackingId")) And (Session("ArtistPaymentTrackingId") <> "") Then ' ** if this page is refreshed then to prevent Duplication Session("NonSecureURL") = "/artist/artisthome.asp" session("TRACKING_ID_CONFIRM") = "" Session("ArtistPaymentTrackingId") = "" Response.Redirect "/artist/payment/sns.asp" Response.end End If Dim totalstring Dim objTxn Set objTxn = Server.CreateObject("ArtistPayment.CTransaction") If Request.QueryString("TrackingId") = "" Then 'payment through surepay sTrackingID = Request.QueryString("transactionID") 'return from surepay gateway objTxn.InsertTxnLog CStr(sTrackingID) , Date() , CDbl(Session("amount")) , "success", 0, "", "", "", "", "", "", "", "", "", "", "", "", "credit card", session("payuserno") Else sTrackingID = Request.QueryString("TrackingId") 'return from payseal(ICICI) gateway objTxn.InsertTxnLog CStr(TRACKING_ID) , Request("TxnDateTime") , CDbl(trim(Request("PurchaseAmount"))) , Request("Status"), Request("TransactionNo"), Request("ReceiptNo"), Request("QSIResponseCode"), Request("AcqResponseCode"), Request("Locale"), "", "", Request("MerchantID"), "", "", "", "", "", "credit card", session("payuserno") End If 'totalstring = objTxn.GetUserDetails(5) totalstring = objTxn.GetUserDetails(CInt(session("payuserno"))) Set objTxn = Nothing Session("ArtistPaymentTrackingId")= TRACKING_ID Session("TRACKING_ID_CONFIRM") = Session("ArtistPaymentTrackingId") Dim userArray userArray = Array() userArray = Split(totalstring, "\t") Dim name, address, paymenttype, curr, amount, events name = userArray(0) & " " & userArray(1) address = userArray(2) & ", " If (userArray(3) <> "") Then address = address & userArray(3) & ", " If (userArray(4) <> "") Then address = address & userArray(4) & ", " address = address & userArray(5) & ", " & userArray(6) & ", " & userArray(7) & ", " & userArray(8) paymenttype = "Credit Card" curr = userArray(11) amount = userArray(9) events = userArray(10) %>

Payment Confirmation Thank you for your payment. Please print this page as record of your payment confirmation. The receipt of payment will be mailed to you as soon as your payment is credited. Name: <%=name%>Surendra Chaurasiya Billing Address: <%=address%>Celcius Technologies Pvt. Ltd., Plot G, Block GP, Sector 5, Salt Lake Electronics Complex, Kolkata - 700091. India. Date of Order <%=formatdatetime(Date(),vbShortDate)%>06/26/2002 DD/MM/YYYY Payment made for article: <%=events%>Chirantan Rabindra Rachanaabali Compact Disc (CD-ROM - 1 No.) Amount Payable: <%=curr%> <%=amount%>INR 950.00 + Bank Clearing Charges Payment Mode: <%=paymenttype%>Credit Card Amount payable by credit card.