how can i integrate with eProcessingNetwork Transparent Database Engine payment processing

Discussion in 'General troubleshooting' started by nittin2479, Apr 19, 2005.

  1. hi,

    I m integratingmy 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
    Dim sRemoteURL, sResponse, sApproval As String
    dim abc as string
    Dim iPosition, iAvsLength As Integer
    Try
    Dim xmlhttp = CreateObject("Microsoft.XMLHTTP")

    sRemoteURL = "https://www.eProcessingNetwork.Com/cgi-bin/tdbe/transact.pl"
    xmlhttp.open("POST", sRemoteURL, False)


    sResponse = xmlhttp.responseText
    response.write(sResponse)

    Dim stre() As String = Regex.Split(xmlhttp.responseText, ",")
    abc=stre(0)
    response.write(abc)
    sApproval = mid(abc,instr(abc,"""")+1,1)

    If sApproval = "Y" Then
    Session("Approval")="Y"


    ElseIf sApproval = "U" Then
    Session("Approval")="U"
    Session("DisplayMessage") = "The processor was unable to handle your " & _
    "transaction, having returned the following response:" & sResponse & "
    Else
    Session("Approval")="N"
    Session("DisplayMessage")= "Your transaction has been declined with the " & _
    "following response: & stre(0) & "
    End If
    xmlhttp = Nothing
    Response.Redirect("PaymentInfo.aspx")
    Catch
    Response.Write(Err.Description)
    End Try

    Thanks,
    Nitin
     

Share This Page