带倒计时的操作确认弹窗工具 - yesnotimer

77七

写批处理脚本时需要这种工具，试了cido、cax都不能倒计时自动确认，故用ai写了一个ahk（v1）代码，可以转为exe，供批处理调用。

调用方法：
转为exe，方便批处理中使用


test.bat

1. @echo off
   
2. cd /d "%~dp0"
   
3. yesnotimer "标题\n正文1\n正文2" 7
   
4. if "%errorlevel%" equ "7" (
   
5.         echo 你选择了 否
   
6. ) else (
   
7.         echo 你选择了 是
   
8. )
   
9. pause

复制代码

弹窗样式：




yesnotimer.ahk

1. #NoEnv
   
2. #NoTrayIcon
   
3. #SingleInstance, Force
   
4. SetBatchLines, -1
   
5. 
   
6. ;--------------------------------------------------
   
7. ; 参数：
   
8. ;   参数1 = 提示内容，支持用 \n 表示换行
   
9. ;   参数2 = 倒计时秒数
   
10. ;
    
11. ; 返回值：
    
12. ;   6 = 是
    
13. ;   7 = 否、空格、Esc、关闭窗口或超时
    
14. ;
    
15. ; 快捷键：
    
16. ;   Enter        = 是
    
17. ;   小键盘 Enter = 是
    
18. ;   Space        = 否
    
19. ;   Esc          = 否
    
20. ;--------------------------------------------------
    
21. 
    
22. Prompt = %1%
    
23. Timeout = %2%
    
24. 
    
25. ; 未传入提示内容时的默认文字
    
26. if (Prompt = "")
    
27.     Prompt := "是否继续执行？"
    
28. 
    
29. ; 将参数中的 \n 或 \N 转换成真正的换行
    
30. Prompt := StrReplace(Prompt, "\n", "`n")
    
31. Prompt := StrReplace(Prompt, "\N", "`n")
    
32. 
    
33. ; 超时参数无效时，默认10秒
    
34. if Timeout is not integer
    
35.     Timeout := 10
    
36. 
    
37. if (Timeout <= 0)
    
38.     Timeout := 10
    
39. 
    
40. Remaining := Timeout
    
41. 
    
42. ;--------------------------------------------------
    
43. ; 创建窗口
    
44. ;--------------------------------------------------
    
45. 
    
46. Gui, +AlwaysOnTop +HwndDialogHwnd
    
47. Gui, Margin, 20, 18
    
48. Gui, Font, s10, Microsoft YaHei UI
    
49. 
    
50. Gui, Add, Text, w360 Center, %Prompt%
    
51. 
    
52. Gui, Add, Text, w360 Center y+15 vCountdownText
    
53.     , %Remaining% 秒后自动选择“否”。
    
54. 
    
55. Gui, Add, Button, xm+75 y+18 w100 h30 Default vYesButton gChooseYes
    
56.     , 是(&Y)
    
57. 
    
58. Gui, Add, Button, x+20 w100 h30 vNoButton gChooseNo
    
59.     , 否(&N)
    
60. 
    
61. Gui, Show, AutoSize, 操作确认
    
62. 
    
63. ; 默认将焦点放在“是”按钮
    
64. GuiControl, Focus, YesButton
    
65. 
    
66. SetTimer, UpdateCountdown, 1000
    
67. return
    
68. 
    
69. 
    
70. ;--------------------------------------------------
    
71. ; 每秒更新倒计时
    
72. ;--------------------------------------------------
    
73. 
    
74. UpdateCountdown:
    
75.     Remaining--
    
76. 
    
77.     if (Remaining <= 0)
    
78.     {
    
79.         SetTimer, UpdateCountdown, Off
    
80.         ExitApp, 7
    
81.     }
    
82. 
    
83.     GuiControl,, CountdownText
    
84.         , %Remaining% 秒后自动选择“否”。
    
85. return
    
86. 
    
87. 
    
88. ;--------------------------------------------------
    
89. ; 选择“是”
    
90. ;--------------------------------------------------
    
91. 
    
92. ChooseYes:
    
93.     SetTimer, UpdateCountdown, Off
    
94.     ExitApp, 6
    
95. return
    
96. 
    
97. 
    
98. ;--------------------------------------------------
    
99. ; 选择“否”
    
100. ;--------------------------------------------------
     
101. 
     
102. ChooseNo:
     
103.     SetTimer, UpdateCountdown, Off
     
104.     ExitApp, 7
     
105. return
     
106. 
     
107. 
     
108. ;--------------------------------------------------
     
109. ; 关闭窗口或按 Esc，均按“否”处理
     
110. ;--------------------------------------------------
     
111. 
     
112. GuiClose:
     
113. GuiEscape:
     
114.     SetTimer, UpdateCountdown, Off
     
115.     ExitApp, 7
     
116. return
     
117. 
     
118. 
     
119. ;--------------------------------------------------
     
120. ; 仅在本程序窗口激活时启用快捷键
     
121. ;--------------------------------------------------
     
122. 
     
123. #If WinActive("ahk_id " . DialogHwnd)
     
124. 
     
125. Enter::
     
126. NumpadEnter::
     
127.     Gosub, ChooseYes
     
128. return
     
129. 
     
130. Space::
     
131.     Gosub, ChooseNo
     
132. return
     
133. 
     
134. #If

复制代码

yesnotimer.exe文件

yesnotimer.rar (495.14 KB)

昨天 04:17 上传

点击文件名下载附件
yesnotimer.exe文件
阅读权限: 5

aloha20200628

给一个 bat+mshta 版本如下，熟悉网页编码的可以很容易进一步优化其中各元素细节...

test.bat

1. <!-- :
   
2. @echo off &for /f %%v in ('mshta "%~f0" ') do echo,%%v
   
3. pause&exit/b
   
4. -->
   
5. <script>resizeTo(550,250);</script>
   
6. <title>《示范：倒计时确认》</title><hta:application sysMenu='no' />
   
7. <style>body{font-family:'Microsoft YaHei';color:white;} button{margin:0,30px;width:100px;}</style>
   
8. <script>
   
9.     ta=10; tr=ta; //设置倒计时长（秒数）
   
10.     onload=function() { ti=setInterval(renew, 1000); };
    
11.     function renew() {
    
12.         tr--; t.innerText='剩余时间：'+tr+' 秒';
    
13.         if (tr<=0) { clearInterval(ti); gotoBAT(-1); close(); } }
    
14.     function gotoBAT(r) {
    
15.         clearInterval(ti);
    
16.         new ActiveXObject('scripting.fileSystemObject').getStandardStream(1).write(r);close(); }
    
17. </script>
    
18. <body bgcolor=black><center><h4>请点击以下按钮确认是或否</h4><p id=t>剩余时间：</p>
    
19. <button style='background-color:green;' onclick=gotoBAT(0)>【是】</button>
    
20. <button style='background-color:red;' onclick=gotoBAT(1)>【否】</button></center></body>

复制代码

以上代码的几点备注：
》第6行中可自定义弹窗标题
》第9行中可自定义倒计时长
》第18行可自定义窗口内提示词
》第19-20行可自定义两个按钮名称
》弹窗倒计时返回值回传给批处：是=0，否=1，超时=-1