$Webclient = New-Object System.Net.WebClient
$Webclient.Credentials = Get-Credential
$Servers = Get-Content C:\Servers.txt
foreach ($Server in $Servers)
{
	$AsyPortalURL = "http://sharepoint/_layouts/srchrss.aspx?k=" + $Server
	$Webpage = $Webclient.DownloadString($AsyPortalURL)
	$URL = "$WebPage" -match '<link>(.*?)</link>'
	$ServerID = $Matches[1]
	$ServerID = $ServerID.Split("ID=")[-1]
	$ServerListesi = "http://sharepoint/Lists/Server Listesi/DispForm.aspx?ID=" + $ServerID
	$Webpage = $Webclient.DownloadString($ServerListesi)
	$Webpage = $Webpage | ? {$_.trim() -ne ""}
	$Webpage = $Webpage -replace '\s+', ' '
	$IPField = "$Webpage" -match '<!-- FieldName="IP" FieldInternalName="IP" FieldType="SPFieldText" --> (.*?) </td>'
	$IPAddress = $Matches[1]
 
	$TestCon = Test-Connection $IPAddress
 
	if (!$TestCon)
	{
		$Value = $Server + "," + $IPAddress
		Add-Content -Value $Value -Path C:\pingtest.txt
	}
}