Joseph O'Connell
joconnell at indy.rr.com
Tue Sep 16 17:10:38 CDT 2003
Billy, Try this to print a word document: Dim appWord As Word.Application Dim docWord As Word.Document Set appWord = New Word.Application Set docWord = appWord.Documents.Add("SomeFile.rtf") appWord.ActiveDocument.PrintOut appWord.ActiveDocument.Close To print out 100 documents, put the code into a Function or Sub and call it 100 times, passing the name of the file to print. Joe O'Connell joconnell at indy.rr.com -----Original Message----- From: Billy Pang <tuxedo_man at hotmail.com> To: dba-sqlserver at databaseadvisors.com <dba-sqlserver at databaseadvisors.com> Date: Tuesday, September 16, 2003 3:48 PM Subject: RE: [dba-SQLServer]OT: combine multiple RTF files into one? |ok.... here is what I really want to do.. |print out 100 word documents without having to open up each one... | | | |>From: "Bryan Carbonnell" <Bryan_Carbonnell at cbc.ca> |>Reply-To: dba-sqlserver at databaseadvisors.com |>To: <dba-sqlserver at databaseadvisors.com> |>Subject: RE: [dba-SQLServer]OT: combine multiple RTF files into one? |>Date: Tue, 16 Sep 2003 15:32:02 -0400 |> |>Why not use Word. |> |>1. Open the first one in Word. |> |>2. Move to the end of the doc |> |>3. Do an Insert|File... and select the next file |> |>4. Go back to step 2 98 more times. |> |>You should be able to automate it quite easily if all the files are in |>the same directory. |> |>Bryan Carbonnell |>bryan_carbonnell at cbc.ca |> |> |> >>> tuxedo_man at hotmail.com 16-Sep-03 3:26:25 PM >>> |>The DOS command won't work. There is some sort of Header and Footer in |>"RTF |>Code" and it looks different for each RTF file. When you combine 3 RTF |> |>files into one using the DOS command Copy and then open it in Word, it |>will |>only display the first RTF file. |> |>Any other suggestions? |> |>Billy |> |> |> >From: "Arthur Fuller" <artful at rogers.com> |> >Reply-To: dba-sqlserver at databaseadvisors.com |> >To: <dba-sqlserver at databaseadvisors.com> |> >Subject: RE: [dba-SQLServer]OT: combine multiple RTF files into one? |> >Date: Tue, 16 Sep 2003 10:49:36 -0700 |> > |> >Won't a dos command work? Are there special heads and tails to worry |>about? |> >If not, then this should work: |> > |> >copy file1+file2+file3+etc output1.rtf |> > |> >You'll need to group them like this to avoid spilling over the |>command-line |> >length. |> > |> >Or am I missing something? |> > |> > |> >-----Original Message----- |> >From: dba-sqlserver-bounces at databaseadvisors.com |> >[mailto:dba-sqlserver-bounces at databaseadvisors.com]On Behalf Of Billy |> >Pang |> >Sent: Monday, September 15, 2003 4:42 PM |> >To: dba-SQLServer at databaseadvisors.com |> >Subject: [dba-SQLServer]OT: combine multiple RTF files into one? |> > |> > |> >Does anyone know how to combine multiple RTF files into one? |> > |> >I have about 100 RTF files and I need to combine them all into one |>gigantic |> >file! |> > |> >Thanks in advance, |> >Billy |> > |> >_________________________________________________________________ |> >The new MSN 8: advanced junk mail protection and 2 months FREE* |> >http://join.msn.com/?page=features/junkmail |> > |> >_______________________________________________ |> >dba-SQLServer mailing list |> >dba-SQLServer at databaseadvisors.com |> >http://databaseadvisors.com/mailman/listinfo/dba-sqlserver |> >http://www.databaseadvisors.com |> > |> > |> >--- |> >Incoming mail is certified Virus Free. |> >Checked by AVG anti-virus system (http://www.grisoft.com). |> >Version: 6.0.510 / Virus Database: 307 - Release Date: 8/14/2003 |> > |> >--- |> >Outgoing mail is certified Virus Free. |> >Checked by AVG anti-virus system (http://www.grisoft.com). |> >Version: 6.0.510 / Virus Database: 307 - Release Date: 8/14/2003 |> > |> > |> >_______________________________________________ |> >dba-SQLServer mailing list |> >dba-SQLServer at databaseadvisors.com |> >http://databaseadvisors.com/mailman/listinfo/dba-sqlserver |> >http://www.databaseadvisors.com |> > |> |>_________________________________________________________________ |>MSN 8 helps eliminate e-mail viruses. Get 2 months FREE*. |>http://join.msn.com/?page=features/virus |> |>_______________________________________________ |>dba-SQLServer mailing list |>dba-SQLServer at databaseadvisors.com |>http://databaseadvisors.com/mailman/listinfo/dba-sqlserver |>http://www.databaseadvisors.com |> |>_______________________________________________ |>dba-SQLServer mailing list |>dba-SQLServer at databaseadvisors.com |>http://databaseadvisors.com/mailman/listinfo/dba-sqlserver |>http://www.databaseadvisors.com |> | |_________________________________________________________________ |Add photos to your e-mail with MSN 8. Get 2 months FREE*. |http://join.msn.com/?page=features/featuredemail | |_______________________________________________ |dba-SQLServer mailing list |dba-SQLServer at databaseadvisors.com |http://databaseadvisors.com/mailman/listinfo/dba-sqlserver |http://www.databaseadvisors.com |