无忧启动论坛

标题: 批处理选择文件和选择文件夹范例 [打印本页]

作者: 窄口牛 时间: 2022-2-20 10:34
标题: 批处理选择文件和选择文件夹范例
本帖最后由窄口牛于 2022-2-26 19:58 编辑

这下在一部分支持vbs的pe里也能用了。

选择文件和目录.rar (1.04 KB, 下载次数: 73)

实证xp也能正常工作。

作者: nttwqz 时间: 2022-2-20 12:38
两小时后的沙发

周末的人就是少啊

作者: 窄口牛 时间: 2022-2-20 12:45
还行吧，下载十八次了。

作者: promrhxq 时间: 2022-2-20 19:51
感谢分享好东东

作者: 创新科技2015 时间: 2022-2-20 22:08

感谢分享

作者: 逍遥逸仙 时间: 2022-2-21 09:46
谢谢

作者: 逍遥逸仙 时间: 2022-2-21 21:56
下载了，研究研究

作者: 萌新挂B 时间: 2022-2-22 15:17
这个有什么用？不是很明白！请指教！

作者: being 时间: 2022-2-26 19:22

作者: 窄口牛 时间: 2022-2-26 19:58
本帖最后由窄口牛于 2022-2-26 20:01 编辑

更新修正。换了一个可以设置文件后缀的。

作者: ddnflier 时间: 2022-2-26 20:55
什么东东?

作者: nowayer 时间: 2023-10-20 04:04
提示: 作者被禁止或删除内容自动屏蔽

作者: batche 时间: 2023-10-21 21:03
生成vbs有点麻烦。试试这个，写得比较复杂

@echo off
for /f "delims=" %%f in ('mshta.exe "about:<object id=d classid=clsid:3050f4e1-98b5-11cf-bb82-00aa00bdce0b></object><script>moveTo(0,-9999);function window.onload(){var p=/[^\0]*/;new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(p.exec(d.object.openfiledlg('',null,'All files (*.*)|*.*|Microsoft Word (*.doc;*.docx)|*.doc;*.docx|Adobe pdf (*.pdf)|*.pdf|','Select file'))+'\n');close();}</script><hta:application showintaskbar=no />"^&rundll32 javascript:"\..\mshtml,RunHTMLApplication "^;var%%20folder^=new%%20ActiveXObject^("Shell.Application"^).BrowseForFolder^(0^,"Select Folder"^,64^,17^)^;folder^=folder.items^(^)^;folder^=folder.item^(^)^;folder^=folder.Path^;new%%20ActiveXObject^("Scripting.FileSystemObject"^).GetStandardStream^(1^).Write^(folder^)^;close^(^)') do echo,%%f
pause

复制代码

作者: rbwrbw 时间: 2023-10-21 21:35
好

作者: rbwrbw 时间: 2023-10-22 09:37
好!!!!!琰

欢迎光临无忧启动论坛 (http://bbs.wuyou.net/)