<% 'Los parámetros para el pago se pueden configurar aquí 'El ID de inicio de sesión de la API y la clave de transacción deben reemplazarse con valores válidos Dim loginID, transactionKey, amount, description, label, testMode, url ID de inicio de sesión = "83RjhNhkvR4k" clave de transacción = "3Er94cB6R44dYz9s" cantidad = "0 - Por favor, regrese." descripción = "Pago de tierras." ' Esta es la etiqueta en el botón 'enviar' etiqueta = "Realizar pago" testMode = "falso" 'De manera predeterminada, este código de muestra está diseñado para publicarse en nuestro servidor de prueba para 'Cuentas de desarrollador: https://test.authorize.net/gateway/transact.dll ' Para cuentas reales (incluso en modo de prueba), asegúrese de que está ' publicando en: https://secure.authorize.net/gateway/transact.dll url = "https://secure.authorize.net/gateway/transact.dll" ' Si se publicó una cantidad o una descripción en esta página, se anularán los valores predeterminados. Si Request.Form("cantidad") <> "" Entonces cantidad = Request.Form("cantidad") Fin si Si Request.Form("descripción") <> "" Entonces descripción = Request.Form("descripción") Fin si ' También verifique si el monto o la descripción se enviaron mediante el método GET Si Request.QueryString("cantidad") <> "" Entonces cantidad = Request.QueryString("cantidad") Fin si Si Request.QueryString("descripción") <> "" Entonces descripción = Request.QueryString("descripción") Fin si 'Se genera una factura utilizando la fecha y la hora Factura tenue factura = Año(Fecha) & Mes(Fecha) & Día(Fecha) & Hora(Ahora) & Minuto(Ahora) & Segundo(Ahora) ' un número de secuencia se genera aleatoriamente Secuencia tenue Aleatorizar secuencia = Int(1000 * Rnd) 'Se genera una marca de tiempo (usando una función de simlib.asp) Marca de tiempo tenue marca de tiempo = simTimeStamp() 'Se genera una huella digital utilizando las funciones de simlib.asp y md5.asp Huella dactilar tenue huella digital = HMAC (clave de transacción, ID de inicio de sesión y "^" y secuencia y "^" y marca de tiempo y "^" y monto y "^") ' Imprima el monto y la descripción en la pantalla. Respuesta.Write("Monto: $" & monto & "
") Respuesta.Write("Descripción: " & descripción & "
") ' Cree el formulario HTML que contiene los valores de publicación SIM necesarios Respuesta.Write("

") 'Se pueden agregar campos adicionales aquí como se describe en la guía de integración de SIM ' en: http://developer.authorize.net Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write(" ") Respuesta.Write("

") %>