$limit = 90
$testpath = „h:\“
$resultpath = „c:\ee“
$admins = „[email protected]“
$from = „[email protected]“
$smtpserver = „smtp.domain.com“
Krijgen-ChildItem - Weg $testpath - Recurse | ? {$_.fullname.length - GT $limit} |
Fullname van het uitgezocht-voorwerp,
@ {n= " eigenaar "; e= {
$_.GetAccessControl () .GetOwner („System.Security.Principal.NTAccount“)}},
@ {n= " namelength "; e= {$_.fullname.length}} |
% {
Het uit-dossier - FilePath „$resultpath \ Longfiles van $ ($_.owner - vervangt“ \ \ „,“ - „) .txt“ - toevoegt - „$ InputObject ($_.namelength) - $ ($_.fullname)“
}
Krijgen-ChildItem $resultpath - Filter „longfiles van *“ | % {
als ($_.name - pas „van Longfiles \- sof aan \ s (. +) \ .txt“) {
$user = $matches [1] - vervang „-“, „\“
$ntacc = nieuw-Voorwerp System.Security.Principal.NTAccount ($user)
$sid = $ntacc. Vertaal ([System.Security.Principal.SecurityIdentifier])
$ADUSER = [ADSI] „LDAP: /“
$email = $aduser. Properties.mail
als ($email) {die ver*zenden-MailMessage - Gehechtheid $_.fullname - Lichaam „te veranderen gelieve filenames van de dossiers in het dossier in bijlage aan korter worden vermeld!“ `
- Van $from - SmtpServer $smtpserver - Onderwerp het „bericht van het Systeem“ - aan $email - CC $admins
}
anders {
Ver*zenden-MailMessage - Gehechtheid $_.fullname - wordt Lichaam „e-mail coudn't verzonden naar eigenaar“ `
- Van $from - SmtpServer iqjb-exchback - Onderwerp het „bericht van het Systeem“ - aan $admins
}
}
anders {schrijven-Gastheer „Één of andere fout met dossier $_“}
}
|