Solved: Need code to open a WORD document for read only.

Hey gang,
I think what I want to do is simple but being a relative newbie, I haven't been successful in doing it myself.

I have made a FORM and the FORM has a MULTIPAGE on it. On my MULTIPAGE(s) I have listed different department with their phone numbers, thus creating a little roladex of sorts. I want to include on one of my pages a COMMAND BUTTON that would open up a WORD document for READ ONLY. Can someone show me the code to perform this relatively simple task that I seem to be having such a hard time with.

Thanks in advance for any help.
Butch

[vba]

Sub OpenWord()
Dim WordApp As Object
Dim WordDoc As Object

Set WordApp = CreateObject("Word.Application")
Set WordDoc = WordApp.Documents.Open(Filename:="C:\test\test.doc", ReadOnly:=True)
WordApp.Visible = True

'do your stuff

Set WordDoc = Nothing
Set WordApp = Nothing
End Sub
[/vba]

XLD,
It works beautifully. Thanks so much for the help.

Butch :friends: