VB6 + VB6アプリケーションからLinuxマシンのスクリプトをexeする方法

Question

Windows XPマシン上で動作するVB6アプリケーションを、SSH経由でLinuxマシン（Redhat 5.3）で実行するにはどうすればよいですか？

VBアプリケーションは、次の引数

1. のLinuxログイン
2. 、Linuxのパスワード
3. スクリプトのパス

を取るそして、SSH経由でスクリプトのパスを実行する必要があります。例えば

ARG1 Login –  root 
ARG2 Password –  USA123 
ARG3 Script path - /var/tmp/task.pl 

VB6は、Linuxマシン上でスクリプト/var/tmp/task.plを実行します。

Answer 1

"シェル"機能を使用してコマンドウィンドウを作成してから、 "sendKeys"機能を使ってsshコマンドとパラメータを送信することができます。ただし、これはエラーが発生しやすいソリューションになります。

もっと恒久的な修正が必要な場合は、this VB Library for SSH manipulationをご覧ください。あなたはそれを使うかもしれません。ここにa sample projectへのリンクがあります。

EDIT：

私はので、私は、私が以前に作成したVBScriptファイルを再利用しVB6のIDEを持っていません。これはそのまま実行することも、VB6コードに非常に簡単に変換することもできます。

Set objShell = WScript.CreateObject("WScript.Shell") 
objShell.Run "C:\Windows\System32\telnet.exe" 
WScript.Sleep(1000) 
objShell.SendKeys "o telnet.example.com" 
WScript.Sleep(1000) 
objShell.SendKeys "{enter}" 
WScript.Sleep(10000) 
objShell.SendKeys "user" 
WScript.Sleep(2000) 
objShell.SendKeys "{enter}" 
WScript.Sleep(1000) 
objShell.SendKeys "pass" 
WScript.Sleep(2000) 
objShell.SendKeys "{enter}" 
WScript.Sleep(1000) 
objShell.SendKeys "./var/tmp/task.pl" 
WScript.Sleep(1000) 
objShell.SendKeys "{enter}" 
WScript.Sleep(1000)