Active printer problem in Printing word document through VB.net

Posted by sweety on Stack Overflow See other posts from Stack Overflow or by sweety
Published on 2010-06-02T02:45:16Z Indexed on 2010/06/02 2:53 UTC
Read the original article Hit count: 380

Filed under:
|
|
|

Hi

My printer name is \\abc\First Floor A-Block its taking name \abc\First Floor A-Block on NE04:. How should i print it

Private oWord As Word.Application

Dim lobjDoc As Word.Document

Dim strFolder as String
Dim pd As New PrintDocument
Dim strPrintername as String
oWord = CreateObject("Word.Application")
oWord.DisplayAlerts = Word.WdAlertLevel.wdAlertsNone
oWord.ActivePrinter =strPrintername 
strFolder="D:\testdoc.prn"

' Here I am giving the printer name which is on network, But its taking name

\abc\First Floor A-Block on NE04:

lobjDoc = oWord.Documents.Open(CType(strFolder, Object))

lobjDoc.PageSetup.FirstPageTray = Word.WdPaperTray.wdPrinterAutomaticSheetFeed

lobjDoc.PageSetup.OtherPagesTray = Word.WdPaperTray.wdPrinterAutomaticSheetFeed

lobjDoc.PrintOut(Background:=False, Append:=False, OutputFileName:=strFolder, PrintToFile:=True)  'here its giving error about printer settings

lobjDoc.Close(SaveChanges:=False)

Is there any way to print word document with all its content through PrintDocument?

thanks

© Stack Overflow or respective owner

Related posts about vb.net

Related posts about printing