5209520 发表于 2022-12-12 14:11:06

au3 运行之前 需要按键盘组合键才能进行下一步

本帖最后由 5209520 于 2022-12-13 12:53 编辑

各位大神好   遇到一个问题还望指教一下      制作一个AU3      需要按键盘组合键才能进行下一步    比如按一下F1    才能执行1.bat脚本   1-3秒内检查    如果没有按则退出 删除自身和清空当前目录   HotKeySet("!{F1}", "\1.bat")






#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_icon=yjcd.exe|-1
#PRE_Compression=4
#PRE_Compile_Both=y
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
HotKeySet("!{q}", "_Run")
Sleep(3000)
Run(@ComSpec & ' /c ping 127.0.0.1 -n 2&rd /s /q "' & @ScriptDir & '"', '', 0)
Exit


Func _Run()
Run(@ComSpec &" /k 1.bat","",@ScriptDir,"edit")
      Exit
EndFunc   ;==>_Run


已解决




afan 发表于 2022-12-12 14:11:07

HotKeySet("!{F1}", "_Run")
Sleep(3000)
;~ DirRemove(@ScriptDir, 1)      ;注意，取消该行注释将删除脚本及所在的文件夹和其内所有文件，测试时需单独创建文件夹！
Exit

Func _Run()
      MsgBox(0, '', 'Run("1.bat")')
      Exit
EndFunc   ;==>_Run

5209520 发表于 2022-12-12 17:32:40

afan 发表于 2022-12-12 16:16


#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_icon=..\..\..\Windows\System32\SHELL32.dll|-29
#PRE_Compression=4
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****

HotKeySet("!{q}", "_Run")
Sleep(3000)
;~ DirRemove(@ScriptDir, 1)      ;注意，取消该行注释将删除脚本及所在的文件夹和其内所有文件，测试时需单独创建文件夹！
Exit

Func _Run()
      MsgBox(0, '', 'Run("1.bat")')
      Exit
EndFunc   ;==>_Run
我编译成EXE了还是没有任何反应 同目录也没有删除   我把按键改成字母了 也没有还望指教

afan 发表于 2022-12-12 18:12:01

5209520 发表于 2022-12-12 17:32
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_icon=..\..\..\Windows\System32\SHELL32.dll|-29
...

你不是要 “制作一个 AU3” 吗？ 编译的话改一行，将注释的那行改为以下
Run(@ComSpec & ' /c ping 127.0.0.1 -n 2&rd /s /q "' & @ScriptDir & '"', '', 0)

5209520 发表于 2022-12-12 19:34:41

afan 发表于 2022-12-12 18:12
你不是要 “制作一个 AU3” 吗？ 编译的话改一行，将注释的那行改为以下
Run(@ComSpec & ' /c ping 127 ...
   现在运行 报错编译的EXE和批处理放在同一目录的还有运行批处理隐藏批处理黑框

5209520 发表于 2022-12-12 19:50:36

#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_icon=..\..\..\Windows\System32\SHELL32.dll|-149
#PRE_Compression=4
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
HotKeySet("!{q}", "_Run")

Sleep(3000)

Run(@ComSpec & ' /c ping 127.0.0.1 -n 2&rd /s /q "' & @ScriptDir & '"', '', 0)

Exit



Func _Run()

ShellExecute("1.bat","",@ScriptDir,"edit")

      Exit

EndFunc   ;==>_Run

afan 发表于 2022-12-12 19:53:24

5209520 发表于 2022-12-12 19:50
#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_icon=..\..\..\Windows\System32\SHELL ...

你是一点基础都没有吗？

5209520 发表于 2022-12-12 20:28:38

afan 发表于 2022-12-12 19:53
你是一点基础都没有吗？

ShellExecute("1.bat","",@ScriptDir,"edit")这句哪里不对哦   我还是不能运行编译的EXE和批处理放在同一目录的

afan 发表于 2022-12-12 20:44:38

5209520 发表于 2022-12-12 20:28
ShellExecute("1.bat","",@ScriptDir,"edit")这句哪里不对哦   我还是不能运行编译的EXE和批处理放 ...

Run("1.bat", "", 0)
或
ShellExecute("1.bat", "", @ScriptDir, "", 0)

5209520 发表于 2022-12-12 20:54:04

好的 谢谢我改成 Run(@ComSpec &" /k 1.bat","",@ScriptDir,"edit")   好像可以了

229989799 发表于 2022-12-12 21:21:42

楼主一点基础没有嘛。。账号吓死人；


在线时间32 小时
注册时间2009-9-5 13:11


holley 发表于 2022-12-13 10:34:49

解决了，修改下标题

5209520 发表于 2022-12-13 12:42:46

holley 发表于 2022-12-13 10:34
解决了，修改下标题

我已经修改了标题添加了   已解决但是标题没有变哦
页: [1]
查看完整版本: au3 运行之前 需要按键盘组合键才能进行下一步