Menu













Yehpee.com cerca l'azienda e promuovi il made in italy

    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