VBScript 循环发送指令

您可以使用 VBScript 中的循环结构和网络通信库来实现循环发送指令。

下面是一个简单的示例，演示如何使用 VBScript 循环发送指令到远程服务器：

Set objShell = CreateObject("WScript.Shell")
Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")

' 设置远程服务器的 IP 地址和端口号
strServer = "192.168.1.100"
intPort = 8080

' 循环发送指令
Do While True
    ' 发送指令
    strCommand = "command"
    objHTTP.Open "POST", "http://" & strServer & ":" & intPort, False
    objHTTP.Send strCommand
    
    ' 等待 1 秒钟
    WScript.Sleep 1000
Loop

在上面的示例中，我们使用了 WinHttp.WinHttpRequest.5.1 库来发送 HTTP 请求。您可以根据实际情况使用其他网络通信库来发送指令。

请注意，上面的示例中使用了一个无限循环结构，因此它将无限期地循环发送指令。如果您想要在特定的条件下停止循环，请在循环内部添加一个条件语句来判断是否满足停止循环的条件。