Помогите из разрозненного собрать целое
Доброго времени суток.
Задача такова. Есть страничка (в локальной сети) на нее выводятся коды ошибок с коментариями типа: Код:
1) 0001 - ошибка копированияПоскольку я не програмер, часть скриптов нашел, часть сочинил сам и получил следующее: ШАГ1 Запускается конструкция каждые 3 минуты скрыто файлом Start_find_php.vbs Код:
Set WshShell = CreateObject("WScript.Shell")Код:
do
<job>
<script language="JScript">
httpGet("http://192.168.1.200/1/index1.php");
function httpGet(url)
{
var fname=url.replace(/.+\//,"");
with(new ActiveXObject("WinHttp.WinHttpRequest.5.1"))
{
open("GET",url);
send();
if(status==200)
with(new ActiveXObject("ADODB.Stream"))
{
type=1;
open();
write(responseBody);
saveToFile(fname,2);
}
}
}
</script>
</job>
Шаг 2.2 полученый файл анализирует на предмет вхождения скрипт из ШАГа 2 find_php.cmd Затем анализирую полученый файл скриптом find_php.cmd и в случае нахождения запускается скрипт send_php.vbs ШАГ3 (можно было бы это прописать и в cmd файле, но тогда не было бы возможности не отображать окон и не ждать завершения отправки) Код:
Set WshShell = CreateObject("WScript.Shell") |
| Часовой пояс GMT +3, время: 15:47. |