onurbabur onurbabur

🖖

Focusing

onurbabur / TurkishCharacterUsageQuery.ps1

Created October 29, 2021 19:10

TurkishCharacterUsageQuery.ps1

	$objects = Get-ADUser -Filter * -SearchBase "OU=TURKEY-TR,OU=Accounts,DC=babur,DC=com" -Properties samaccountname, pwdLastSet
	foreach ($object in $objects) {
	if (($object.samaccountname -like 'ö') -or ($object.samaccountname -like 'ı') -or ($object.samaccountname -like 'ğ') ) {
	Write-Host "Name contains '$'"
	$object.samaccountname
	}
	}

onurbabur / ADPasswordUsage.ps1

Created October 29, 2021 18:56

ADPasswordUsage

	$users = (Get-ADUser -Properties * -filter * -SearchBase "OU=Accounts,DC=babur,DC=hol" \| select samaccountname).SamAccountName
	foreach ($username in $users) {
	$user = Get-ADUser -identity $username -properties pwdlastset
	#Before Changed
	[datetime]::FromFileTime($user.pwdlastset)
	$user.pwdlastset=0
	set-aduser -Instance $user
	$user.pwdlastset = -1
	set-aduser -Instance $user
	$user = Get-ADUser -identity $username -properties pwdlastset

onurbabur / DeleteMembershipFromAdministrators.ps1

Created October 29, 2021 18:53

DeleteMembershipFromAdministrators

	$administrators = @(
	([ADSI]"WinNT://./Administrators").psbase.Invoke('Members') \|
	% {
	$_.GetType().InvokeMember('AdsPath','GetProperty',$null,$($_),$null)
	}
	) -match '^WinNT';
	$administrators = $administrators -replace "WinNT://",""
	foreach ($adm in $administrators) {
	if($adm -match 'S-1-5-21*') {
	Remove-LocalGroupMember -Group "Administrators" -Member $adm

onurbabur / ExportADGroupsMemberships.ps1

Created October 29, 2021 18:47

ExportADGroupsMemberships

	$str="Name;Memberof"
	$str+= "`r`n"
	$list = get-aduser -filter * -SearchBase "OU=TR,DC=babur,DC=hol" \| select samaccountname
	$list.samaccountname\| `
	%{
	$user = $_;

	$grp=((get-aduser $user -Properties memberof \| select memberof).memberof \| Get-ADGroup\|select Name\|sort name).name
	foreach ($g in $grp) {
	$str+=$user+";"+$g

onurbabur / Office365ArchiveEnableAddRetentionPolicy.ps1

Last active October 29, 2021 18:42

Office365ArchiveEnableAddRetentionPolicy

	#arşiv özelliği kapalı olan kullanıcıları $users değişkenine atar
	$users=(Get-ExoMailbox -ResultSize Unlimited -PropertySets Archive \| where {$_.ArchiveStatus -eq "None"}).UserPrincipalName
	$archiveenabled= "Mail Adresi"
	$archiveenabled += "`r`n"
	$count = 0

	foreach($usr in $users) {

	#users içerisinde olan kullanıcıları tek tek mailbox boyutları çevrilir.
	$Stats = Get-EXOMailbox -UserPrincipalName $usr \| Get-EXOMailboxStatistics \| Select-Object *, @{Name="TotalItemSizeGB"; Expression={[math]::Round(($_.TotalItemSize.ToString().Split("(")[1].Split(" ")[0].Replace(",","")/1GB),0)}}

onurbabur / LapsUnpassable.ps1

Created October 29, 2021 18:28

Laps Parolası Olmayan Cihazlar

	$computers = (Get-ADComputer -SearchBase "OU=TURKEY-TR,OU=Accounts,DC=xxx,DC=xxx" -Properties * -filter *).name

	foreach ($comp in $computers) {

	Get-AdmPwdPassword -ComputerName $comp \| where {$_.password -eq $null} \| select computername, Distinguishedname
	}