phandorin
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Цитата: sCom = "%windir%\pscp.exe -pw passwd info.txt login@pupkin.ru:/home/pupkin/" sCom = Replace(sCom, "login", login, 1, -1, vbTextCompare) sCom = Replace(sCom, "passwd", passwd, 1, -1, vbTextCompare) Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run sCom | Пока не пашет. проверяю так sCom = "putty.exe -ssh -pw passwd login@pupkin.ru" sCom = Replace(sCom, "login", login, 1, -1, vbTextCompare) sCom = Replace(sCom, "passwd", passwd, 1, -1, vbTextCompare) Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run sCom Не могу консоль отловить, но похоже что-то типа using логин бла бла и окно закрывается | Всего записей: 132 | Зарегистр. 05-08-2005 | Отправлено: 15:43 28-03-2011 | Исправлено: phandorin, 16:05 28-03-2011 |
|