0

我有一个 VBScript 文件。当它在计算机上时，它工作正常。我想把它放在一个 php 站点上，以便通过单击按钮来执行它。但我没有成功。我有一个 VBScript 文件。当它在计算机上时，它工作正常。我想把它放在一个 php 站点上，以便通过单击按钮来执行它。但我没有成功。

这是代码：

Const ForReading = 1
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("C:\AppServ\www\abcd\testFile.txt", ForReading)
TheFile =   f.ReadAll

myArray = Split(theFile,vbcrlf)

for i = 0 to Ubound(MyArray)
Next

txt=Space(1)

Set myShell = CreateObject("WScript.Shell")
    myShell.run "cmd"
    WScript.Sleep 100

    myShell.SendKeys"telnet 192.168.1.1"
    myShell.SendKeys("{Enter}")
    WScript.Sleep 1500

    myShell.SendKeys"myname"
    myShell.SendKeys("{Enter}")
    WScript.Sleep 1500


    myShell.SendKeys"mypassword"
    myShell.SendKeys("{Enter}")
    WScript.Sleep 1500

    myShell.SendKeys"sudo -i"
    myShell.SendKeys("{Enter}")
    WScript.Sleep 1000

    myShell.SendKeys"su - zimbra"
    myShell.SendKeys("{Enter}")
    WScript.Sleep 1000  

    myShell.SendKeys"zmprov ma " & myArray(0) & " zimbraAccountStatus locked"
    myShell.SendKeys("{Enter}")
    WScript.Sleep 1000

提前致谢。

4

1 回答 1

0

PHP 无法执行 vbscript。如果您希望 php 执行任何其他语言，则必须编写某种解析器/解释器来为您执行此操作...

但是在您的情况下，将脚本简单地转换为 php.ini 应该更容易。telnet 客户端并不难实现。在这里可以找到一个简单的例子：telnet connection using PHP

于 2014-01-18T11:27:42.960 回答