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: 384
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