Solved

Authorize.net

Posted on 2006-07-04
5
537 Views
Last Modified: 2013-11-29
I am trying to implement authorize.net in my VB6 Application.  Its a really simple app so I just want to add the ability to use the program to make a payment.  I already have a server setup that listens to this client and I can add funds to the account.  Its a Matter I guess of taking the ASP version and converting it somehow to  A VB form.  If anyone is familiar with this or how this would be done let me know.  I have the asp script if you want it it's readily available for download from Authorize.net

thanks.

Stephen
0
Comment
Question by:scogger1974
  • 3
  • 2
5 Comments
 
LVL 28

Expert Comment

by:AzraSound
ID: 17053019
I did something for Authorize.net using ASP some time ago...but it's a little hazy.  Can you post the ASP code here to refresh my memory and give me an idea of what needs to be done to port it to VB?
0
 
LVL 1

Author Comment

by:scogger1974
ID: 17055429
Yeah I will Link it here because they gave me 4 files.  Since I'm not too familiar with ASP I will link them all on my companies web site

http://www.offenbachers.com/sim.asp
http://www.offenbachers.com/simdata.asp
http://www.offenbachers.com/md5.asp
http://www.offenbachers.com/simlib.asp

There.. thanks..

Stephen
0
 
LVL 28

Accepted Solution

by:
AzraSound earned 500 total points
ID: 17058491
Hmm, doesn't refresh my memory much.  I remember they provided a pdf document with all of the data you could post to their gateway.  Essentially, from VB, you just need to post the necessary data and get the reply, e.g.,

Go to Project -> References and select Microsoft XML, vX.0 (whatever the latest version you have is)


Then do something like:


Dim xmlPostData As New MSXML2.XMLHTTP

xmlPostData.Open "POST", "https://secure.authorize.net/gateway/transact.dll", False
xmlPostData.setRequestHeader "Content-type", "application/x-www-form-urlencoded"
xmlPostData.send "x_type=AUTH_CAPTURE&x_method=CC&x_Amount=5.50"
MsgBox "Reply from server:" & vbCrLf & xmlPostData.responseText


You just need to determine what all variables you need to send in the "send" method above, and then parse the responseText to determine if the transaction was successful or not.
0
 
LVL 1

Author Comment

by:scogger1974
ID: 17058554
Thanks That was basically the answer I was looking for .. tested the code and it worked.. I really appreciate it..

Stephen
0
 
LVL 28

Expert Comment

by:AzraSound
ID: 17058584
No problem, glad I could help...
0

Featured Post

Gigs: Get Your Project Delivered by an Expert

Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Specific format 21 196
VBA filters 2 58
Add and format columns in vb6 7 55
Does barcode reader require a specific font installed? 2 26
When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't interesteā€¦
I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process fromā€¦
This tutorial demonstrates a quick way of adding group price to multiple Magento products.

816 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now