[Vadikan]

На PowerShell

Код:

$Site = "https://ya.ru/"
$HttpContent = Invoke-WebRequest -Uri $Site
$HttpContent.Links.href

https://www.outsidethebox.ms/18977/

[ruslaw]

Спасибо, но я им не владею, а мне это все надо будет потом дорабатывать

[Iska]

ruslaw, открывайте потребную страницу и собирайте ссылки. Впрочем, это хорошо работает только на статичных страницах, а на любимых бесконечных «прокрутках» — хреново.

[ruslaw]

целью является проверка ссылок ни битость, я такой скрипт написал, но по-прежнему не знаю как зацепить его за чужую страницу.

[Iska]

ruslaw, ну, я могу Вам написать пример, но токмо на VBScript.

Скрытый текст

Код:

Option Explicit

Const READYSTATE_COMPLETE = 4


Dim objIE
Dim objHTMLAnchorElement


Set objIE = WScript.CreateObject("InternetExplorer.Application")

With objIE
	.Visible = False
	.Navigate "http://forum.oszone.net/forum-102.html"
	
	Do
		WScript.Sleep 100
	Loop Until Not .Busy And .ReadyState = READYSTATE_COMPLETE
	
	For Each objHTMLAnchorElement In .Document.Links
		WScript.Echo objHTMLAnchorElement.href
	Next
	
	.Quit
End With

Set objIE = Nothing

WScript.Quit 0

[ruslaw]

Спасибо, круто.
Но я не смогу его дорабатывать, а там много разных ответвлений этой задачи ....
А что, на JS совсем нет рецептов?
Да, и у меня страницы на компьютере и ссылки на компьютерные файлы.

[Iska]

ruslaw, кто-нибудь из коллег переведёт с VBScript на JScript. Я бы и сам сделал, но… это будет строго по анекдоту «Я те говорил — место проклятое, а ты «Руки из жёппы, руки из жёппы»™. Если уж совсем никто не переведёт, тогда сделаю.

Да, и у меня страницы на компьютере и ссылки на компьютерные файлы. »

Без разницы.

[ruslaw]

Спасибо, надеюсь повезет

[Iska]

Примерно так:

Скрытый текст

Код:

var READYSTATE_COMPLETE = 4;

var objIE = WScript.CreateObject('InternetExplorer.Application');

with(objIE) {
	Visible = false;
	Navigate('http://forum.oszone.net/forum-102.html');

	do {
		WScript.Sleep(100)
	} while(!(Busy && ReadyState == READYSTATE_COMPLETE))

	var collLinks = document.links;

	for(var i = 0; i < collLinks.length; i++) {
		WScript.Echo(collLinks[i].href)
	}

	Quit()
}

WScript.Quit(0)