文件夹选择对话框 JS实现的两种方案

来源:互联网 发布:雄风3误射大陆反应知乎 编辑:程序博客网 时间:2024/05/26 09:55

文件夹选择对话框 JS实现的两种方案

/**
 * browseFolder.js
 * 该文件定义了BrowseFolder()函数,它将提供一个文件夹选择对话框
 * 以供用户实现对系统文件夹选择的功能
 * 文件夹选择对话框起始目录由
 * Shell.BrowseForFolder(WINDOW_HANDLE, Message, OPTIONS, strPath)函数
 * 的strPath参数设置
 * 例如:0x11--我的电脑
 *   0 --桌面
 *  "c://"--系统C盘
 
 * 用如下代码把该函数应用到一个HTML文件中:
 *  <script src="browseFolder.js"></script>
 * 或把下面代码直接COPY到<script language="javascript">...</script>标签中;
 *
 * 用一般的触发函数均可在HTML文件中使用该函数
 * 例如:<input type="button" onclick="BrowseFolder()" />
 * 注意:请定义NAME为savePath的输入框接收或显示返回的值,例如:
 *    <input type="text" name="savePath" /> 
 *
 * <SPAN style="COLOR: #ff0000">特别注意的是,由于安全方面的问题,你还需要如下设置才能使本JS代码正确运行,</SPAN>
 * <SPAN style="COLOR: #ff0000">否者会出现"没有权限"的问题.</SPAN>
 *
 * 1、设置可信任站点(例如本地的可以为:http://localhost) 
 * 2、其次:可信任站点安全级别自定义设置中:设置下面的选项 
 * "对没有标记为安全的ActiveX控件进行初始化和脚本运行"----"启用"  
 */ 
functionBrowseFolder(){
 try{
  varMessage = "请选择文件夹"//选择框提示信息
  varShell = newActiveXObject( "Shell.Application");
  varFolder = Shell.BrowseForFolder(0,Message,0x0040,0x11);//起始目录为:我的电脑
  //var Folder = Shell.BrowseForFolder(0,Message,0); //起始目录为:桌面
  if(Folder !=null){
    Folder = Folder.items(); // 返回 FolderItems 对象
    Folder = Folder.item(); // 返回 Folderitem 对象
    Folder = Folder.Path;  // 返回路径
    if(Folder.charAt(Folder.length-1) !="//"){
      Folder = Folder +"//";
    }
    //document.all.savePath.value=Folder;
  
    document.getElementById("savePath").value=Folder;//savePath是指输出的控件id。
  
    returnFolder;
  }
 }catch(e){ 
  alert(e.message);
 }
}

 

另外一种不存在安全问题的方法是使用js自己来实现文件夹选择,会丑一些。

<head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>无标题文档</title></head><body><table border="0" cellpadding="0" width="100%" id="tb_show">                <tr>            <td width="18%">文件保存位置:</td>            <td width="82%">                 <%--<html:file property="file" size="40" styleClass="inputbox"/>--%>                <input name="backDir" type="text" value ="C:\" size="100" width="500">            </td>        </tr>        <tr>            <td>目录位置:</td>            <td>                 <select name="tables_drive" id="tables_drives" onchange="get_drives()" ></select>            </td>        </tr>        <tr>                <td colspan="2">                            <select name="table_folder" id="table_folder" size="10" multiple ondblclick="get_file()"></select>            </td>        </tr></table></body></html><script>/***初始化,将系统所有的驱动器放入table_drives列表*/window.onload = new function init(){    var fso, s, n, e, x;    fso = new ActiveXObject("Scripting.FileSystemObject");    e = new Enumerator(fso.Drives);    s = "";    for (; !e.atEnd(); e.moveNext())    {      x = e.item();      s = s + x.DriveLetter;      s += ":";      if (x.DriveType == 3)         n = x.ShareName;      else if (x.IsReady)         n = x.VolumeName;      else         n = "[驱动器未就绪]";      s +=   n + ",";    }    var drives = s.split(",");        var tableDrives = document.getElementById("tables_drives");    for ( var i = 0; i < drives.length-1; i++ )    {        var option = document.createElement("OPTION");        drives[i].split(":");        option.value = "["+drives[i].split(":")[0]+":]"+drives[i].split(":")[1];        option.text = "["+drives[i].split(":")[0]+":]"+drives[i].split(":")[1];        tableDrives.add(option);    }}/**tables_drives列表中选中的驱动器上所有文件夹放入table_folder列表中*/function get_drives(){    var tableDrives = document.getElementById("tables_drives");    var tableFolders = document.getElementById("table_folder");        for ( var i = 0; i < tableDrives.options.length; i++ )    {                if ( tableDrives.options[i].selected == true )        {            var fso, f, fc, s;                        var drive = tableDrives.options[i].value.split(":")[0].substring(1,tableDrives.options[i].value.split(":")[0].length);            document.getElementById("backDir").value = drive + ":\\";            fso = new ActiveXObject("Scripting.FileSystemObject");                         if (fso.DriveExists(drive))            {                d = fso.GetDrive(drive);                if ( d.IsReady )                {                    f = fso.GetFolder(d.RootFolder);                     fc = new Enumerator(f.SubFolders);                    s = "";                    for (;!fc.atEnd(); fc.moveNext())                    {                     s += fc.item();                     s += ",";                    }                                        var len = tableFolders.options.length;                    while(len >= 0)                    {                        tableFolders.options.remove(len);                        len--;                    }                    var option = document.createElement("OPTION");                    option.value = drive + ":\\";                    option.text = drive + ":\\";                    tableFolders.add(option);                    var folders = s.split(",");                                                          for ( j = 0; j < folders.length -1; j++)                    {                        option = document.createElement("OPTION");                        option.value = folders[j];                        option.text = folders[j];                        tableFolders.add(option);                    }                    }                else                {                    alert("无法改变当前内容!")                }                            }            else            return false;         }            }}/***table_folder双击选项中的一个选项,就将该文件夹下面的文件夹显示在table_folder列表中。*/function get_file(){    var tableFolders = document.getElementById("table_folder");        var tableDrives = document.getElementById("tables_drives");    for ( var i = 0; i < tableFolders.options.length; i++ )    {        if ( tableFolders.options[i].selected == true )        {            var fso, f, fc, s;                        var folderpath = tableFolders.options[i].value.substring(0,tableFolders.options[i].value.length);            if ( folderpath.charAt(folderpath.length-1) == "\\" )            {                document.getElementById("backDir").value = folderpath;            }            else            {                document.getElementById("backDir").value = folderpath + "\\";            }            fso = new ActiveXObject("Scripting.FileSystemObject");                f = fso.GetFolder(folderpath);             fc = new Enumerator(f.SubFolders);            s = "";            for (;!fc.atEnd(); fc.moveNext())            {             s += fc.item();             s += ",";            }                var len = tableFolders.options.length;            while(len >= 0)            {                tableFolders.options.remove(len);                len--;            }                    var opt = "";                        var opt1 = "";            for ( j = 0; j < folderpath.split("\\").length; j++ )            {                var option = document.createElement("OPTION");                opt = opt + folderpath.split("\\")[j]+"\\";                if ( j > 0)                {                    opt1 = opt;                    option.value = opt1.substring(0,opt1.length-1);                    option.text = opt1.substring(0,opt1.length-1);                    tableFolders.add(option);                    }                else                {                    option.value = opt;                    option.text = opt;                    tableFolders.add(option);                                            }            }            if ( tableFolders.options[0].value == tableFolders.options[1].value )            {                tableFolders.options.remove(1);            }             if ( s != "" )                    {                                var folders = s.split(",");                                                      for ( j = 0; j < folders.length -1; j++)                {                    option = document.createElement("OPTION");                    option.value = folders[j];                    option.text = folders[j];                    tableFolders.add(option);                }                }                            }    }}</script>
 
原文地址 http://www.cnblogs.com/jiji262/archive/2012/06/08/2541837.html
原创粉丝点击
热门问题 老师的惩罚 人脸识别 我在镇武司摸鱼那些年 重生之率土为王 我在大康的咸鱼生活 盘龙之生命进化 天生仙种 凡人之先天五行 春回大明朝 姑娘不必设防,我是瞎子 滚筒冼衣机接水接头漏水怎么办 奶块设备被禁封怎么办 奶块设备封禁怎么办 晚上衣服干不了怎么办 3dmax视图混乱怎么办 钉枪能打进肉里怎么办 公司迟发工资怎么办 打枪后一直耳鸣怎么办 打枪震的耳鸣怎么办 尚方宝剑弄丢了怎么办 九五出款被黑18w怎么办 很容易感动伤感哭怎么办 为什么安卓版ps打不开怎么办 遇见职业打假人怎么办 打假投诉极限次怎么办 导师无故留学生要怎么办 孩子24了不争气怎么办 退休工资卡遗失怎么办大同市 天津体育惠民卡怎么办 高跟鞋走路太响怎么办 高跟鞋太响怎么办妙招 穿高跟鞋想开车怎么办 脚瘦穿高跟鞋容易掉怎么办 dq11时装卖了怎么办 廉洁教育手抄报怎么办 做美发口才不好怎么办 月嫂怎么办澳大利亚签证 高一学生叛逆怎么办 和异性说话紧张怎么办 幼儿教师模拟讲课紧张怎么办 静不下心来怎么办 失眠焦虑到极点怎么办 老师罚学生买东西怎么办 大学每晚查寝怎么办 教育机构会计账怎么办 车陂扣12分的话怎么办 公选课挂科怎么办 颈椎疼带头疼怎么办 本科出身不好该怎么办 科研经历不丰富怎么办 拍电影需要一些公共场所怎么办