Reg Getobject Funtion

Hi,
Would anyone please tell me why iam not able to view the word document which already exists.I only get the word application opened but not the actual document.

I gave the following code

dim x as object
set x=getobject("c:\l5.doc")
x.application.visible=true

Expecting your reply,

Thankyou,

shoba

You could always use the creatobject option for this:

VB Code:

Dim objWordApp As Object
Set objWordApp = CreateObject("Word.application")
 
objWordApp.Visible = True
objWordApp.documents.open "C:\file.doc"

Alternatively, if you're writing this in vb & not from a script try not to use late binding (createobject or getobject functions) and try to use one of these instead:

VB Code:

' At the top of a form
Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
 
Private Const SW_SHOWNORMAL = 1
 
Private Sub Form_Load()
    ShellExecute Me.hwnd, vbNullString, "C:\Path\file.doc", _
    vbNullString, "C:\", SW_SHOWNORMAL
End Sub

or...

VB Code:

'Add a reference to the "Microsoft Word x.0 object library" from the
'the project menu>references option in vb.
Private Sub Form_Load()
    Dim wrdApp As Word.Application
    Set wrdApp = New Word.Application
    
    wrdApp.Visible = True
    wrdApp.Documents.Open "C:\path\file.doc"
End Sub