Hi all, I am working on a web-application, where users can pick a file with the HTML element <input type="file">. I want the dir G:\documents to be the initial dir (i.e. users must start browsing in this directory). I know in Visual Basic you can specify an initdir, but this doesn't seem to work with VBscript. Has anyone any idea how to do the trick? Thanx. <webguru>iqof188</webguru>
Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Initdir for input type="file" 1
- Thread starter iqof188
- Start date
-
1
- #2
I can show you a way but it's not tested on Netscape.
Code:
<html>
<head>
<object id = "cdl1" CLASSID = "Clsid:F9043C85-F6F2-101A-A3C9-08002B2F49FB">
<param name = "InitDir" value = "C:\">
<param name = "Filter" value = "Text Files (*.txt)|*.txt">
Error Loading Common Dialog!
</object>
<input type = "text" name = "txtFile" />
<script language = "VBScript">
sub cdl()
cdl1.showopen
txtFile.value = cdl1.filename
end sub
</script>
<input type = "button" value = "Browse ..." onClick="cdl" />
</head>- Thread starter
- #3
Thanks for your answer Caf, but it doesn't work on my machine (I am using IE5.0). I get the error message: "Object doesn't support this property or method: 'cdl1.showopen'. Does this mean that the object is not installed on IIS4.0? Thanks for your help! <webguru>iqof188</webguru>
Hi
I don't understand why it doesn't work but try this alternative
<html>
<head>
<input type = "text" name = "txtFile" />
<script language = "VBScript">
sub cdl()
dim cdl1
set cdl1 = createobject("MSComDlg.CommonDialog"
cdl1.showopen
txtFile.value = cdl1.filename
end sub
</script>
<input type = "button" value = "Browse ..." onClick="cdl" />
</head>
BTW I tested this in IIS 4 & 5 IE4/5/5.5
caf
I don't understand why it doesn't work but try this alternative
<html>
<head>
<input type = "text" name = "txtFile" />
<script language = "VBScript">
sub cdl()
dim cdl1
set cdl1 = createobject("MSComDlg.CommonDialog"
cdl1.showopen
txtFile.value = cdl1.filename
end sub
</script>
<input type = "button" value = "Browse ..." onClick="cdl" />
</head>
BTW I tested this in IIS 4 & 5 IE4/5/5.5
caf
- Status
Similar threads
- Locked
- Question
- Locked
- Question