VB.net aracılığıyla Word belgesinin yazdırılmasında etkin yazıcı sorunu

Question

Yazıcımın adı, \\\\ Birinci Kat A-Bloğu NE04: adresinde \\abc\First Floor A-Block.

: Nasıl

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" 

'İşte Adını

\ abc \ NE04 üzerine First Floor A-Blok ağ üzerindeyse yazıcı adını vererek Ama alıyorum bastırmanız gerekmektedir

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) 

Tüm içeriğiyle word belgesini PrintDocument aracılığıyla yazdırmanın herhangi bir yolu var mı?

sayesinde

Answer 1

Bu deneyebilirsiniz:

İlk kullanım Windows yazıcı ayarları varsayılan yazıcı olarak bu yazıcıyı ayarlayın. Ardından, Word'ü el ile açın ve VBA düzenleyicisini açın, hemen pencereye gidin ve ?ActivePrinter yazın.

Bu, Word'ün bunu tanıması için göndermeniz gereken yazıcı adı için tam biçimi vermeniz gerekir.