Can anyone please tell me how should I write my codes to open a file like
the example below?what ever I tried ,this doesn't work.

Sub test_1()

FILEOPEN = Shell ("c:\Program Files\EC55\EC55.EXE" &
"\\Server\job-dwg-calc\2004\A3-ENERCALC\04021.ecw", vbMaximizedFocus)

End Sub