Dall'archivio script > Classic ASP

Effettuare le transazioni con Banca Sella

di Claudio PizzilloClaudio Pizzillo, in Classic ASP, Misc, Coding,

Ecco lo script da utilizzare per la transazione con Banca Sella.
Il file deve essere chiamato OTP.asp e va incluso nella pagina da cui si invia il totale del transato alla Banca per la validazione e nella pagina di risposta.

Le variabili da cambiare sono:
1) CodEs: codice esercente
2) RicName: path al file .ric
3) RisName: path al file .ris
4) T_ID: il TID dell'esercente

<script language="vbscript" runat="server">

  Const CodEs = 1010101
  Const RicName = "c:\...\1010101.ric"
  Const RisName = "c:\....\1010101.ris"
  Const T_ID = xxxxxxxx


  Function PrelevaOTP()
    Dim Strings(49)
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set a = fs.OpenTextFile(RicName, 1, FALSE)
    i = 0
    Do While Not a.AtEndOfStream
      Strings(i) = a.ReadLine
      i = i+1
    Loop

    PrelevaOTP = Strings(0)
    a.Close

    Set a = fs.CreateTextFile(RicName, True)
    For n = 1 To i-1
      a.WriteLine( Strings(n))
    Next
    a.Close

    Set fs = Nothing
  End function


  Sub RimuoviOTP( OTP)
    Dim Strings(49)
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set a = fs.OpenTextFile(RisName, 1, FALSE)
    i = 0
    Do While Not a.AtEndOfStream
      aLine = a.ReadLine
      If aLine <> OTP Then
        Strings(i) = aLine
        i = i+1
      End If
    Loop

    a.Close

    Set a = fs.CreateTextFile(RisName, True)
    For n = 0 To i-1
      a.WriteLine( Strings(n))
    Next
    a.Close

    Set fs = Nothing
  End Sub

</script>

Segue un esempio di pagina d'invio del totale transato a Banca Sella:
(RifAcq è una variabile che viene richiesta da Sella che varia secondo il negozio)

<!--#include file="OTP.asp"-->
<html>
<body>
<%
' form invio dati a Banca Sella
OTP = PrelevaOTP()
RifAcq = "Nome da scegliere"

%><center>
<form action="https://ecomm.sella.it/pagam.asp">
<input type="hidden" name="a" value=<%=CodEs%>>
<input type="hidden" name="b" value=<%=(iTOTALE*T_ID)%>>
<input type="hidden" name="c" value=<%=OTP%>>
<input type="hidden" name="d" value=<%=RifAcq%>>
<input type="submit" value="Conferma pagamento">
</form></center>
</body>
</html>

Ed ecco un esempio di pagina di risposta positiva:

<!--#include FILE="OTP.asp"-->
<html>
CodAut<%=Request.QueryString("a")%><br>
NumOrdine<%=Request.QueryString("b")%><br>
OTP<%=Request.QueryString("c")%><br>

RimuoviOTP(OTP)

</html>

Commenti

Visualizza/aggiungi commenti

| Condividi su: Twitter, Facebook, LinkedIn
Aggiorna

Per inserire un commento, devi avere un account.

Fai il login e torna a questa pagina, oppure registrati alla nostra community.

Approfondimenti

Nessuna risorsa collegata

I più letti di oggi