Discussion :

[halimach]

Bonjour

pouvez-vous me dire ou je doit mettre ce code pour récupère la valeur du code à barre et la mettre dans une champs de saisie, champ1

http://doc.windev.com/fr-FR/?1013018...n&q=codebarres

[mail.spam]

Bonjour,
Avant toute chose il est bon de nous dire la version de windev que vous utilisez.
Ensuite il faut lire correctement l'aide car la vous utilisez l'aide pour un champ code barre qui permet de voir le code barre a l'écran. Et non pas lire un code barre avec un lecteur code barre.

Faite une recherche sur le forum car il y a beaucoup de discussion à ce sujet.

Bonne recherche et bonne lecture

[halimach]

Merci a vous.
j utilise la version 16 de windev.je veux récupérer la valeur de code-barres dans un champs de saisie avec un appareil spécialisé branché sur le port série COM1

[Atsibat]

Un lecteur de code barre se contente d'envoyer une séquence de caractères comme si vlous les entriez avec le clavier.

Avec un lecteur de code barre
1 ouvrez le bloc note
2 Bippez le code avec la douchette
3 Le code apparait sur le bloc note=c'est bon l'appareil marche

Dans votre application WD il y a plusieurs solutions mais une des plus faciles est d'utiliser un champ de saisie "monChampCB".
1 Positionnez le focus sur le champ monChampCB
( avec repriseSaisie(monChampCB) par exemple)
2 scannez le code barre. Si le code s'affiche dans le champ c'est gagné.
3 Utilisez la valeur du champ de saisie pour changer la valeur de votre champ codebarre.

Evidemment il y a des solutions plus techniques comme écouter les entrées clavier mais elles sont plus compliquées à mettre en oeuvre.
Le champ de saisie "monChampCB" peut tout à fait être invisible.

[mail.spam]

Un lecteur de code barre se contente d'envoyer une séquence de caractères comme si vlous les entriez avec le clavier.

Avec un lecteur de code barre
1 ouvrez le bloc note
2 Bippez le code avec la douchette
3 Le code apparait sur le bloc note=c'est bon l'appareil marche

Dans votre application WD il y a plusieurs solutions mais une des plus faciles est d'utiliser un champ de saisie "monChampCB".
1 Positionnez le focus sur le champ monChampCB
( avec repriseSaisie(monChampCB) par exemple)
2 scannez le code barre. Si le code s'affiche dans le champ c'est gagné.
3 Utilisez la valeur du champ de saisie pour changer la valeur de votre champ codebarre.

Evidemment il y a des solutions plus techniques comme écouter les entrées clavier mais elles sont plus compliquées à mettre en oeuvre.
Le champ de saisie "monChampCB" peut tout à fait être invisible.

Bonjour,

Ce que tu dis est vrai mais seulement pour un lecteur code barre en émulation clavier (donc brancher en USB ou sur le port du PS/2 du clavier)
Ce n'est absolument pas le cas d'un lecteur code barre en port COM.

Sinon halimach je ne pense pas que tu ai fait de recherche sur le forum (ni dans l'aide à mon avis) car en faisant une recherche sur le forum tu aurais trouvé de quoi t'aider.

[Atsibat]

Oups
bon je corrige pour le port COM c'est sensiblement la même démarche
voici le code fournit par l'aide de PC-SOFT et le lien correspondant :


lien vers l'aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
/ Déclaration des variables
// Définition du nombre de caractères à lire
nNbCarALire est un entier = 13
// Nombre d'octets en attente dans le buffer
nNbOctetAttente est un entier
sBuffer est une chaîne // Contenu du buffer
nPortSérie est un entier = 1 // Port série COM1
 
// Ouverture et initialisation du port série COM1
SI sOuvre(nPortSérie, 5000, 5000) ALORS
// Lecture du code-barres
// Récupération du nombre d'octets en attente
nNbOctetAttente = sDansFileEntrée(nPortSérie)
// Récupération de la valeur du code-barres uniquement
// si au moins 13 caractères ont été lus
SI nNbOctetAttente >= nNbCarALire ALORS
sBuffer = sLit(nPortSérie, nNbOctetAttente)
// Récupération des 13 premiers caractères lus
 	sBuffer = Gauche(sBuffer, 13)
// Affichage de la valeur du code-barres
// dans le champ de saisie "SAI_CodeBarre"
SAI_CodeBarre = sBuffer
FIN
FIN