Susan Harkins
ssharkins at setel.com
Wed May 9 12:34:43 CDT 2007
'Print customer slip for current customer. Dim appWord As Word.Application Dim doc As Word.Document 'Dim rst As ADODB.Recordset 'Dim strSQL As String 'Set appWord = GetObject(, "Word.Application") Set appWord = New Word.Application 'With appWord 'Set doc = appWord.Documents("Customer Slip") On Error GoTo errHandler Set doc = appWord.Documents.Open("C:\WordForms\Customer Slip", , True) As you can see from the commented lines, I've tried a number of ways to retrieve a Word document named Customer Slip -- I want to fill predefined fields with Access data. If I tried to set the Documents property to the file name I get a "bad file" error. If I try to do it in the .Open method, I get the following: -2147417851 Automation error The server threw an exception. I don't have a clue what that means. Susan H.