Home
- Details
- Written by: po3dno
- Category: Power Shell
- Hits: 1744
_Reference54 - таблица с отделами из 1С
param($department)
$connection = New-Object System.Data.SqlClient.SqlConnection
$connection.ConnectionString = "Server=sql-1c8;database=1c82zp-db;uid=user1c8;pwd="
$connection.Open()
# Выбираем нужные данные
$sqlstr = "SELECT r54.[_Code], r54._Description, r54_t._Code, r54_t._Description FROM [1c82zp].[dbo].[_Reference54] r54
JOIN [1c82zp].[dbo].[_Reference54] r54_t on r54._ParentIDRRef = r54_t.[_IDRRef]
WHERE r54._Marked = 0
ORDER BY r54._Code";
- Details
- Written by: po3dno
- Category: Power Shell
- Hits: 1503
Экспортировать действующие ACL объектов в AD:
$schemaIDGUID = @{}
$ErrorActionPreference = 'SilentlyContinue'
Get-ADObject -SearchBase (Get-ADRootDSE).schemaNamingContext -LDAPFilter '(schemaIDGUID=*)' -Properties name, schemaIDGUID |
ForEach-Object {$schemaIDGUID.add([System.GUID]$_.schemaIDGUID,$_.name)}
Get-ADObject -SearchBase "CN=Extended-Rights,$((Get-ADRootDSE).configurationNamingContext)" -LDAPFilter '(objectClass=controlAccessRight)' -Properties name, rightsGUID |
ForEach-Object {$schemaIDGUID.add([System.GUID]$_.rightsGUID,$_.name)}
$ErrorActionPreference = 'Continue'
$OUs = Get-ADOrganizationalUnit -Filter * | Select-Object -ExpandProperty DistinguishedName
$OUs += Get-ADObject -SearchBase (Get-ADDomain).DistinguishedName -SearchScope OneLevel -LDAPFilter '(objectClass=container)' | Select-Object -ExpandProperty DistinguishedName
#$OU = "OU=Tcs-users,DC=tcsbank,DC=ru"
ForEach ($OU in $OUs) {
$report += Get-Acl -Path "AD:\$OU" |
Select-Object -ExpandProperty Access |
Select-Object @{name='organizationalUnit';expression={$OU}}, `
@{name='objectTypeName';expression={if ($_.objectType.ToString() -eq '00000000-0000-0000-0000-000000000000') {'All'} Else {$schemaIDGUID.Item($_.objectType)}}}, `
@{name='inheritedObjectTypeName';expression={$schemaIDGUID.Item($_.inheritedObjectType)}}, `
*
}
# Dump the raw report out to a CSV file for analysis in Excel.
$report | Export-Csv ".\OU_Permissions.csv" -NoTypeInformation -delimiter "`t" -encoding default
Start-Process ".\OU_Permissions.csv"
- Details
- Written by: po3dno
- Category: Exchange Server
- Hits: 1684
get-mailbox -resultsize unlimited | %{Get-ADUser $_.SamAccountName -property thumbnailphoto | Select Name,SamAccountName,EmailAddress,Department,@{Name="psize"; Exp={$_.thumbnailphoto.length}}} | export-csv photo.csv -Delimiter ";" -NoTypeInformation -Encoding Default
- Details
- Written by: po3dno
- Category: Power Shell
- Hits: 1505
Get-ADGroup GROUPNAME | %{$gr = $_; Get-ADGroupMember -Identity $gr | %{$u = get-aduser $_; if (($u.enabled -eq $false) -and ($u.DistinguishedName -like "*lock*")){write-host $u.name $u.DistinguishedName; Remove-ADGroupMember -identity $gr $u -Confirm:$false}}}
- Details
- Written by: po3dno
- Category: Power Shell
- Hits: 1416
param(
[System.IO.FileInfo]$file = $null,
[string]$login = $null
);
$CODEPAGE = "iso-8859-1";
$url_upload = "http://iksrv.ru/photo_update.html";