GastPay con Banca Sella che casino

il 9 giugno 2004 alle 17:31

7 messaggi dal 16 maggio 2003

Ciao, devo implementare una pagina asp che collegata al GastPay di Banca sella mi permette di effettuare dei pagamenti online...
In pratica le cose che mi servono sono: il numero di chiamata, l'importo, il nome,la mail e una breve descizione.
Ho scaricato questo

 'PAGINA PER LA CONNESSIONE 
'ALLA PAGINA DI PAGAMENTO
'(RICHIESTA DI PAGAMENTO) 
<%
' INIZIO SCRIPT DI CRITTOGRAFIA

'PARTE DA NON MODIFICARE
'Sintassi Oggetto Java
Set objCrypt = GetObject("java:GestPayCrypt")
'Sintassi Oggetto COM
'set objCrypt =Server.Createobject("GestPayCrypt.GestPayCrypt")
'Sintassi Oggetto COM High Security
'set objCrypt =Server.Createobject("GestPayCryptHS.GestPayCryptHS")


if Err.number <> 0 then 
Response.Write Err.number & Err.description
end if

'PARTE DA MODIFICARE (VALORIZZAZIONE ATTRIBUTI TRANSAZIONE)

'Inserire al posto delle scritte con parentesi quadre [] I dati
'necessari per effettuare la transazione.
'Le righe contenenti i dati contrassegnati come NON OBBLIGATORI
'devono essere eliminate se non utilizzate

'CAMPI OBBLIGATORI

myshoplogin= "[SHOP LOGIN]" 'Es. 9000001
mycurrency=[CODICE DIVISA] 'Es. 242 per euro o 18 lira
myamount="[IMPORTO SENZA SEPARATORI DI MIGLIAIA
CON SEPARATORE PUNTO PER DECIMALI]" 'Es. "1256.28"
myshoptransactionID="[IDENTIFICATIVO TRANSAZIONE]"
'Es. "34az85ord19"

'CAMPI NON OBBLIGATORI (CANCELLARE LE RIGHE NON INTERESSATE)

mybuyername="[NOME E COGNOME ACQUIRENTE]"'Es. "Mario Bianchi"
mybuyeremail="[EMAIL ACQUIRENTE]"'Es. "Mario.bianchi@isp.it"
mylanguage="[CODICE LINGUA DA UTILIZZARE NELLA COMUNICAZIONE]"
'Es. "3" per spagnolo
mycustominfo="[PARAMETRI PERSONALIZZATI]"
'Es. "BV_CODCLIENTE=12*P1*BV_SESSIONID=398"



'PARTE DA NON MODIFICARE

objCrypt.SetShopLogin(myshoplogin)
objCrypt.SetCurrency(mycurrency)
objCrypt.SetAmount(myamount)
objCrypt. SetShopTransactionID(myshoptransactionID
)
objCrypt.SetBuyerName(mybuyername)
objCrypt.SetBuyerEmail(mybuyeremail)
objCrypt.SetLanguage(mylanguage)
objCrypt.SetCustomInfo(mycustominfo)

call objCrypt.Encrypt

if objCrypt.GetErrorCode = 0 then
b = objCrypt.GetEncryptedString
a = objCrypt.GetShopLogin
end if

'FINE SCRIPT PER CRITTOGRAFIA.

'SE TUTTO OK SI HANNO 2 VARIABILI A E B DA UTILIZZARE PER IL 'PASSAGGIO DEI PARAMETRI A BANCA SELLA

'ESEMPIO CON FORM HTML
%>

<form action="https://ecomm.sella.it/gestpay/pagam.asp">
<input name="a" type="hidden" value="<%=a%>">
<input name="b" type="hidden" value="<%=b%>">
<input type="submit" value=" OK " name="Input">
</form>

PAGINA PER LA GESTIONE DELLA RISPOSTA DI PAGAMENTO

<%
'INIZIO SCRIPT PER DECRITTOGRAFIA
'DA NON MODIFICARE


'VENGONO LETTI I PARAMETRI IN INPUT E VIENE DECRIPTATO IL
'PARAMETRO B

parametro_a = trim(request("a"))
parametro_b = trim(request("b"))

Set objdeCrypt = GetObject("java:GestPayCrypt")

if Err.number <> 0 then 
Response.Write Err.number & Err.description
end if

objdeCrypt.SetShopLogin(parametro_a)
objdeCrypt.SetEncryptedString(parametro_b)

call objdeCrypt.Decrypt

'DI SEGUITO SI HANNO UNA SERIE DI VARIABILI VALORIZZATE CON I
'DATI RICEVUTI DA GESTPAY DA UTILIZZARE PER L'INTEGRAZIONE CON
'IL PROPRIO SISTEMA


myshoplogin=trim(objdeCrypt.GetShopLogin)
mycurrency=objdeCrypt.GetCurrency
myamount=objdeCrypt.GetAmount
myshoptransactionID=trim(objdeCrypt.GetShopTransactionID)
mybuyername=trim(objdeCrypt.GetBuyerName)
mybuyeremail=trim(objdeCrypt.GetBuyerEmail)
mytransactionresult=trim(objdeCrypt.GetTransactionResult)
myauthorizationcode=trim(objdeCrypt.GetAuthorizationCode)
myerrorcode=trim(objdeCrypt.GetErrorCode)
myerrordescription=trim(objdeCrypt.GetErrorDescription)
 myerrorbanktransactionid=trim(objdeCrypt
.GetBankTransactionID)
myalertcode=trim(objdeCrypt.GetAlertCode)
myalertdescription=trim(objdeCrypt.GetAlertDescription)
mycustominfo=trim(objdeCrypt.GetCustomInfo)

'FINE SCRIPT DI DECRITTOGRAFIA

%>

Ma non ho assolutamente capito nulla...

Ringrazio anticipatamente la buon anima che mi degna di uno help

Rispondi Quoting

m.casati

il 17 giugno 2004 alle 18:36

3.083 messaggi dal 13 giugno 2001
Contributi
mcasati.com | Blog

L'help che ti serve a livello di codice è... tutto nell'esempio che ti ha fornito Banca Sella. Aggiungo dunque solo qualche info generale sul funzionamento del loro GestPay.
Come prima cosa devi configurare il backoffice di Banca Sella (url di risposta ok e ko, indirizzi ip dei server abilitati alla chiamata, ecc.)
In secondo luogo devi installarti la DLL che ti hanno fornito sul tuo server; tale DLL serve per creare le chiavi cifrate da passare a Banca Sella e per decifrarne le risposte (nota: io ho avuto delle grosse difficoltà istanziando il loro componente da JScript, quindi ti consiglio di farlo da VBScript)
Alla fine non ti resta che intervenire sul codice d'esempio che ti hanno fornito personalizzandolo nelle parti evidenziate (il tuo codice cliente, l'importo da transare, l'ID da assegnare alla transazione, ecc.)
Spero di esserti stato utile.

Matteo Casati
GURU4.net

Rispondi Quoting

lucchetta

il 18 giugno 2004 alle 10:53

7 messaggi dal 16 maggio 2003

Attualmente stiamo cercando di far comunicare i due server, avendo un firewall non raggiunge la pagina di test per verificare il collegamento http.

L'altro problema che ho è che devo creare una pagina che mi permette di inserire dei valori in dei campi...ecco un es ma senza codice di sella http://new.pe92.it/pagamenti.asp ida BackOffice , creo i campi che mi interessano, ma poi non conosco il modo per associarli ai campi che ho creato nella pagina asp
Premetto che mi sono un neofita e credo che mi abbiano affidato un compito al di sopra delle mie possibilità

Questo è il codice della pagina pagamenti.asp:

<%@LANGUAGE="VBSCRIPT"%>
<html>
<head>
<title>Pagamenti</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

'PAGINA PER LA CONNESSIONE 
'ALLA PAGINA DI PAGAMENTO
'(RICHIESTA DI PAGAMENTO) 
<%
' INIZIO SCRIPT DI CRITTOGRAFIA

'PARTE DA NON MODIFICARE
'Sintassi Oggetto Java
'Set objCrypt = GetObject("java:GestPayCrypt")
'Sintassi Oggetto COM
set objCrypt =Server.Createobject("GestPayCrypt.GestPayCrypt")
'Sintassi Oggetto COM High Security
'set objCrypt =Server.Createobject("GestPayCryptHS.GestPayCryptHS")


if Err.number <> 0 then 
Response.Write Err.number & Err.description
end if

'PARTE DA MODIFICARE (VALORIZZAZIONE ATTRIBUTI TRANSAZIONE)

'Inserire al posto delle scritte con parentesi quadre [] I dati
'necessari per effettuare la transazione.
'Le righe contenenti i dati contrassegnati come NON OBBLIGATORI
'devono essere eliminate se non utilizzate

'CAMPI OBBLIGATORI

myshoplogin="9004639" 'Es. 9000001
mycurrency= 242 'Es. 242 per euro o 18 lira
myamount="Request.Form(myamount)" '"1256.28" 'Es. "1256.28"
myshoptransactionID="Request.Form(myshoptransactionID)" '"1256"'Es. "34az85ord19"

'CAMPI NON OBBLIGATORI (CANCELLARE LE RIGHE NON INTERESSATE)

'mybuyername=Request.Form(mybuyername) '"[NOME E COGNOME ACQUIRENTE]"'Es. "Mario Bianchi"
'mybuyeremail=Request.Form(mybuyeremail) '"[EMAIL ACQUIRENTE]"'Es. "Mario.bianchi@isp.it"
'mylanguage="1"'Es. "3" per spagnolo
'mycustominfo="[PARAMETRI PERSONALIZZATI]"
'Es. "BV_CODCLIENTE=12*P1*BV_SESSIONID=398"



'PARTE DA NON MODIFICARE

objCrypt.SetShopLogin(myshoplogin)
objCrypt.SetCurrency(mycurrency)
objCrypt.SetAmount(myamount)
objCrypt. SetShopTransactionID(myshoptransactionID)
objCrypt.SetBuyerName(mybuyername)
objCrypt.SetBuyerEmail(mybuyeremail)
objCrypt.SetLanguage(mylanguage)
objCrypt.SetCustomInfo(mycustominfo)

call objCrypt.Encrypt

if objCrypt.GetErrorCode = 0 then
b = objCrypt.GetEncryptedString
a = objCrypt.GetShopLogin
end if

'FINE SCRIPT PER CRITTOGRAFIA.
%>

<body>
<form name="form" method="post" action="https://ecomm.sella.it/gestpay/pagam.asp">

  <table width="250" border="0" align="center" cellpadding="2" cellspacing="2">
    <tr> 
      <td colspan="3"><div align="center"> 
          <p>Progetto Elettronica 92<br>
            Pagamenti<br>
          </p>
        </div></td>
    </tr>
    <tr> 
      <td width="30%"><div align="right">N. Call:</div></td>
      <td colspan="2"><div align="center"> 
          <input name="myshoptransactionID" type="text" id="myshoptransactionID">
        </div></td>
    </tr>
    <tr> 
      <td><div align="right"></div></td>
      <td colspan="2"><div align="center"></div></td>
    </tr>
    <tr> 
      <td><div align="right">Importo:</div></td>
      <td colspan="2"><div align="center"> 
          <input name="myamount" type="text" id="myamount">
        </div></td>
    </tr>
    <tr> 
      <td><div align="right"></div></td>
      <td colspan="2"><div align="center"></div></td>
    </tr>
    <tr> 
      <td><div align="right">Cliente:</div></td>
      <td colspan="2"><div align="center"> 
          <input name="mybuyername" type="text" id="mybuyername">
        </div></td>
    </tr>
    <tr> 
      <td><div align="right"></div></td>
      <td colspan="2"><div align="center"></div></td>
    </tr>
    <tr> 
      <td><div align="right">E-mail:</div></td>
      <td colspan="2"><div align="center"> 
          <input name="mybuyeremail" type="text" id="mybuyeremail">
        </div></td>
    </tr>
    <tr> 
      <td><div align="right"></div></td>
      <td colspan="2"><div align="center"></div></td>
    </tr>
    <tr> 
      <td>&nbsp;</td>
      <td colspan="2">&nbsp;</td>
    </tr>
    <tr> 
      <td colspan="3"><input name="myshoplogin" type="hidden" id="myshoplogin" value="9004639"> 
     <input name="a" type="hidden" value="%=a%">
    <input name="b" type="hidden" value="%=b%">
      <input name="mylanguage" type="hidden" id="mylanguage" value="1"></td>
    </tr>
    <tr> 
      <td colspan="3"><div align="center"> 
          <input type="submit" name="Submit" value="Invia">
          <img src="../Impostazioni%20locali/Temporary%20Internet%20Files/OLK6/images_pe92/img_layout/spacer.gif" width="5" height="1"> 
          <input type="reset" name="Submit2" value="Svuota Campi">
        </div></td>
    </tr>
  </table>
  <p>&nbsp; </p>
  <p>&nbsp; </p>
  <p>&nbsp; </p>
  <p>&nbsp; </p>
  <p>&nbsp; </p>
  <p>&nbsp; </p>
</form>
</body>
</html>

Ti ringrazio per l'aiuto

Rispondi Quoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.

Community

Corsi e consulenza

In primo piano

.NET Conference Italia 2024 - Milano

.NET Conference Italia 2023 - Milano e Online

Le novità di .NET 7 e C# 11

Le novità in ASP.NET Core e Blazor con .NET 7

I più letti di oggi

In evidenza

Misc

Utilizziamo i cookie per analisi, contenuti personalizzati e pubblicità.

.NET Conference Italia 2024 - Milano

.NET Conference Italia 2023 - Milano e Online

Le novità di .NET 7 e C# 11

Le novità in ASP.NET Core e Blazor con .NET 7