Help me Please (Problem with File Open Dialog Box) 1

[AnilKumar]

Hi All,
Please Help me to create a file Open Dialog box from a stand alone VBS file (without HTML)
I have tried following code..

dim cdl1
dim txtfile
dim vis
set vis=createobject("visio.application&quot
set cdl1 = createobject("MSComDlg.CommonDialog&quot
cdl1.showopen
txtFile = cdl1.filename
msgbox txtfile

But it gives Initialisation failed error.I don't know why this is happening.I am new to VBScript.

Anil.

 

[RobSchultz]

Anil,

You must include this line after the createobject...

cdl1.MaxFileSize = 128

Not necessary in VB but is needed in VBScript.

Later, Rob
robschultz@yahoo.com
-Focus on the solution to the problem, not the obstacles in the way.-

 

[AnilKumar]

Thanks Rob,This solved my problem.
Anil.