Wir verwenden Cookies auf dieser Website.

Cookies sind kleine Textdateien, die von Websites auf Ihrem Computer gespeichert werden. Cookies sind weit verbreitet und helfen Seiten optimiert darzustellen und zu verbessern. Durch die Nutzung unserer Seiten erklären Sie sich damit einverstanden. mehr ...
OK

Concloo LotusScript Essentials Beispiele

Beispiele: CNCL_WhatCC

Prüft die übergebene Kreditkartennummer und liefert den Namen des Kreditkartenunternehmens als Text zurück. Zusätzlich kann auch noch die Gültigkeit der Nummer überprüft werden. Sollte die Kreditkarte nicht erkannt werden wir "No Creditcard" zurückgegeben.
Folgende Kreditkarten können erkannt werden:
- American Express
- China UnionPay
- Diners Club Carte Blanche
- Diners Club International
- Diners Club United States & Canada
- Discover Card
- InstaPayment
- JCB
- Laser
- Maestro
- Mastercard
- VISA Card
- Visa Electron

 
Dim cc1 As String
Dim cc2 As String

cc1 = "4213 3712 8487 7024"
cc2 = "3456 1246 5648 658"

Print CNCL_WhatCC(cc1, True)
Print CNCL_WhatCC(cc2, True)

Ausgabe:

Visa
American Express (invald CCN)