Print Bartender 10.0 By Using Vb6 Application Follow
I'm a newbie for bartender use. Currently I made a template which have 2 barcode and the datasource are Embedded Data.
Now I would like to make a small application by VB6.0 and call Bartender to print this label out.
After checking the related instruction documents I make following script in my application
Dim btApp As BarTender.Application
Dim btFormat As BarTender.Format
Set btApp = CreateObject("Bartender.Application")
btApp.VisibleWindows = btAll --it was successful as I can see the bartender application appear
Set bfFormat = btApp.Formats.Open("C:\VB\Sample.btw", True, "")
--I belive at least the right part should success as the template opened in Bartender application.
--But I'm not sure if the bfFormat object is correct got the result or not
--Because when I try to debug in VB6, I could not find any detail information when I add this variabile in montior.
aa = btFormat.PrintOut(False, False)
--here I got the error message, it was run-time error '91' object variable or with block variable not set
So I guess there must be someing wrong with btFormat object, either it was failed to create when try to get feedback from Open method from Formats, or the PrintOut function must be changed.
Can anyone help to check this issue?
I know that VB6 is very old product, but compare with recent DotNet product, the compiled application is very small and easy to suit for most kinds of Windows plateform.
Please sign in to leave a comment.