Je dois réaliser pour mon école un programme de lecture de clé magnétique.
Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then
stemp = MSComm1.Input
End If
stemp = ""
szend = hex2chr("21001031")
MSComm1.Output = szend
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
Quel est le plantage ? hex2chr n'est pas une fonction Access. Tu dois avoir une erreur de compilation ou alors hex2chr est une fonction de ton appli. sinon voir la fonction Hex. le chargement d'une valeur Hexa se fait par &H10AF par exe:mple directement dans une variable. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Daniel" a écrit dans le message de news:40ea854c$0$8396$
Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique. Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then stemp = MSComm1.Input End If stemp = "" szend = hex2chr("21001031") MSComm1.Output = szend
Un tout grand merci à tous
Daniel Belgique
Bonjour.
Quel est le plantage ? hex2chr n'est pas une fonction Access. Tu dois avoir
une erreur de compilation ou alors hex2chr est une fonction de ton appli.
sinon voir la fonction Hex.
le chargement d'une valeur Hexa se fait par &H10AF par exe:mple directement
dans une variable.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Daniel" <J.Daniel@Skynet.be> a écrit dans le message de
news:40ea854c$0$8396$a0ced6e1@news.skynet.be...
Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique.
Actuellement cette lecture sert pour les appareils distributeurs de
l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then
stemp = MSComm1.Input
End If
stemp = ""
szend = hex2chr("21001031")
MSComm1.Output = szend
Quel est le plantage ? hex2chr n'est pas une fonction Access. Tu dois avoir une erreur de compilation ou alors hex2chr est une fonction de ton appli. sinon voir la fonction Hex. le chargement d'une valeur Hexa se fait par &H10AF par exe:mple directement dans une variable. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Daniel" a écrit dans le message de news:40ea854c$0$8396$
Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique. Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then stemp = MSComm1.Input End If stemp = "" szend = hex2chr("21001031") MSComm1.Output = szend
Un tout grand merci à tous
Daniel Belgique
eric.NOSPAMvalery
Bonjour ami européen,
D'ou provient la fonction hex2chr, ce n'est pas une fonction vb Quelle erreur donne t'elle ? Il me semble que la lecture par un port rs232 est sensible et doit être limitée dans des char pour éviter de redondance de caractères, c'est peut être le but de cette fonction. Si c'est le fournisseur qui la donne, soit elle est mal apellée, soit elle n'attend pas ce paramètre, soit elle plante dans la dll et il n'y a pas moyen de debugger quoi que ce soit.
Il est possible de la remplacer par une fonction de votre choix pour ramener ce qui est lu dans des char.
Bon courage
EVA
-----Message d'origine----- Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique.
Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then stemp = MSComm1.Input End If stemp = "" szend = hex2chr("21001031") MSComm1.Output = szend
Un tout grand merci à tous
Daniel Belgique
.
Bonjour ami européen,
D'ou provient la fonction hex2chr, ce n'est pas une
fonction vb
Quelle erreur donne t'elle ?
Il me semble que la lecture par un port rs232 est
sensible et doit être limitée dans des char pour éviter
de redondance de caractères, c'est peut être le but de
cette fonction. Si c'est le fournisseur qui la donne,
soit elle est mal apellée, soit elle n'attend pas ce
paramètre, soit elle plante dans la dll et il n'y a pas
moyen de debugger quoi que ce soit.
Il est possible de la remplacer par une fonction de votre
choix pour ramener ce qui est lu dans des char.
Bon courage
EVA
-----Message d'origine-----
Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture
de clé magnétique.
Actuellement cette lecture sert pour les appareils
distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion
d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de
la clé.
J'essaie de décortiquer le code car je suis un débutant
en VB
pouvez-vous m'aider à comprendre cette partie de code,
car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then
stemp = MSComm1.Input
End If
stemp = ""
szend = hex2chr("21001031")
MSComm1.Output = szend
D'ou provient la fonction hex2chr, ce n'est pas une fonction vb Quelle erreur donne t'elle ? Il me semble que la lecture par un port rs232 est sensible et doit être limitée dans des char pour éviter de redondance de caractères, c'est peut être le but de cette fonction. Si c'est le fournisseur qui la donne, soit elle est mal apellée, soit elle n'attend pas ce paramètre, soit elle plante dans la dll et il n'y a pas moyen de debugger quoi que ce soit.
Il est possible de la remplacer par une fonction de votre choix pour ramener ce qui est lu dans des char.
Bon courage
EVA
-----Message d'origine----- Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique.
Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then stemp = MSComm1.Input End If stemp = "" szend = hex2chr("21001031") MSComm1.Output = szend
Un tout grand merci à tous
Daniel Belgique
.
Daniel
J'ai le message : erreur de compilation :Procédure Sub ou fonction non définie
Encore merci pour ta réponse
"" a écrit dans le message de news:26b6401c46369$bbbfc680$ Bonjour ami européen,
D'ou provient la fonction hex2chr, ce n'est pas une fonction vb Quelle erreur donne t'elle ? Il me semble que la lecture par un port rs232 est sensible et doit être limitée dans des char pour éviter de redondance de caractères, c'est peut être le but de cette fonction. Si c'est le fournisseur qui la donne, soit elle est mal apellée, soit elle n'attend pas ce paramètre, soit elle plante dans la dll et il n'y a pas moyen de debugger quoi que ce soit.
Il est possible de la remplacer par une fonction de votre choix pour ramener ce qui est lu dans des char.
Bon courage
EVA
-----Message d'origine----- Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique.
Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then stemp = MSComm1.Input End If stemp = "" szend = hex2chr("21001031") MSComm1.Output = szend
Un tout grand merci à tous
Daniel Belgique
.
J'ai le message : erreur de compilation :Procédure Sub ou fonction non
définie
Encore merci pour ta réponse
"eric.NOSPAMvalery@free.fr" <anonymous@discussions.microsoft.com> a écrit
dans le message de news:26b6401c46369$bbbfc680$a601280a@phx.gbl...
Bonjour ami européen,
D'ou provient la fonction hex2chr, ce n'est pas une
fonction vb
Quelle erreur donne t'elle ?
Il me semble que la lecture par un port rs232 est
sensible et doit être limitée dans des char pour éviter
de redondance de caractères, c'est peut être le but de
cette fonction. Si c'est le fournisseur qui la donne,
soit elle est mal apellée, soit elle n'attend pas ce
paramètre, soit elle plante dans la dll et il n'y a pas
moyen de debugger quoi que ce soit.
Il est possible de la remplacer par une fonction de votre
choix pour ramener ce qui est lu dans des char.
Bon courage
EVA
-----Message d'origine-----
Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture
de clé magnétique.
Actuellement cette lecture sert pour les appareils
distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion
d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de
la clé.
J'essaie de décortiquer le code car je suis un débutant
en VB
pouvez-vous m'aider à comprendre cette partie de code,
car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then
stemp = MSComm1.Input
End If
stemp = ""
szend = hex2chr("21001031")
MSComm1.Output = szend
J'ai le message : erreur de compilation :Procédure Sub ou fonction non définie
Encore merci pour ta réponse
"" a écrit dans le message de news:26b6401c46369$bbbfc680$ Bonjour ami européen,
D'ou provient la fonction hex2chr, ce n'est pas une fonction vb Quelle erreur donne t'elle ? Il me semble que la lecture par un port rs232 est sensible et doit être limitée dans des char pour éviter de redondance de caractères, c'est peut être le but de cette fonction. Si c'est le fournisseur qui la donne, soit elle est mal apellée, soit elle n'attend pas ce paramètre, soit elle plante dans la dll et il n'y a pas moyen de debugger quoi que ce soit.
Il est possible de la remplacer par une fonction de votre choix pour ramener ce qui est lu dans des char.
Bon courage
EVA
-----Message d'origine----- Bonjour à tous,
Je dois réaliser pour mon école un programme de lecture de clé magnétique.
Actuellement cette lecture sert pour les appareils distributeurs de l'école.
Je dois récupérer le numéro de la clé pour une gestion d'outillage. (Le
lecteur de clé se branche sur le port RS232
Le fournisseur m'a procuré le code VB6 de la lecture de la clé.
J'essaie de décortiquer le code car je suis un débutant en VB
pouvez-vous m'aider à comprendre cette partie de code, car le programme se
plante à la fonction "hex2chr"
If MSComm1.PortOpen = True Then stemp = MSComm1.Input End If stemp = "" szend = hex2chr("21001031") MSComm1.Output = szend
