| Bedrijf :: GestPaycrypt BEDRIJF :: GestPaycrypt is een PERL-interface voor het Italiaanse online betalingssysteem GestPay. |
Download nu |
Bedrijf :: GestPaycrypt Rangschikking & Samenvatting
- Vergunning:
- Perl Artistic License
- Naam uitgever:
- Marco Gazerro
- Uitgever website:
- http://search.cpan.org/~gazerro/Business-GestPayCrypt-0.41/lib/Business/GestPayCrypt.pm
Bedrijf :: GestPaycrypt Tags
Bedrijf :: GestPaycrypt Beschrijving
Business :: GestPayCrypt is een Perl-interface voor het Italiaanse online betalingssysteem GestPay. Business :: GestPaycrypt is een Perl-interface voor het Italiaanse online betalingssysteem GestPay.Synopsis # # Verzoek # Gebruik Business :: GestPayCrypt; My $ Obj = New Business :: GestPaycrypt; $ OBJ-> SetshopLogin ($ Shoplogin); $ obj-> setcurrency ($ valuta); $ obj-> setamount ($ bedrag); $ OBJ-> SetshopTransactionID ($ ShoptransationID); $ obj-> setlanguage ($ taal); $ OBJ-> Versleutel (); if ($ OBJ-> GETERRORDODE ()) {Print '-fout:', $ OBJ-> GETERRORCODE (), '', $ OBJCRYPT-> GETERROORRORDESCHANTIE (); } anders {mijn $ A = $ OBJ-> GETHOPLOGIN (); mijn $ B = $ $ OBJ-> GettingCrypttedString (); Print QQ ~ ~; } # # Reactie # Gebruik Business :: GestPayCrypt; My $ Obj = New Business :: GestPaycrypt; $ OBJ-> SetshopLogin ($ Shoplogin); $ OBJ-> SetcryptedStedString ($ B); $ obj-> decoderen (); if ($ OBJCRYPT-> GETERRORCODE ()) {Print '-fout:', $ OBJ-> GETERRORCODE (), '', $ OBJCRYPT-> GETERROORRORDESCHANTIE (); } else {Print 'Shoplogin:', $ Obj-> Getshoplogin (), "N"; Print 'Valuta:', $ Obj-> Getcurrency (), "N"; Print 'Bedrag:', $ Obj-> Getamount (), "N"; Print 'ShopTransactionID:', $ Obj-> GetshopTransactionID (), "N"; Print 'Buyname:', $ Obj-> Getbuyername (), "N"; Print 'BuyEmail:', $ obj-> getbuyeremail (), "n"; Print 'TransactionResult:', $ Obj-> GetTransactionResult (), "N"; Print 'AuthorizationCode:', $ Obj-> GetauthorizationCode (), "N"; Print 'BanktransactionID:', $ Obj-> GetBanktransactionID (), "N"; Print 'Errorcode:', $ Obj-> Geterrorcode (), "N"; Print 'Errördescription:', $ OBJ-> GRANDROORRORDESCHANTIRTIE (), "N"; Print 'Alertcode:', $ OBJ-> Getalertcode (), "N"; Print 'AlertdeScription:', $ Obj-> GetalertDescription (), "N"; Print 'Custominfo:', $ Obj-> GetCustominfo (), "N"; } Vereisten: · Perl
Bedrijf :: GestPaycrypt Gerelateerde software