|
Rank: Starting Member
Groups: Registered
Joined: 7/7/2003
Posts: 1
Location: ,
|
I'm trying to put a "donate" button the "About..." dialog box of a free software. I tried this, but PayPal doesn't like it:
Private Sub PayPal_Click()
Dim url As String
url = "https://www.paypal.com/cgi-bin/webscr"
url = url + "?cmd=" + Chr(34) + "_xclick" + Chr(34)
url = url + "?business=" + Chr(34) + "mybusiness" + Chr(34)
url = url + "?item_name=" + Chr(34) + "DynaBits" + Chr(34)
url = url + "?item_number=" + Chr(34) + "myitem" + Chr(34)
url = url + "?no_note=" + Chr(34) + "1" + Chr(34)
url = url + "?currency_code=" + Chr(34) + "USD" + Chr(34)
url = url + "?tax=" + Chr(34) + "0" + Chr(34)
ShellExecute hwnd, "open", url, vbNullString, vbNullString, SW_NORMAL
End Sub
Is there a way to make a URL to open the page correctly ?
Thanks for your help (please reply by mail)
Philippe Guglielmetti - www.dynabits.com
|
|
Rank: Starting Member
Groups: Registered
Joined: 9/16/2002
Posts: 2,960
Location: ,
|
This: url = url + "?cmd="... is ok but the rest need to be: url = url + "&business="... with an "&" as the delimiter. Patrick Breitenbach PayPal, Inc. Dev Net: https://www.paypal.com/pdn
|
