Brother Printer Visual Basic 10

Question

Bonjour à tous et merci d'être une communauté aussi géniale et utile. Je travaille actuellement sur Visual Basic App (en utilisant la version 10 express) pour imprimer des étiquettes en utilisant Brother Printer QL-500. Pour une raison quelconque, les échantillons fournis par Brother ne fonctionnent pas .... aucun d'entre eux et pire partie il n'y a pas d'erreurs de toute nature .... maintenant Brother P-Touch Editor 5.1 fonctionne et imprime bien. J'utilise Composant client b-PAC3 (64 bits), s'exécutant sur Windows 7 64 bits. Je sais que certaines personnes ont suggéré de cibler x86 et je l'ai fait sans la moindre chance, c'est la même chose que rien ne se passe s'il vous plaît voir le code Brother que j'utilise ci-dessous. Merci!

b-PAC 3.0 Component Sample (Badge) 
' 
'  (C)Copyright Brother Industries, Ltd. 2009 
' 
'******************************************************************* 
Option Explicit On 

Public Class Badge 
    Const sPath = "C:\Program Files\Brother bPAC3 SDK\Templates\Badge.lbx" 

    '******************************************************** 
    ' Open and Print a spcified file. 
    '******************************************************** 
    Public Sub DoPrint() 
     Dim bRet As Boolean 
     Dim ObjDoc As bpac.Document 
     ObjDoc = CreateObject("bpac.Document") 
     'Open lbx file 
     bRet = ObjDoc.Open(sPath) 
     If (bRet <> False) Then 
      ObjDoc.GetObject("objName").Text = txtName.Text 
      ObjDoc.GetObject("objCompany").Text = txtCompany.Text 

      'objDoc.SetMediaByName(objDoc.Printer.GetMediaName, True) 
      ObjDoc.StartPrint("", bpac.PrintOptionConstants.bpoDefault) 
      ObjDoc.PrintOut(1, bpac.PrintOptionConstants.bpoDefault) 
      ObjDoc.EndPrint() 
      ObjDoc.Close() 
     End If 
End Sub 

    Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click 
     DoPrint() 
    End Sub 

    Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click 
     Me.Close() 
    End Sub 
End Class 

Answer 1

Après avoir essayé de contacter technique pendant 2 semaines Brother rien résolu toujours en attente de leur réponse, mais tout fonctionne maintenant ... Non ce code Badge mais mon programme si quelqu'un a même problème essayez d'installer b-PAC3 Client Component non 64 ainsi et ré-installer les pilotes frère en quelque sorte résoudre le problème encore se demander quel est le problème serait agréable de savoir pour l'éviter sur d'autres systèmes.