[Kazun]

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]

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

[Iska]

DarckSol, это не VBScript, а:

PowerShell: »

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

[DarckSol]

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

[DarckSol]

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

[Iska]

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