Print Page | Close Window

Algoritmo per codice carta di credito

Printed From: IALweb
Category: Programmazione
Forum Name: ASP-ASP.NET
Forum Discription: Discussioni generiche su Active Server Pages
URL: https://forum.ialweb.it/forum_posts.asp?TID=17093
Printed Date: 24/Lug/2019 at 08:25
Software Version: Web Wiz Forums 10.17 - http://www.webwizforums.com


Topic: Algoritmo per codice carta di credito
Posted By: admin
Subject: Algoritmo per codice carta di credito
Date Posted: 12/Lug/2002 at 18:14
Devo fare una cosuccia che richiede il codice di carta di credito e ricordo che c'è un algoritmo che verifica la validità del codice !!
non ricordo più qual è
qualcuno lo ricorda?
grazie



Replies:
Posted By: Guests
Date Posted: 13/Lug/2002 at 14:55
trovata !!!!!

sono due funzioni
la prima :

FUNCTION validCCNumber (ccnumber)
ccnumber = cleanCCNum( ccnumber)
IF ccnumber = "" THEN
validCCNumber = FALSE
ELSE
isEven = False
digits = ""
FOR i = Len( ccnumber ) To 1 Step -1
IF isEven THEN
digits = digits & CINT (MID (ccnumber, i, 1)) * 2
ELSE
digits = digits & CINT (MID (ccnumber, i, 1))
END IF
isEven = (Not isEven)
NEXT
checkSum = 0
FOR i = 1 TO Len( digits) STEP 1
checkSum = checkSum + CINT (MID (digits, i, 1))
NEXT
validCCNumber = (( checkSum Mod 10) = 0 )
END IF
END FUNCTION

la seconda è chiamata all'interno della prima ed è:

FUNCTION cleanCCNum ( ccnumber )
FOR i = 1 TO Len(ccnumber)
IF isNumeric(MID(ccnumber, i, 1)) THEN
cleanCCNum = cleanCCNum & MID (ccnumber, i, 1)
END IF
END FUNCTION

saluti


Posted By: Beppeweb
Date Posted: 21/Lug/2002 at 00:11
Vedi questo


Posted By: Beppeweb
Date Posted: 21/Lug/2002 at 00:12
scusa ho sbagliato il link

vai qua e scaricati CreditCard che è un validatore di carte di credito.

Potrebbe servirti ..


Posted By: admin
Date Posted: 21/Lug/2002 at 09:39
grazie beppe


Posted By: Beppeweb
Date Posted: 23/Lug/2002 at 01:18

quote:

grazie beppe



e di che cosa?



Print Page | Close Window

Forum Software by Web Wiz Forums® version 10.17 - http://www.webwizforums.com
Copyright ©2001-2013 Web Wiz Ltd. - http://www.webwiz.co.uk