Bilder Report eines Share via PowerShell


#1
Hallo Allerseits

Hab einen Script erstellt mit PowerShell, vielleicht kann es auch für andere nützlich sein, deshalb poste ich es hier.

Die Ausgangslage war die, dass wir einen Report benötigten, welches uns angab welche Bilde (jpg, png und bmp) auf einem Share im Netzwerk grösser als 1000kb sind.

Habe einen Script erstellt, welches dies auf dem angegebenen Share inkl. Unterordner ausliest, dies in einem HTML File mit Tabellen als Report erstellt, inkl. Filename, Pfad, Grösse und letzte bearbeitung. Dieser Report wird anschliessen via E-Mail verschickt.

Bedingung ist, dass dieser Script lokal auf dem Server ausgeführt wird.

Hier den Script:
Code:
$a = "<style>"
$a = $a + "BODY{background-color:#ffffff;}"
$a = $a + "TABLE{border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse;}"
$a = $a + "TH{border-width: 1px;padding: 0px;border-style: solid;border-color: black;background-color:grey}"
$a = $a + "TD{border-width: 1px;padding: 0px;border-style: solid;border-color: black;background-color:#ffffff}"
$a = $a + "</style>" 

gci 'Hier das Verzeichnis angeben' -recurse -include *.jpg,*.bmp,*.png | Where-Object {$_.Length -gt 1000KB} | 
? { $_.PSisContainer -eq $false} | 
Sort-Object length -descending | Select-Object Name, @{Name="Kbytes";Expression={ "{0:N0}" -f ($_.Length / 1Kb) }}, DirectoryName, CreationTime | ConvertTo-HTML -head $a -body "<H2>Grosse Bilder</H2>" | out-file 'Laufwerk:\Verzeichnis\report.htm'

#Send Email
$msg = $null
$smtpServer = "0.0.0.0"
$workpath = “\\Server\Share\Verzeichnis”
$file = “$workpath\report.htm”
$msg = new-object Net.Mail.MailMessage
$att = new-object Net.Mail.Attachment($file)
$smtp = new-object Net.Mail.SmtpClient($smtpServer)
$msg.From = "sender@domain.com"
$msg.To.Add("empfaenger@domain.com")
#$msg.To.Add("empfaenger2@domain.com")
$msg.Subject = "Bilder Report"
$msg.IsBodyHTML = $true
$html = "Report der Bilder"
$msg.Body = $html
$msg.Attachments.Add($att)
$smtp.Send($msg)
Viel Spass und auf gutes Gelingen.
Svisseroo
 

Anhänge

Zuletzt bearbeitet von einem Moderator:

Neue Beiträge