弹出文件夹选择框

@echo off
rem 弹出文件夹浏览选择对话框
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
(echo;Set sa=CreateObject^("Shell.Application"^)
echo;Set item=sa.Namespace^(0^).Self
echo;Set objfolder=sa.BrowseForFolder^(0, "Select a Folder:", 0, item.Path^)
echo;If objfolder Is Nothing Then
echo; WSH.Quit
echo;End If
echo;Set objitem=objfolder.Self
echo;WSH.echo objitem.Path)>"%tmp%\v.v"
for /f "delims=" %%a in ('cscript -nologo -e:vbscript "%tmp%\v.v"') do echo;"%%a"
echo;%#% +%$%%$%/%@% %z%
pause
exit

实例

文件选择框

<!-- :
@echo off
@SET sqlfile=D:\file
for /f "delims=" %%a in ('mshta "%~f0"') do  SET sqlfile=%%a
pause&exit /b
--><input type=file id=f>
<script>
f.click();new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(f.value);close();
</script>

文件夹选择框

<!-- :
@echo off
for /f "delims=" %%a in ('mshta "%~f0"') do echo;%%a
pause&exit /b
--><script>
var Shell = new ActiveXObject("Shell.Application");
var Folder = Shell.BrowseForFolder(0, "请选择文件夹", 0); //起始目录为:桌面
if (Folder != null) {Folder = Folder.items();Folder = Folder.item();Folder = Folder.Path;new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(Folder);
}
close();
</script>

实例

转载:http://www.bathome.net/thread-34496-1-2.html

Bat调用/弹出文件或文件夹选择对话框相关推荐

  1. 弹出文件夹选择对话框

    不多说了,直接贴出函数: /// // 功能:弹出一个文件夹选择对话框 // 返回:用户选择的文件夹路径 // CString GetSavePath() {#define BIF_NEWDIALOG ...

  2. git或者ssh出错 fatal:open /dev/null or dup failed: No such file or directory、弹出mitty.dump文件

    使用git Bash here闪退并生成mintty.exe.stackdump文件 cmd使用git 报错 fatal:open /dev/null or dup failed: No such f ...

  3. 标签软件点打印弹出打印到文件怎么解决

    用过中琅标签软件的小伙伴可能就会遇到打印标签的时候,点打印后打印机没有反应,而是弹出打印到文件,或者是另存为文件.输出到文件等等情况.那么,如果我们在使用标签软件打印标签的时候遇到这种情况怎么解决呢? ...

  4. MFC打开文件夹选择对话框

    函数名:OnBnClickedButtonDir 函数功能:通过点击按钮,弹出打开文件夹选择对话框 参数:无 返回值:无 额外说明: ulFlags标志位说明: BIF_BROWSEFORCOMPUT ...

  5. vc文件夹选择对话框

    关键字 定制,文件夹选择对话框,SHBrowseForFolder,文件夹选择,目录选择 原作者姓名 张增强 介绍 Displays a dialog box that enables the use ...

  6. 文件夹选择对话框 JS实现(转)

    /** * browseFolder.js * 该文件定义了BrowseFolder()函数,它将提供一个文件夹选择对话框 * 以供用户实现对系统文件夹选择的功能 * 文件夹选择对话框起始目录由 * ...

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

    文件夹选择对话框 JS实现的两种方案 /**  * browseFolder.js  * 该文件定义了BrowseFolder()函数,它将提供一个文件夹选择对话框  * 以供用户实现对系统文件夹选择 ...

  8. js在手机端如何用脚本调用弹出键盘?

    js在手机端如何用脚本调用弹出键盘? 鍵盤只能靠使用者行為觸發,不能通過腳本觸發,測試過 ios 和 android 確實是如此. 而所謂的使用者行為只可以通過綁定事件觸發 比如: <input ...

  9. Ajax弹出式无刷新城市选择特效

    为什么80%的码农都做不了架构师?>>>    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional// ...

最新文章

  1. oracle DBA 常用表和视图
  2. 强网杯2021 BlueTeaming (内存取证)
  3. 做项目管理PM人的特质
  4. MySQL索引介绍,普通索引,全文索引,空间索引,多列索引使用原则,建立索引常用的规则
  5. iOS----------UITextField实现过滤选中状态拼音
  6. 说到 SASE,新的安全范式有哪些
  7. Centos7制作局域网http的yum源
  8. 王者非法进入服务器维护封号,王者荣耀哪些行为会被封号 违规封号行为汇总...
  9. V4L2学习(三)框架分析
  10. IaaS、PaaS、SaaS、BaaS、FaaS、APaaS、IPaaS、IDaaS、DaaS
  11. mysql passwor authen_Navicat连接虚拟机的MySQL时 提示“Password authentication failed”
  12. 校园网编写linux网络认证,个人心得:校园网linux锐捷认证ruijie(xrgsu)使用及xrgsu下载...
  13. Unity 3D模型展示素材
  14. Matlab数据标准化——mapstd、mapminmax
  15. 功能测试的测试工作流程
  16. 方便到令人发指的枚举工具类
  17. Angular2属性绑定
  18. MySQL-子查询(嵌套)
  19. Informatica保障江苏电信规范化ETL开发
  20. 如何安装谷歌服务框架?(Google三件套下载教程)

热门文章

  1. 关于判断力 - 正视事实是基础
  2. P3382 【模板】三分法
  3. Linux下海康威视工业相机的SDK二次开发
  4. 码农的半衰期只有15年?
  5. 震动效果调研 - iOS
  6. linux下使用迅雷的完美办法(免费)
  7. MATLAB数据类型——浮点数
  8. 【转载】Java语言中的参数传递
  9. CAD怎么打出这种竖排文字
  10. 已解决[W:11:55:47.235 NotebookApp] Cannot bind to localhostusing 127.0:0.1 as defaultip[winError 10055]