[WORD Lib] MailMerge

venerdì 06 marzo 2009 - 13.49

matpez Profilo | Newbie

Premessa: il codice è scritto in VB6 ma siccome è una Libreria generica, va bene anche per VB.NET


Ciao a tutti, ho un problema con la libreria WORD.

Sto facendo una StampaUnione da codice e va che è una meraviglia, unica pecca quando stampo utilizza come stampante predefinita quella del sistema.

Come faccio a fare aprire la schermata di selezioni della stampante in maniera tale che il documento stampi nella stampante scelta dall'utente? E che, cosa nn da poco, utilizzi i settaggi impostati in quella schermata (vedi colore/bianco nero, 2 fogli sulla stessa pagina e via dicendo)

HEEEEEEEEEEEEEEEEEEEEEEEEEELP!!!!!!!!!!!!!!!!!!! :confused:


Private Sub Command1_Click() Dim oWord As Word.Application Set oWord = New Word.Application Call oWord.Documents.Open(Lettera quote 2008.doc") oWord.Visible = True Call oWord.ActiveDocument.MailMerge.OpenDataSource( _ "dbCentroEstivo.mdb", _ , , , True, _ , , , , , , "TABLE ANAG_FAMIGLIE", _ "SELECT * FROM ANAG_FAMIGLIE WHERE ID_FAMIGLIA = 1") oWord.ActiveDocument.MailMerge.Destination = wdSendToNewDocument Call oWord.ActiveDocument.MailMerge.Execute(True) Call oWord.ActiveDocument.PrintOut Call oWord.Quit(False) Set oWord = Nothing End Sub
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5