求助。求助
bat吧
全部回复
仅看楼主
level 2
妃常人 楼主
求大佬帮忙写个命令[乖]打开bat弹出对话框“使用表格请复制"，下边一个按钮"好的，我复制"，点击按钮后打开指定文件夹。[真棒][真棒][真棒][真棒][真棒]
2021年03月14日 14点03分 1
level 2
妃常人 楼主
请大神帮忙，谢谢
2021年03月14日 14点03分 2
level 9
qop_dob
以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI
/*&echo off&cls
rem 自定义只有一个按钮对应执行打开指定文件夹的提示对话框
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
cd /d "%~dp0"
set "folder=C:\Windows\System32"
type "%~f0"|cscript -nologo -e:jscript "%~f0">"%tmp%\t.hta"
mshta "%tmp%\t.hta"|find /i "Y"&&(explorer "%folder%")
echo;%#% +%$%%$%/%_% %z%
pause
exit
*/
var text=WSH.StdIn.ReadAll().match(/\/\*\r\n([\s\S]+)\r\n\*\/\s*$/);
WSH.echo(text[1]);
/*
<HTA:APPLICATION MaximizeButton="no" Scroll="no" />
<head><meta content="text/html;charset=gbk">
<title>标题</title><script>
window.resizeTo(300,200);
var fso=new ActiveXObject('Scripting.Filesystemobject');
function checkcli(e){
fso.GetStandardStream(1).Write('Y');
window.close();
}
</script></head><body style="text-align:center;">
使用表格请复制
<br><br><input type="button" value="好的，我复制" onclick="checkcli(this)" />
</body>
*/
2021年03月15日 15点03分 3
1