$Servers = Get-ADComputer -Filter {Name -like "C*"}
Foreach ($Server in $Servers)
{
	$Hostname = $Server.Name
	$ServerInfo = (Get-WmiObject -Computername $Hostname Win32_ComputerSystem)
	$Manufacturer = $ServerInfo.Manufacturer
	$Model = $ServerInfo.Model
	Write-Host "Name: $Hostname"
	Write-Host "Manufacturer: $Manufacturer"
	Write-Host "Model: $Model"
	Write-Host " "
	$Content = "$Hostname;$Manufacturer;$Model"
	Add-Content -Value $Content -Path "C:\ServerInfo.txt"
}

$VMs = Get-VM
foreach ($VM in $VMs)
{
	$VMName = $VM.Name
	$VMHostname = $VM.ComputerName
	$VMHostCluster = (Get-Cluster).Name
	$VMHardDisk = $VM.ConfigurationLocation
	$VMHardDiskLocation = $VMHardDisk.Split("\")[2]
	$Value = $VMName + "," + $VMHostname + "," + $VMHostCluster + "," + $VMHardDiskLocation
	Add-Content -Value $Value -Path "VMList.txt"
}

$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
	}
}

$VMs = Get-SCVirtualMachine | where {$_.HostGroupPath -like "All Hosts\*Prod*"}
foreach ($VM in $VMs)
{
	$VMName = $VM.Name
	$VMHostname = $VM.Hostname
	$VMHasPassthroughDisk = $VM.HasPassthroughDisk
	$VMHost = Get-SCVMHost $VMHostname
	$VMHostCluster = $VMHost.HostCluster
	$VMHardDisk = @($VM | Get-VirtualHardDisk)[0].Location
	$VMHardDiskLocation = $VMHardDisk.Split("\")[2]
	$Value = $VMName + "," + $VMHostname + "," + $VMHostCluster + "," + $VMHardDiskLocation
	Add-Content -Value $Value -Path "VMList.txt"
}

$Hostname = $env:COMPUTERNAME
&"C:\Program Files\Compaq\Cpqimlv\cpqimlv.exe" /export:C:\test.iml /m:$Hostname
$Logs = Get-Content "C:\test.iml" | Select-String Critical,Caution
Foreach ($Log in $Logs)
{
	$ErrorDesc = $Log.Line.Split('"')[1]
	if ($ErrorDesc)
	{
		$ErrorType = $Log.Line.Split(",")[-4]
		$ErrorDate = $Log.Line.Split(",")[-1]
	}
 
	if ($ErrorType -eq "Critical")
	{
		Write-Host "Description: $ErrorDesc" -ForegroundColor Red
		Write-Host "Type: $ErrorType" -ForegroundColor Red
		Write-Host "Date: $ErrorDate" -ForegroundColor Red
		Write-Host " "
	}
	else
	{
		Write-Host "Description: $ErrorDesc" -ForegroundColor Yellow
		Write-Host "Type: $ErrorType" -ForegroundColor Yellow
		Write-Host "Date: $ErrorDate" -ForegroundColor Yellow
		Write-Host " "
	}
}

$Date = Get-Date
$Day = $Date.Day
$Month = $Date.Month
$Year = $Date.Year
$Hostname = $env:COMPUTERNAME
&"C:\Program Files\Compaq\Cpqimlv\cpqimlv.exe" /export:C:\test.iml /m:$Hostname
$Logs = Get-Content "C:\test.iml" | Select-String Critical,Caution | Select-String $Month/$Day/$Year