Question

我正在构建一个HTA / Batch脚本，该脚本包含一个界面，供用户向该脚本发送htareply，该界面将向服务器发送链接以在Jenkins上执行构建脚本。一切正常，但是我想知道是否可以将hta窗口保持打开状态，以便用户根据需要选择其他选项。有什么想法吗？

我尝试从javascript中删除window.close()，但随后它没有将htareply发送到批处理脚本。

<!-- :: Batch section
@echo off
setlocal

echo Select an option:
for /F "delims=" %%a in ('mshta.exe "%~F0"') do set "HTAreply=%%a"
echo End of HTA window, reply: "%HTAreply%"
PAUSE
goto :EOF

-->


<HTML>
<HEAD>
<HTA:APPLICATION SCROLL="no" SYSMENU="no" >

<TITLE>HTA Radio Buttons</TITLE>
<SCRIPT language="JavaScript">
window.resizeTo(440,170);

var reply = "No button selected";
function sendreply(){
  var fso = new ActiveXObject("Scripting.FileSystemObject");
  fso.GetStandardStream(1).WriteLine(reply);
  //window.close();
}

</SCRIPT>
</HEAD>
<BODY>
<p>Select an option.</p>
<label><input type="radio" name="option1" onclick="reply=this.value" 
value="option1">Option1</label>
<label><input type="radio" name="option2" onclick="reply=this.value" 
value="option2">Option2</label>
<label><input type="radio" name="option3" onclick="reply=this.value" 
value="option3">Option3</label>
<br><br>
<button onclick="sendreply()">Submit</button>
<button onclick="window.close()">Close</button>
</BODY>
</HTML>

我想发生的是，如果用户选择并选择并提交，则hta窗口将保持打开状态，直到他们选择“关闭”为止。

Answer 1

for /F命令的工作方式如下： first 执行嵌套命令，收集其所有输出并等待其终止；然后开始使用收集到的行在for正文中执行命令。因此，如果要同时（并行）执行，可以不使用for /F。

您可以使用左侧的HTA部分和右侧的Batch部分的管道。但是，当set /P命令从管道读取输入时，它表现出奇怪的行为...

解决方案是使用辅助文件，因此将HTA部分写入其中，并从中读取Batch部分：

<!-- :: Batch section
@echo off
setlocal

rem Initialize Batch side interface the first time
if "%~1" equ "interface" goto :interface

rem Empty pipe file
cd . > pipeFile.txt

echo Select an option:

rem Start HTA-Batch interface
mshta.exe "%~F0" >> pipeFile.txt  |  "%~F0" interface < pipeFile.txt
PAUSE
del pipeFile.txt
goto :EOF


:interface

set "HTAreply="
set /P "HTAreply="
if "%HTAreply%" equ "" goto interface

echo Reply: "%HTAreply%"
if "%HTAreply%" neq "EOF" goto interface
echo End of HTA window

goto :EOF

-->


<HTML>
<HEAD>
<HTA:APPLICATION SCROLL="no" SYSMENU="no" >

<TITLE>HTA Radio Buttons</TITLE>
<SCRIPT language="JavaScript">
window.resizeTo(440,170);

var reply = "No button selected";
var fso = new ActiveXObject("Scripting.FileSystemObject");
function sendreply(){
  fso.GetStandardStream(1).WriteLine(reply);
  //window.close();
}

</SCRIPT>
</HEAD>
<BODY>
<p>Select an option.</p>
<label><input type="radio" name="option1" onclick="reply=this.value" 
value="option1">Option1</label>
<label><input type="radio" name="option2" onclick="reply=this.value" 
value="option2">Option2</label>
<label><input type="radio" name="option3" onclick="reply=this.value" 
value="option3">Option3</label>
<br><br>
<button onclick="sendreply()">Submit</button>
<button onclick="fso.GetStandardStream(1).WriteLine('EOF'); window.close()">Close</button>
</BODY>
</HTML>

在此解决方案中，HTA和批处理零件是通过管道|启动的，只是要同时运行；请记住，这两个部分之间的通信是通过pipeFile执行的。

是否可以使用不带window.close（）的javascript发送HTAREPLY

1 个答案: