  
|
<%
Les paramètres de paiement peuvent être configurés ici.
L'identifiant de connexion API et la clé de transaction doivent être remplacés par des valeurs valides.
Dim loginID, transactionKey, amount, description, label, testMode, url
identifiant de connexion = "83RjhNhkvR4k"
clé de transaction = "3Er94cB6R44dYz9s"
montant = "0 - Veuillez revenir."
description = "Paiement foncier."
« Il s'agit du libellé du bouton « Soumettre » »
étiquette = "Effectuer un paiement"
mode de test = "false"
Par défaut, ce code d'exemple est conçu pour envoyer des données à notre serveur de test.
Comptes développeurs : https://test.authorize.net/gateway/transact.dll
Pour les comptes réels (même en mode test), veuillez vous assurer que vous êtes
' Envoi vers : https://secure.authorize.net/gateway/transact.dll
url = "https://secure.authorize.net/gateway/transact.dll"
Si un montant ou une description a été publié sur cette page, les valeurs par défaut sont remplacées.
Si Request.Form("amount") <> " Alors
montant = Request.Form("montant")
Fin Si
Si Request.Form("description") <> " Alors
description = Request.Form("description")
Fin Si
Vérifiez également si le montant ou la description ont été envoyés à l'aide de la méthode GET.
Si Request.QueryString("amount") <> "" Alors
montant = Request.QueryString("montant")
Fin Si
Si Request.QueryString("description") <> "" Alors
description = Request.QueryString("description")
Fin Si
Une facture est générée à partir de la date et de l'heure.
Facture Dim
facture = Année(Date) & Mois(Date) & Jour(Date) & Heure(Maintenant) & Minute(Maintenant) & Seconde(Maintenant)
Un numéro de séquence est généré aléatoirement.
séquence Dim
Randomiser
séquence = Int(1000 * Rnd)
' Un horodatage est généré (à l'aide d'une fonction de simlib.asp)
Horodatage Dim
horodatage = simTimeStamp()
'Une empreinte digitale est générée à l'aide des fonctions de simlib.asp et md5.asp
Empreinte digitale peu visible
empreinte digitale = HMAC (clé de transaction, ID de connexion & "^" & séquence & "^" & horodatage & "^" & montant & "^")
' Afficher le montant et la description à l'écran.
Response.Write("Montant : $" & montant & "
")
Réponse.Write("Description : " & description & "
")
' Créez le formulaire HTML contenant les valeurs POST SIM nécessaires
Réponse.Écrire(" ")
%>
|
|
