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 に変換する方が簡単なはずです。telnet クライアントの実装はそれほど難しくありません。簡単な例を次に示します: PHP を使用した telnet 接続

于 2014-01-18T11:27:42.960 に答える