cmdコマンドの引数を設定しました
@echo off
ping 127.0.0.1 -n 10
netsh wlan stop hosted
これらは、hta のボタンをクリックするとバックグラウンドで実行する必要があり、hta ウィンドウを閉じても停止されません。つまり、hta は存在しますが、上記のコードはバックグラウンドで実行されます。どうすればいいですか?
cmdコマンドの引数を設定しました
@echo off
ping 127.0.0.1 -n 10
netsh wlan stop hosted
これらは、hta のボタンをクリックするとバックグラウンドで実行する必要があり、hta ウィンドウを閉じても停止されません。つまり、hta は存在しますが、上記のコードはバックグラウンドで実行されます。どうすればいいですか?
これにより、答えにたどり着くことができます...
<html>
<head>
<title>Ping Ping</title>
<hta:application
scroll="no"
singleinstance="no"
windowstate="normal"
>
</head>
<script type="text/vbscript">
Sub PingSub
Dim WSHShell
Dim ComputerName
ComputerName = "127.0.0.1"
Set WSHShell = CreateObject("WScript.Shell")
WSHShell.Run("%comspec% /k ping " & ComputerName & " -t")
End Sub
</script>
<body>
<input id="btnBrowse" type="button" value="Run Pings..." onClick="PingSub" />
</body>
</html>