browsing for a file
browsing for a file
(OP)
Hello all!
I'm writting an HTML document where part of the functionality lets the user browse for a folder, and in another place to browse for a file. After searching through many threads, I've found that the following code works for the folders:
Set objFolder = objShell.BrowseForFolder(0, "Select a folder:", &H0)
and the following code works for files:
<input type="file" name="myFile">
However, these two methods display different dialogue boxes, and I'm trying to achive continuity. The BrowseForFolder function does not work when selecting files, and I can't find any HTML code to return a folder. Does anyone know how to do either of these two things, or yet a third option that will achive both? I am espescially interested in the vbScript method because I will be able to use it in non-html programs.
Thanks all for your help.
I'm writting an HTML document where part of the functionality lets the user browse for a folder, and in another place to browse for a file. After searching through many threads, I've found that the following code works for the folders:
Set objFolder = objShell.BrowseForFolder(0, "Select a folder:", &H0)
and the following code works for files:
<input type="file" name="myFile">
However, these two methods display different dialogue boxes, and I'm trying to achive continuity. The BrowseForFolder function does not work when selecting files, and I can't find any HTML code to return a folder. Does anyone know how to do either of these two things, or yet a third option that will achive both? I am espescially interested in the vbScript method because I will be able to use it in non-html programs.
Thanks all for your help.
Talk To Other Members
RE: browsing for a file
Set ObjFSO = CreateObject("UserAccounts.CommonDialog")
ObjFSO.Filter = "VBScripts|*.vbs|Text Documents|*.txt|All Files|*.*"
ObjFSO.FilterIndex = 3
ObjFSO.InitialDir = "c:\myscripts"
InitFSO = ObjFSO.ShowOpen
If InitFSO = False Then
Wscript.Echo "Script Error: Please select a file!"
Wscript.Quit
Else
Wscript.Echo "You selected the file: " & ObjFSO.FileName
End If
RE: browsing for a file
set oFO = CreateObject("SAFRCFileDlg.FileOpen")
' exposed in safrcdlg.dll
oFO.OpenFileOpenDlg
wscript.echo oFO.FileName
RE: browsing for a file
Error: ActiveX component can't create object: 'SAFRCFileDlg.FileOpen'
which probably means I need to download the appropriate dlls. I do now know if that will be acceptable to our LAN team, so if there are other alternatives, I would be appriciative to hear them!
Thanks
RE: browsing for a file
have you tried my first post??? this works for me and doesnt require an additional dll...
RE: browsing for a file
[1] Safrcfiledlg.fileopen is with xp.
[2] For simulation using file selection using input, type="file" msie browser, you can dynamically make htm file for systematic use by calling a pre-fabricated block of code. That is the cheapest and most probably useable for windows platform. You can mimic or use one from jsware:
http://www.jsware.net/jsware/zips/claspak.zip
in particular, the fileopen.vbs.
[3] If it is more a developers/technical environment where you think most get vb package installed (a commercial visual studio or ms free vb5 editor) then you have all the necessary licence to use comdialog.ocx. With it installed, you can do something neat, like this.
CODE
with ocomdlg
.dialogtitle="select a file"
.initdir="d:\test"
.filter="All files (*.*)"
.maxfilesize=10000 'filter filesize
.showopen
end with
filespec=ocomdlg.filename
wscript.echo filespec
regards - tsuji
RE: browsing for a file
mrmovie, I do get an error with your first example, which is that activeX can't create the object. I'll keep trying though.
tsuji, the vbScript that you've provided from the download was cool, but it's basically the same thing I have above where it uses the HTML: <input type="file" name="myFile">. I did provide me with some ideas for other scripts though.
Also, none of us have VB Studios, or anything like that. We're mostly a mainframe COBOL shop, so my options are limited to straight VB/HTML code. I may venture in to JScript if all else fails.
Please let me know if there are more ideas out there! Thanks again!