Web Wiz - Green Windows Web Hosting

  New Posts New Posts RSS Feed - integratrating with eprocessingnetwork
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

integratrating with eprocessingnetwork

 Post Reply Post Reply
Author
payal View Drop Down
Newbie
Newbie


Joined: 21 April 2005
Status: Offline
Points: 1
Post Options Post Options   Thanks (0) Thanks(0)   Quote payal Quote  Post ReplyReply Direct Link To This Post Topic: integratrating with eprocessingnetwork
    Posted: 21 April 2005 at 11:46pm
hi,
 
I m integrating my website with the eProcessingNetwork Transparent Database Engine payment gateway for the transactions.
I have this code which is running fine and giving the desired result on some other server which is supporting asp.net. But the problem is when i try to run the same code on my site which is hosted by mydiscountasp.net, then it is giving me problem and end result is coming html wrapped format which is wrong. The code which i m running is below. Please help me out in integrating my website with the eprocessing payment gateway.
 
Code ::::
   Response.Buffer = True
                &nbs p;        Dim sRemoteURL, sResponse, sApproval As String
                &nbs p;        dim abc as string
                &nbs p;        Dim iPosition, iAvsLength As Integer
                &nbs p;        Try
                &nbs p;            Dim xmlhttp = CreateObject("Microsoft.XMLHTTP")
                &nbs p;        
                &nbs p;            sRemoteURL = "https://www.eProcessingNetwork.Com/cgi-bin/tdbe/transact.pl"
                &nbs p;            xmlhttp.open("POST", sRemoteURL, False)
                &nbs p;        
                &nbs p;        
                &nbs p;           sResponse = xmlhttp.responseText
                &nbs p;           response.write(sResponse)
                &nbs p;                        &nbs p;                        &nbs p;          
                &nbs p;          Dim stre() As String = Regex.Split(xmlhttp.responseText, ",")
                &nbs p;             abc=stre(0)
                &nbs p;             response.write(abc)
                &nbs p;             sApproval = mid(abc,instr(abc,"""")+1,1)
                &nbs p;                        &nbs p;        
                &nbs p;           If sApproval = "Y" Then
        Session("Approval")="Y"
       
                &nbs p;               
                &nbs p;            ElseIf sApproval = "U" Then
                &nbs p;            Session("Approval")="U"
                &nbs p;            Session("DisplayMessage") = "The processor was unable to handle your " & _
                &nbs p;                   "transaction, having returned the following response:" & sResponse & "
                &nbs p;            Else
                &nbs p;            Session("Approval")="N"
                &nbs p;             Session("DisplayMessage")= "Your transaction has been declined with the " & _
                &nbs p;                   "following response: &  stre(0)  & "
                &nbs p;            End If
                &nbs p;            xmlhttp = Nothing
                &nbs p;            Response.Redirect("PaymentInfo.aspx")
                &nbs p;        Catch
                &nbs p;            Response.Write(Err.Description)
                &nbs p;
Back to Top
 Post Reply Post Reply

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.08
Copyright ©2001-2026 Web Wiz Ltd.


Become a Fan on Facebook Follow us on X Connect with us on LinkedIn Web Wiz Blogs
About Web Wiz | Contact Web Wiz | Terms & Conditions | Cookies | Privacy Notice

Web Wiz is the trading name of Web Wiz Ltd. Company registration No. 05977755. Registered in England and Wales.
Registered office: Web Wiz Ltd, Unit 18, The Glenmore Centre, Fancy Road, Poole, Dorset, BH12 4FB, UK.

Prices exclude VAT at 20% unless otherwise stated. VAT No. GB988999105 - $, € prices shown as a guideline only.

Copyright ©2001-2026 Web Wiz Ltd. All rights reserved.