Lecture Carte Eid |
Sujet: Lecture Carte Eid par Anonyme sur 11/6/2006 18:23:39 Bonjour, Y a t'il une personne qui à déja implementé la lecture des données d'une carte d'identité Electronique ? Si oui serait possible d'obtenir une pal copie du projet ? j'ai ce code recu par un membre, mais il me retourne des erreurs et je ne sais pourquoi. J'ai testé avec le code VB fourni par le ministere cela fonctionne il lit les données de ma carte en VB. Mais impossible de lire en WinDev // erreur 1. librairie non initialisée BEID_E_NOT_INITIALIZED = Library not initialized 2. GetValue n'est pas un objet autoamtion // Le CODE //Declaration global du projet // Constante des codes d'erreurs CONSTANTE BEID_OK=0 BEID_E_SYSTEM=1 BEID_E_PCSC=2 BEID_E_CARD=3 BEID_E_BAD_PARAM=4 BEID_E_INTERNAL=5 BEID_E_INVALID_HANDLE=6 BEID_E_INSUFFICIENT_BUFFER=7 BEID_E_COMM_ERROR=8 BEID_E_TIMEOUT=9 BEID_E_UNKNOWN_CARD=10 BEID_E_KEYPAD_CANCELLED=11 BEID_E_KEYPAD_TIMEOUT=12 BEID_E_KEYPAD_PIN_MISMATCH=13 BEID_E_KEYPAD_MSG_TOO_LONG=14 BEID_E_INVALID_PIN_LENGTH=15 BEID_E_VERIFICATION=16 BEID_E_NOT_INITIALIZED=17 BEID_E_UNKNOWN=18 BEID_E_UNSUPPORTED_FUNCTION=19 BEID_E_INCORRECT_VERSION=20 BEID_E_INVALID_ROOT_CERT=21 FIN //Declaration global de la fenêtre chCardID est une chaîne sur 12 chChipID est une chaîne sur 16 chStreet est une chaîne // UTF-8 a convertir en Ascii chHouseNumber est une chaîne chPhoto est une chaîne eHandle est un entier eBirthDate est une chaine eBirthDateLocation est une chaine // UTF-8 a convertir en Ascii eNationality est une chaine sur 3 oBEID est un objet Automation dynamique oTStatus est un objet Automation dynamique oIdData est un objet Automation dynamique oTCheck est un objet Automation dynamique oAddress est un objet Automation dynamique oPicture est un objet Automation dynamique / /Code de clic un bouton QUAND EXCEPTION DANS oBEID = allouer un objet Automation "EIDLibCtrl.EIDLib" oTStatus = oBEID>>Init("",0,0,&eHandle) // - Traitement des erreurs SI oTStatus>>GetGeneral() <> BEID_OK ALORS Erreur(GeneralCode(oTStatus>>GetGeneral())) FIN // - Lecture bloc 1 oTStatus = oBEID>>GetID(oIdData,oTCheck) // - Traitement des erreurs SI oTStatus>>GetGeneral() <> BEID_OK ALORS Erreur(GeneralCode(oTStatus>>GetGeneral())) ... FIN // - Lecture bloc 2 oTStatus = oBEID>>GetAddress(oAddress,oTCheck) // - Traitement des erreurs SI oTStatus>>GetGeneral() <> BEID_OK ALORS Erreur(GeneralCode(oTStatus>>GetGeneral())) ... FIN // - Lecture bloc 3 oTStatus = oBEID>>GetPicture(oPicture,oTCheck) // - Traitement des erreurs SI oTStatus>>GetGeneral() <> BEID_OK ALORS Erreur(GeneralCode(oTStatus>>GetGeneral())) ... FIN // - Récupération des données chCardID = oIdData>>GetValue("CardNumber") chChipID = oIdData>>GetValue("ChipNumber") chStreet = oAddress>>GetValue("Street") chHouseNumber = oAddress>>GetValue("HouseNumber") ... // - Pour la photo chPhoto = SysRep(srProfile) + "\eid-cache\(unknown)_BELPIC_" + chChipID + "_4035" FAIRE Erreur(ExceptionInfo(errComplet)) ExceptionActive() FIN oBEID>>Exit() libérer oTStatus libérer oTCheck libérer oIdData libérer oAddress libérer oPicture libérer oBEID // Procedure appelée en cas d'erreur PROCEDURE GeneralCode(Num_Erreur) SELON Num_Erreur CAS BEID_OK : RENVOYER "Function succeeded" CAS BEID_E_SYSTEM : RENVOYER "Unknown system error (see system error code)" CAS BEID_E_PCSC : RENVOYER "Unknown PC/SC error (see PC/SC errorcode)" CAS BEID_E_CARD : RENVOYER "Unknown card error (see card status word)" CAS BEID_E_BAD_PARAM : RENVOYER "Invalid parameter (NULL pointer, out of bound, etc.)" CAS BEID_E_INTERNAL : RENVOYER "An internal consistency check failed" CAS BEID_E_INVALID_HANDLE : RENVOYER "The supplied handle was invalid" CAS BEID_E_INSUFFICIENT_BUFFER : RENVOYER "The data buffer to receive returned data is too small for the returned data" CAS BEID_E_COMM_ERROR : RENVOYER "An internal communications error has been detected" CAS BEID_E_TIMEOUT : RENVOYER "A specified timeout value has expired" CAS BEID_E_UNKNOWN_CARD : RENVOYER "Unknown card" CAS BEID_E_KEYPAD_CANCELLED : RENVOYER "Input on pinpad cancelled" CAS BEID_E_KEYPAD_TIMEOUT : RENVOYER "Timout returned from pinpad" CAS BEID_E_KEYPAD_PIN_MISMATCH : RENVOYER "The two PINs did not match" CAS BEID_E_KEYPAD_MSG_TOO_LONG : RENVOYER "Message too long on pinpad" CAS BEID_E_INVALID_PIN_LENGTH : RENVOYER "Invalid PIN length" CAS BEID_E_VERIFICATION : RENVOYER "Error in a signature verification or a certificate validation" CAS BEID_E_NOT_INITIALIZED : RENVOYER "Library not initialized" CAS BEID_E_UNKNOWN : RENVOYER "An internal error has been detected, but the source is unknown" CAS BEID_E_UNSUPPORTED_FUNCTION : RENVOYER "Function is not supported" CAS BEID_E_INCORRECT_VERSION : RENVOYER "Incorrect library version" CAS BEID_E_INVALID_ROOT_CERT : RENVOYER "Wrong Root Certificate" AUTRE CAS : RENVOYER "Unknow code : " +Num_Erreur FIN |