Credit Card Identification
Determines type of Credit Card by it’s number. Original Author: John Anderson Inputs Card Number as String Assumptions This is based on documents from CyberCash’s home page. Returns Card Type as String Side Effects Is not Year 2061 Compliant API Declarations Code Public Function CardType(CCNum As String) As StringDim Header As String Select Case Left$(CCNum, 1) Case “5” Header = Left$(CCNum, 2) If… Read More »