Читаем данные с сайта.... - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)

- - Читаем данные с сайта.... (http://forum.oszone.net/showthread.php?t=312676)

DarckSol

14-03-2016 10:56 2615795

Читаем данные с сайта....

Добрый день, нужна читалка с сайта...
Для примера, сайт: http://forum.oszone.net/index.php
Нужно прочитать и сохранить в файл или в переменную последний визит....
ПС: Можно ток читалку, дальше сам докручу....

Kazun

14-03-2016 11:43 2615827

PowerShell:

Код:

$login = "MyUser"

$pass = "Password"

$url = "http://forum.oszone.net"

$ie = New-Object -ComObject InternetExplorer.Application

$ie.Navigate($url)

while($ie.Busy) { Start-Sleep -Milliseconds 100 }

$ie.Visible = $true



$ie.Document.getElementsByName("vb_login_username") | Foreach {$_.Value = $login}

$ie.Document.getElementsByName("vb_login_password") | Foreach {$_.Value  = $pass}

$ie.Document.getElementsByName("cookieuser") | Foreach {$_.Value  = 0}



$ie.Document.getElementsByTagName("input") | ? {$_.Value -eq "Войти"} | Foreach {$_.Click()}

Start-Sleep -Sec 3

$result = $ie.Document.Body.OuterText.Split("`r`n") -match "Ваш последний визит"

if($result) {

        $result | Out-File C:\log\result.txt

}

$ie.Quit()

DarckSol

14-03-2016 12:58 2615865

На WinXP и на Win 7_x64 не отработало.....
Ошибка строке 1 символ 1 ....

Iska	14-03-2016 13:50 2615875

DarckSol, это не VBScript, а:

Цитата:

Цитата Kazun

PowerShell: »

Кроме того, на Windows XP он не идёт в комплекте, а устанавливается отдельно.

DarckSol

14-03-2016 14:37 2615887

мм... Нужен vbs... PS(PowerShell) на ХП без предварительной установки не отработает..(((

DarckSol

17-03-2016 09:12 2616926

Вопрос еще не нашёл ответа.....

Iska	17-03-2016 12:09 2616994

DarckSol, давно бы уже подняли PowerShell для XP или перевели на VBScript, если лень устанавливать.

Время: 21:37.