[Griboed0ff]

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

Код:

PS C:\WINDOWS\system32> get-module powerhtml

ModuleType Version    Name                                ExportedCommands                                                                                                                                           
---------- -------    ----                                ----------------                                                                                                                                           
Script     0.1.7      powerhtml                           ConvertFrom-Html                                                                                                                                           
Script     0.1.7      PowerHTML                           ConvertFrom-Html                                                                                                                                           



PS C:\WINDOWS\system32> get-instaledmodule powerhtml
get-instaledmodule : Имя "get-instaledmodule" не распознано как имя командлета, функции, файла сценария или выполняемой программы. Проверьте правильность написания имени, а также наличие и правильность пути, после
 чего повторите попытку.
строка:1 знак:1
+ get-instaledmodule powerhtml
+ ~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : ObjectNotFound: (get-instaledmodule:String) [], CommandNotFoundException
    + FullyQualifiedErrorId : CommandNotFoundException
 

PS C:\WINDOWS\system32> get-installedmodule powerhtml
ПРЕДУПРЕЖДЕНИЕ: Не удалось скачать список доступных поставщиков. Проверьте подключение к Интернету.

Version    Name                                Type       Repository           Description                                                                                                                           
-------    ----                                ----       ----------           -----------                                                                                                                           
0.1.7      PowerHTML                           Module     https://www.power... Provides a wrapper for HTML Agility Pack for use where the IE HTML DOM from Invoke-WebRequest is not available such as Powershell Core

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

Код:

new-object : Не удается найти тип [HtmlAgilityPack.HtmlDocument]: убедитесь в том, что сборка, содержащая этот тип, загружена.
C:\Program Files\WindowsPowerShell\Modules\powerhtml\0.1.7\Public\ConvertFrom-HTML.ps1:55 знак:24
+             $htmlDoc = new-object HtmlAgilityPack.HtmlDocument
+                        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidType: (:) [New-Object], PSArgumentException
    + FullyQualifiedErrorId : TypeNotFound,Microsoft.PowerShell.Commands.NewObjectCommand
 
Невозможно вызвать метод для выражения со значением NULL.
C:\Program Files\WindowsPowerShell\Modules\powerhtml\0.1.7\Public\ConvertFrom-HTML.ps1:60 знак:21
+                     $htmlDoc.LoadHtml($inputItem)
+                     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull
 
Невозможно вызвать метод для выражения со значением NULL.
D:\PowerShell\phone_powerhtml.ps1:38 знак:2
+     [array]$tables = $html.selectnodes('//table')
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull
 
Не удается индексировать в массив NULL.
D:\PowerShell\phone_powerhtml.ps1:46 знак:2
+     $tbl = $tables[$number]|%{$n=0}{
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : NullArray
 
Исключение при вызове "IndexOf" с "2" аргументами: "Значение не может быть неопределенным.
Имя параметра: array"
D:\PowerShell\phone_powerhtml.ps1:109 знак:2
+     [pscustomobject]@{
+     ~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : ArgumentNullException

еще ise всегда спрашивает разрешения на запуск скриптов, я так понимаю это политикой домена или у винды по умолчанию так. Щас попробую на другой доменной тачке.

[YuS_2]

Установил на пк где есть инет »

Там работает скрипт?

скопировал папку с модулем и положил по тому же пути на пк где инет ограничен. »

Странно, должен работать. Попробуйте в консоли выполнить:

Код:

find-module powerhtml -rep "PSGallery"|save-module -path 'D:\localMODULE'

и из этого каталога взять модуль и скопировать на другой компьютер...
Ну, можно ещё попробовать в скрипт добавить строку:

Код:

import-module powerhtml

еще ise всегда спрашивает разрешения на запуск скриптов, я так понимаю это политикой домена или у винды по умолчанию так. »

а в консоли выполняются?
По умолчанию, политика запуска скриптов запрещает не подписанные.

Для выполнения неподписанных скриптов, созданных на локальном компьютере, и подписанных скриптов других пользователей, нужно использовать следующую команду для изменения политики исполнения на RemoteSigned: Код: set-executionpolicy remotesigned Дополнительные сведения см. в описании командлета Set-ExecutionPolicy.

[Griboed0ff]

По умолчанию, политика запуска скриптов запрещает не подписанные. »

Это политика доменная оказалась, попробовал на другом пк powerhtml. Работает, задал ему сеть где один айпишки 2-254, нашел все, правда парочку не смог считать, но одна страничка оказалась на английском поэтому и не считалась, а вторая видимо имеет другую структуру. Так же заметил в мониторинге сети, что скрипт ничего не вроде как никуда первые минут 5-7 не посылает, а потом за пару минут скачивают всю инфу.

Бороться с этим можно так: »

это постигло и скрипт poewrhtml, если нет айпишек в сети то пишет ерунду с прошлого запуска.

[Griboed0ff]

Получился довольно универсальный в теме айпишек скрипт, не скрипт, а проект уже целый. Я благодарен участникам данного форума, что помогли решить задачу именно строенными средствами винды.

[YuS_2]

скрипт ничего не вроде как никуда первые минут 5-7 не посылает, а потом за пару минут скачивают всю инфу. »

там он сначала пингует хосты, с одновременным формированием доступных IP

это постигло и скрипт poewrhtml, если нет айпишек в сети то пишет ерунду с прошлого запуска. »

Да, там то же самое надо сделать, сейчас добавлю...

[Griboed0ff]

сейчас добавлю »

а можете указать где меняете? я ваши решения тусую, один скрипт который через powerhtml будет запускаться с моего компа и собирать инфу с многих компов, а скрипт который был до этого, будет запускаться планировщиком и записывать данные в файл.

[YuS_2]

правда парочку не смог считать, но одна страничка оказалась на английском поэтому и не считалась »

Руки бы поотшибать этим "сиськопрограммерам" html...
Мало того, что впихнули внутрь ячеек тег <b>...</b>, так ещё и кодировку умудрились использовать windows-1251...
В общем, так как-то:

script_phtml.ps1

Код:

param (
	#[parameter(Mandatory=$true)]
	[string]$outfile = 'table_phtml.csv',
	$enc1 = 65001,
	$enc2 = 28591,
	[int[]]$SelectTable = 1
)

#---Эту секцию можно удалить после однократного запуска скрипта от имени админа ------------------
# Установка дополнительного модуля PowerHTML, для независимого парсинга HTML
# Может потребоваться ручное подтверждение установки. 
if (!(get-module -list powerhtml)) {
	write-verbose "Installing PowerHTML module for the current user..."
	install-module powerhtml #-scope currentuser
}
#-----------------------------------------------------------------------------------------

function convert ($from, $to){
	begin{
		$fenc = [text.encoding]::getencoding($from)
		$tenc = [text.encoding]::getencoding($to)
	}
	process{
		$a = $tenc.getbytes($_)
		$fenc.getstring($a)
	}
}
[net.servicepointmanager]::securityprotocol = 'ssl3,tls,tls11,tls12'
[array]$arr  = gc 'D:\PowerShell\list_Net.txt'
$ips = 130..190 |%{$n=$_;$arr|%{"$_"+$n}}|sort|?{test-connection $_ -count 1 -q}

$ips|%{
	if (test-connection $_ -count 1 -q){
		try {
			$a = (iwr $_).content
			#$a = gc $_ -raw -enc utf8
			$content = if ($a -match [char]208){
				if ($a -match 'windows-1251'){$enc1,$enc2 = 1251,1252}
				$a|convert $enc1 $enc2
			} else {$a}
			
			$html = [net.webutility]::htmldecode($content)|convertfrom-html
			[array]$tables = $html.selectnodes('//table')
			# Исключение вложенных таблиц:
			$tables = $tables|?{$_.innerhtml -notmatch 'table'}
			
			if ([string]::isnullorempty($selecttable)){
				$number = 0..($tables.count-1)
			} else {$number = $selecttable}
			
			$tbl = $tables[$number]|%{$n=0}{
				$tr = if($_.element('tbody')){
					$_.element('tbody').elements('tr')
				} else {$_.elements('tr')}
				$headers = @()
				if($headers = $tr|?{$_.element('th') -ne $null}|
				%{$_.elements('th')}|select -exp innertext){
					$headers=$headers.trim()
				} else {
					$headers = 1..(
						[linq.parallelenumerable]::max(
							[linq.parallelenumerable]::asparallel(($tr|
							%{($_.elements('td')|? innertext -ne ''|%{$_}).count}))
						)
					)|%{"H$_"}
				}
				$rowind = ,1 * $headers.count
				$tr|?{$_.elements('td') -ne ''}|%{
					$row = $_.elements('td')|? innertext -ne ''|%{
						$attr = $_.attributes
						if ($attr){
							$rowspan = ($attr|? name -eq 'rowspan'|select value).value
							$colspan = ($attr|? name -eq 'colspan'|select value).value
						}
						[pscustomobject]@{
							'InnerText' = $_.innertext
							'RowSpan' = if($rowspan){[int]$rowspan} else {1}
							'ColSpan' = if($colspan){[int]$colspan} else {1}
						}
					}
					$str = [ordered]@{}
					$k=0
					foreach ($item in $row){
						if ($rowind[$k] -gt 1){
							while ($rowind[$k] -gt 1){
								$str[$headers[$k]] = $null
								$rowind[$k] -= 1
								$k++
							}
						}
						if (($colspan = $item.colspan) -gt 1) {
							$str[$headers[$k]] = if($item.innertext){
								$item.innertext.trim()
							} else {$null}
							if ($item.rowspan -gt 1){$rowind[$k] = $item.rowspan}
							$k++
							while ($colspan -gt 1){
								$str[$headers[$k]] = $null
								$colspan -=1
								if ($rowind[$k] -gt 1){$rowind[$k]-=1}
								$k++
							}
						} else {
							$str[$headers[$k]] = if($item.innertext){
								$item.innertext.trim()
							} else {$null}
							if ($item.rowspan -gt 1){$rowind[$k] = $item.rowspan}
							$k++
						}
					}
					[pscustomobject]$str
				}
			}
			[pscustomobject]@{
				'IP'				= $_
				'MAC-адрес' 		= if ([array]::indexof($tbl.h1,'MAC-адрес') -ne -1){
										$tbl[([array]::indexof($tbl.h1,'MAC-адрес'))].h2
									  } else {$tbl[([array]::indexof($tbl.h1,'MAC Address'))].h2}
				'Номер телефона'	= if ([array]::indexof($tbl.h1,'Номер телефона') -ne -1){
										$tbl[([array]::indexof($tbl.h1,'Номер телефона'))].h2
									  } elseif ([array]::indexof($tbl.h1,'Номер телефона 1') -ne -1){
									  	$tbl[([array]::indexof($tbl.h1,'Номер телефона 1'))].h2
									  } else {
									  	$tbl[([array]::indexof($tbl.h1,'Phone DN'))].h2
									  }
				'Серийный номер'	= if ([array]::indexof($tbl.h1,'Серийный номер') -ne -1){
										$tbl[([array]::indexof($tbl.h1,'Серийный номер'))].h2
									  } else {$tbl[([array]::indexof($tbl.h1,'Serial Number'))].h2}
				'Номер модели'		= if ([array]::indexof($tbl.h1,'Номер модели') -ne -1){
										$tbl[([array]::indexof($tbl.h1,'Номер модели'))].h2
									  } else {$tbl[([array]::indexof($tbl.h1,'Model Number'))].h2}
			}
		} catch {
			write-host Ошибка: $_ -for red
		}
	}
}  |export-csv D:\PowerShell\all_phone.csv -notype -enc utf8 -d ';' -append

[Griboed0ff]

В общем, так как-то: »

Идеально!!! Сейчас кажется даже если и появится какая-нибудь модель айпишки, то мне кажется в скрипте уже все варианты перечислены. Спасибо огромное!

[DJ Mogarych]

$ips = 130..190 |%{$n=$_;$arr|%{"$_"+$n}}|sort|?{test-connection $_ -count 1 -q} $ips|%{ if (test-connection $_ -count 1 -q){ »

проверка соединения 2 раза

[YuS_2]

проверка соединения 2 раза »

-есть проверка существования хостов и если они не отвечают, то в массив не должны попадать... Хотя, конечно, есть вероятность того, что пока пингуется весь список по порядку, какой-либо хост отключается и соответственно, происходит именно то, что Вы описываете. »