Tansazioni con Banca Sella
Come effettuare una transazione con Banca Sella.
Innanzi tutto bisogna stipulare un contratto con Banca Sella per attivare un sito di ecommerce. La Banca ci attiverà una sezione riservata in cui poter prelevare delle passwords per fare le transazioni, consiste in due files con un elenco di passwords, uno ha estenzione .ric e l'altro .ris. 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>
filmato, macchine sportive, maradona, chat, cerca lavoro, download, programmare, calcio, sorpassi, comici, freeware, porsche, auto, free, foto, formula1, del piero, automobili, van basten, scripts
Usiamo i cookies per rendere possibile il corretto funzionamento del sito web per ogni utente. Utilizzando il nostro sito, accetti le nostre modalità di utilizzo dei cookies.
Privacy e cookie policy