View Full Version : CCICharge and Bank Of Amerca Gateway
myUserName
10-03-2004, 09:28 AM
Has anyone used the ICharge component with the Bank of America Gateway sucessfully? I tried using the simple sample from the knowledge base but am not receiving any responses (ResponseCode, ResponseText, TransactionApproved, etc.)
Any suggestions are greatly appreciated.
myUserName
10-05-2004, 01:40 AM
Here's the code that get's me the error:
Protected FullContact1 As New FullContact
Protected CreditCardControl1 As New CreditCardControl
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
If Not IsPostBack Then
FullContact1.ContactName.FirstName = "Some"
FullContact1.ContactName.LastName = "Body"
FullContact1.ContactAddress.Address1 = "123 Rodeo"
FullContact1.ContactAddress.City = "Beverly Hills"
FullContact1.ContactAddress.State = "CA"
FullContact1.ContactAddress.PostalCode = "90210"
FullContact1.ContactPhone.HomePhone = "800-555-1212"
CreditCardControl1.AccountNumber = "333277209693003"
CreditCardControl1.ExpiryMonth = "05"
CreditCardControl1.ExpiryYear = "04"
txtAmount.Text = 1
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim chargeIt As New nsoftware.IPWorksCC.Icharge
chargeIt.Gateway = nsoftware.IPWorksCC.IchargeGateways.gwBankOfAmeric a
chargeIt.AddSpecialField("ecom_payment_card_name", FullContact1.ContactName.FirstName & " " & _
FullContact1.ContactName.LastName)
chargeIt.Config("referer=https://mysecure.domain.com")
chargeIt.MerchantLogin = "myLogin"
chargeIt.MerchantPassword = "myPassword"
chargeIt.CardNumber = CType(CreditCardControl1.AccountNumber, String)
chargeIt.CardExpMonth = CType(CreditCardControl1.ExpiryMonth, String)
chargeIt.CardExpYear = CType(CreditCardControl1.ExpiryYear, String)
chargeIt.TransactionAmount = CInt(txtAmount.Text.Trim)
chargeIt.CustomerFirstName = CType(FullContact1.ContactName.FirstName, String)
chargeIt.CustomerLastName = CType(FullContact1.ContactName.LastName, String)
chargeIt.CustomerAddress = CType(FullContact1.ContactAddress.Address1, String)
chargeIt.CustomerCity = CType(FullContact1.ContactAddress.City, String)
chargeIt.CustomerState = CType(FullContact1.ContactAddress.State, String)
chargeIt.CustomerZip = CType(FullContact1.ContactAddress.PostalCode, String)
chargeIt.CustomerCountry = CType(FullContact1.ContactAddress.Country, String)
chargeIt.Authorize()
'If chargeIt.TransactionApproved Then
' lblWaiver.Text = "approved" & chargeIt.ResponseText
'Else
' lblWaiver.Text = "Declined: " & chargeIt.ResponseText
'End If
lblWaiver.Text = chargeIt.ResponseCode
'Label1.Text = chargeIt.TransactionApproved.ToString
End Sub
End Class
myUserName
10-05-2004, 10:20 AM
Actually I get an object moved error.
[b]quote:Originally posted by myUserName
Has anyone used the ICharge component with the Bank of America Gateway sucessfully? I tried using the simple sample from the knowledge base but am not receiving any responses (ResponseCode, ResponseText, TransactionApproved, etc.)
Any suggestions are greatly appreciated.
</blockquote id="quote"></font id="quote">
bruce
10-05-2004, 11:30 AM
Object Moved?? This is weird!!!
Can you post the code snippet?
[b]quote:Originally posted by myUserName
Actually I get an object moved error.
[b]quote:Originally posted by myUserName
Has anyone used the ICharge component with the Bank of America Gateway sucessfully? I tried using the simple sample from the knowledge base but am not receiving any responses (ResponseCode, ResponseText, TransactionApproved, etc.)
Any suggestions are greatly appreciated.
</blockquote id="quote"></font id="quote">
</blockquote id="quote"></font id="quote">
B.
DiscountASP.NET
http://www.DiscountASP.NET
myUserName
10-13-2004, 01:20 AM
This code also gives the object moved error. Any thoughts?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Icharge1.Gateway = nsoftware.IPWorksCC.IchargeGateways.gwBankOfAmeric a
Icharge1.AddSpecialField("ioc_merchant_id", "myStore")
Icharge1.CardNumber = "4444333322221111"
Icharge1.MerchantLogin = "myLogin"
Icharge1.MerchantPassword = "myPassword"
Icharge1.TransactionAmount = "1.00"
Icharge1.CardExpMonth = "01"
Icharge1.CardExpYear = "06"
Icharge1.CustomerAddress = "123 Nowhere Ln."
Icharge1.CustomerZip = "90210"
Icharge1.CustomerCountry = "US"
Icharge1.CustomerEmail = "x@y.com"
Icharge1.CustomerFirstName = "John"
Icharge1.CustomerLastName = "Smith"
Icharge1.Config("referer=https://secure.mydomain.com/")
Icharge1.AddSpecialField("ecom_payment_card_name", "John CardName")
Icharge1.TransactionType = nsoftware.IPWorksCC.IchargeTransactionTypes.ttAuth Only
Icharge1.Authorize()
'Response.Buffer = True
Response.Write(Icharge1.ResponseText)
End Sub
vBulletin® ©Jelsoft Enterprises Ltd.