Discussion :

[sky88]

Bonjour à tous

j'ai créé un code qui me permet de générer un code à barre et il marche très bien:

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
26
27
28
29
30
31
32
33
34
35
Imports System.Drawing
Imports System.Drawing.Printing
 
Public Class BarreCode
 
    Private lclFont As Font
    Private TextToPrint As String
 
    Public Function Code39(ByVal InputValue As String) As String
        Dim OutData As String = ""
        InputValue = InputValue.Replace(" ", "=")
 
        OutData = "!" & InputValue & "!"
        Return OutData
    End Function
 
    Public Sub PrintBarCodeV(ByVal TextFont As String, ByVal EncodedText As String, ByVal TextFontSize As Single)
        lclFont = New Font(TextFont, TextFontSize)
        TextToPrint = EncodedText
        Dim PrintDoc As PrintDocument = New PrintDocument()
        AddHandler PrintDoc.PrintPage, AddressOf PrintDocHandler
        PrintDoc.Print()
        Return
    End Sub
 
    Private Sub PrintDocHandler(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
        Dim yPos As Single = 100
        Dim leftMargin As Single = ev.MarginBounds.Left
        Dim rightMargin As Single = ev.MarginBounds.Right
        Dim topMargin As Single = ev.MarginBounds.Top
        yPos = yPos + lclFont.GetHeight(ev.Graphics)
        ev.Graphics.DrawString(TextToPrint, lclFont, Brushes.Black, 38, 15, New StringFormat())
    End Sub
 
End Class

Code :

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

1
2
3
4
5
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim EncodedText As String
        EncodedText = bar.Code39(Me.TextBox1.Text)
        TextBox1.Text = EncodedText
end sub

mon problème et quand j'imprime le code et j'essaye de le lire via le lecteur code à barre (USB)

au lieu de m'afficher 123456 il m'affiche:
&é"'(-

comment je peux régler ce problème

Merci d'avance

[GuruuMeditation]

Tu es sur que le code est bon?
Il y a plusieurs type d'encodage pour les codes barre. Est-ce que l'appareil est réglé sur le bon code?

J'ai un lecteur chez moi, si tu m'envoie une image de ton code, je peux essayer avec mon lecteur.

[sky88]

merci à vous

le code marche bien
car même si je veux lire un code à barre et de l'imprimer sur un bloc note j'aurai ce résultat

mon lecteur ressemble à ça:

Code :

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

1
2
 
http://www.google.dz/imgres?q=lecteur+code+barre&um=1&hl=fr&tbo=d&tbm=isch&tbnid=KP_NlDtZenelRM:&imgrefurl=http://www.solushop.com/lecteur-code-barre-sg10t-intermec,fr,4,lecteur-code-barre-sg10t.cfm&docid=Id99mM6g_aduQM&imgurl=http://www.solushop.com/boutique/images_produits/lecteur_code_barre_sg10t_6-z.jpg&w=600&h=600&ei=7AYJUdu7OIXdsgaQ6YHoDg&zoom=1&ved=1t:3588,r:47,s:0,i:228&iact=rc&dur=843&sig=113147992603935615391&page=2&tbnh=182&tbnw=199&start=23&ndsp=28&tx=75&ty=77&biw=1440&bih=728

[sevyc64]

A la vue de ce que tu récupère, ça ressemble plus à un problème de paramétrage minuscule/majuscule de ton lecteur.
Si tu passe ton clavier en capslock, ton lecteur code-barre lira très bien.

Regarde dans le doc de ton lecteur, il est probable que tu ais un paramétrage possible sur ce point.

[sky88]

Ok je vais voir

[sky88]

Mon lecteur est Honeywell ms9540
je ne sais pas comment le configurer

[sevyc64]

Dans ce document à partir de la page 11-1 (65), tu as les différents codes de configuration des paramètres clavier.
Je te laisse lire le début de la doc pour savoir comment se fait la configuration.

Il te faudra d'abords, je pense, configurer le clavier, FR, je présume. Ensuite tu peux regarder les code pour capslock, l'autodetect, etc... Les essayer jusqu'à trouver celui qui convient.