opening a word document for printing in access

[vicsalt]

i have links to word documents which obviously opens word and the document.
all i want to do is print the word document. is there a easyier way

 

[Brendan Reynolds]

Public Sub PrintWordDoc(ByVal DocName As String)

Dim objApp As Object
Dim objDoc As Object

Set objApp = CreateObject("Word.Application")
Set objDoc = objApp.Documents.Open(DocName)
objDoc.PrintOut
objDoc.Close
Set objDoc = Nothing
Set objApp = Nothing

End Sub

Example of use ...

PrintWordDoc "c:\usenet\test.doc"

 

[vicsalt]

Sorry more help needed Ive not used code before

Public Sub PrintWordDoc(ByVal DocName As String)

Dim objApp As Object
Dim objDoc As Object

Set objApp = CreateObject("Word.Application")
Set objDoc = objApp.Documents.Open(DocName)
objDoc.PrintOut
objDoc.Close
Set objDoc = Nothing
Set objApp = Nothing

End Sub

Example of use ...

PrintWordDoc "c:\usenet\test.doc"