Скрипты для системных администраторов Windows, Полезные скрипты для Win2003 Опции

[HEAVY]

ping i.ua >c:\1.txt

[mak_v_]

Господа, нужен батник (под Шиндовс 2003) следующего содержимого:
1) Имеем список файлов в директории.
2) Необходимо пройтись по списку файлов и составить текстовй файл.

Например: имеем 3 файла:
file1, file2, file3
Необходимо на выходе получить текстовый файл с таким содержанием:
client.exe --sql="UPDATE row_files SET val='added_rowfile1' WHERE val='skipped_rowfile1' and type='well'"
client.exe --sql="UPDATE row_files SET val='added_rowfile2' WHERE val='skipped_rowfile2' and type='well'"
client.exe --sql="UPDATE row_files SET val='added_rowfile3' WHERE val='skipped_rowfile3' and type='well'"

Просю помощи....

Сообщение отредактировал mak_v_ - Aug 5 2015, 11:43

[Dr.Sydorenko]

Господа, нужен батник (под Шиндовс 2003) следующего содержимого:

Как-то так (для всех файлов в директории):

for /F %i IN ('dir /A /B c:\dir') DO @echo client.exe --sql="UPDATE row_files SET val='added_row%i' WHERE val='skipped_row%i' and type='well'" >> file.txt

Если в батнике, то заменить на %%i

если список файлов хранится в файле, то как-то так:

for /F %i IN (c:\dir\list.txt) DO @echo client.exe --sql="UPDATE row_files SET val='added_row%i' WHERE val='skipped_row%i' and type='well'" >> file.txt

Сообщение отредактировал Sintorres - Aug 5 2015, 12:29

[mzk]

Ребята, нужна помощь в написании скрипта на PowerShell

Копирование файлов по сети (порядка 30-40 тысяч мелких файлов)

» Нажмите, чтобы показать спойлер - нажмите опять, чтобы скрыть... «

$source = "c:\source\Библиотека"
$dest1 = "\\host1\c$\Program Files (x86)\P0\"
$dest1_1 = "\\host2\c$\Program Files (x86)\P0\Библиотека"

$dest2 = "\\host2\c$\Program Files (x86)\P0\"
$dest2_1 = "\\host2\c$\Program Files (x86)\P0\Библиотека"

$exclude = @('*.db','*.config')

Write-Output "Deleting from pc1..."
Remove-Item $dest1_1 -Recurse
Write-Output "Copying on pc1..."
Copy-Item $source -Destination $dest1 -Force -Recurse -Exclude $exclude
Write-Output "Complete pc1"


Write-Output "Deleting from pc2..."
Remove-Item $dest2_1 -Recurse
Write-Output "Copying on pc2..."
Copy-Item $source -Destination $dest2 -Force -Recurse -Exclude $exclude
Write-Output "Complete pc2"

Write-Output "Replacement fully completed."

Сначала нужно удалить всю папку "Библиотека" а потом скопировать новую из $source в $dest1 и $dest2 и тд... (всего 6).
Удаление происходит нормально, копирование тоже, но как только скрипт доходит до $dest2 удаляет там, то удаление происходит так же и в $dest1, одновременно короче.

Как это сделать по очереди?
Сначала $dest1, потом $dest2 и тд ?

В PowerShelle не силен, поэтому прошу помощи

[Spyder3W]

В конце каждого добавь

| Out-Null

Сообщение отредактировал Spyder3W - Aug 18 2015, 10:41

[mukolaich]

Ребята, нужна помощь в написании скрипта на PowerShell

Копирование файлов по сети (порядка 30-40 тысяч мелких файлов)

» Нажмите, чтобы показать спойлер - нажмите опять, чтобы скрыть... «

$source = "c:\source\Библиотека"
$dest1 = "\\host1\c$\Program Files (x86)\P0\"
$dest1_1 = "\\host2\c$\Program Files (x86)\P0\Библиотека"

$dest2 = "\\host2\c$\Program Files (x86)\P0\"
$dest2_1 = "\\host2\c$\Program Files (x86)\P0\Библиотека"

$exclude = @('*.db','*.config')

Write-Output "Deleting from pc1..."
Remove-Item $dest1_1 -Recurse
Write-Output "Copying on pc1..."
Copy-Item $source -Destination $dest1 -Force -Recurse -Exclude $exclude
Write-Output "Complete pc1"
Write-Output "Deleting from pc2..."
Remove-Item $dest2_1 -Recurse
Write-Output "Copying on pc2..."
Copy-Item $source -Destination $dest2 -Force -Recurse -Exclude $exclude
Write-Output "Complete pc2"

Write-Output "Replacement fully completed."

Сначала нужно удалить всю папку "Библиотека" а потом скопировать новую из $source в $dest1 и $dest2 и тд... (всего 6).
Удаление происходит нормально, копирование тоже, но как только скрипт доходит до $dest2 удаляет там, то удаление происходит так же и в $dest1, одновременно короче.

Как это сделать по очереди?
Сначала $dest1, потом $dest2 и тд ?

В PowerShelle не силен, поэтому прошу помощи

В принципе все правильно в скрипте, все отрабатывает последовательно и по очереди.
Единственное, нужно поменять Write-Output на Write-Host, это разные командлеты по принципу, использовать их тоже нужно в разных кейсах.
Out-Null нигде писать не надо.

Доброго времени суток.
Возникла проблема что сетка ложится по 5-6 раз в день, на минуты 3-4.
Устройсва которые подключены по wi-fi остаются подключены к точкам доступа, но "теряют" свои сетевые адреса. Тоже самое и на ПК которые подключены шнурком.

Есть ли у кого скрипт cmd/bat для пинга и сохранения результатов в текствой файл?
Поделитесь пожалуйста, с меня "+"
Заранее спасибо.

ПС. Паралельно гуглю в поисках )

Для этого есть 2 командлета:
Test-NetConnection -ComputerName www.contoso.com -InformationLevel Detailed | Out-File 'C:\Path\to\file.txt
Test-Connection -ComputerName www.contoso.com -Count 100500 | Out-File 'C:\Path\to\file.txt

Сообщение отредактировал mukolaich - Aug 28 2015, 20:17

[Aleha]

Привет всем.
Нужна помощь со скриптом на vbs.

Задача стоит такая: есть пользователи в AD, есть компьютеры там же. Надо чтобы при логине пользователя на компьютер, в поле Description пользователя прописывалось имя компьютера.

Пока пришел к такому решению:

Dim adsinfo, ThisComp, oUser

' Определяем объекты
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)

' Заносим данные в AD

'В поле Description учетки пользователя пишем имя компьютера
oUser.put "Description", ThisComp.cn
oUser.Setinfo
wscript.quit

Но так не подходит т.к. пользователи своими доменными УЗ заходят и на терминальные сервера, т.е. надо как то исключить их.
Все компьютеры названы одним и тем же паттерном (LND-WS0001, CPR-WS0001 и так далее, у нас четыре локации) а вот сервера бывают разные.
Думаю про какой то if then else, но язык vbs знаю из рук вон плохо.

[Fanta]

Но так не подходит т.к. пользователи своими доменными УЗ заходят и на терминальные сервера, т.е. надо

Зазвичай такі скрипти треба "вішати" на ОУ де є ПК і зазвичай для ПК і Севрерів юзаються різні ОУ.
Якщо ж все погано то ви на ГПО де юзається цей скрипт повісьте ВМІ-фільтр який буде фільтрвувати ТС і на них ця політика не буде примінятися!

[Aleha]

Зазвичай такі скрипти треба "вішати" на ОУ де є ПК і зазвичай для ПК і Севрерів юзаються різні ОУ.
Якщо ж все погано то ви на ГПО де юзається цей скрипт повісьте ВМІ-фільтр який буде фільтрвувати ТС і на них ця політика не буде примінятися!

Так скрипт предназначен для пользователя же, это logon-скрипт, потому отфильтровать так не получится, ни первым ни вторым способом.

[lAero]

Привет всем.
Нужна помощь со скриптом на vbs.

Задача стоит такая: есть пользователи в AD, есть компьютеры там же. Надо чтобы при логине пользователя на компьютер, в поле Description пользователя прописывалось имя компьютера.

Пока пришел к такому решению:

Dim adsinfo, ThisComp, oUser

' Определяем объекты
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)

' Заносим данные в AD

'В поле Description учетки пользователя пишем имя компьютера
oUser.put "Description", ThisComp.cn
oUser.Setinfo
wscript.quit

Но так не подходит т.к. пользователи своими доменными УЗ заходят и на терминальные сервера, т.е. надо как то исключить их.
Все компьютеры названы одним и тем же паттерном (LND-WS0001, CPR-WS0001 и так далее, у нас четыре локации) а вот сервера бывают разные.
Думаю про какой то if then else, но язык vbs знаю из рук вон плохо.

было бы логично и в компьютер прописывать пользователя, кто залогинен. у нас есть куча компьютеров и мы не знаем чьи они. идеи?

[olexande]

Через пакет psexec можна дистанційно збирати за потребою ...
Без перезавантаження при перелогоні відпрацює правильно?

[romchikss]

Приветствую!
OS Windows 2012 R2. Есть каталог с подкаталогами (очень много), у каждой папки нарезаны свои права, унаследование отключено. Нужно через powershell нарезать на каждый каталог/подкаталог доменному пользователю право Read only. Есть возможность ? Спасибо

Сообщение отредактировал romchikss - Jan 28 2016, 17:48

[mak_v_]

А шо не так?

[artem.ultra]

нужен батник
1. подключаем сетевую шару с логином и паролем доменным \\192..168.150.150\back
2. проверяем файлы в этой шаре, если старше 30 дней - удаляем что там есть
3. копируем в эту шару файлы C:\Back
4. очищаем шару
5. размонтируем шару
как то так
запускать хочется через планировщика

[Dik]

Господа, подмогните! Может кто где то видел или знает скрипт, который позволит делать выборки:
пользователи.тхт --->выборка AD ---> User+PC.txt
PC.txt ---> выборка AD ---> PC+User.txt

Тоесть выборка из АД данных на основе списков.

[Koka-ftp]

не совсем понятнo описана задача)
если смотреть в сторону PS, то выборку из списка\текста можно делать командлетом Import-CSV
далее как-то так)

» Нажмите, чтобы показать спойлер - нажмите опять, чтобы скрыть... «

Import-Module ActiveDirectory

$results = @()
$Users = Get-ADUser -Filter * -Properties *
foreach ($User in $Users) {
   $GroupMembership = ($user.memberof | % { (Get-ADGroup $_).Name; } | Sort-Object) -join ';'
   $results += $User.SamAccountName + ';' + (Get-ADGroup $user.PrimaryGroup).Name + ';' + $GroupMembership
}

$results | out-file ('C:\blar_{0}-{1:yyyyMMddHHmm}.csv' -f $env:userdomain,(Get-Date))
или
$results | Export-Csv -path ('C:\all_ad_groups_{0}-{1:yyyyMMddHHmm}.csv' -f $env:userdomain, (Get-Date)) -Encoding 'UTF8' -force -NoTypeInformation -UseCulture

Сообщение отредактировал Koka-ftp - Aug 29 2017, 16:38

[Dik]

не совсем понятнo описана задача)
если смотреть в сторону PS, то выборку из списка\текста можно делать командлетом

Имеется в виду, что есть список пользователей (например 100 имен), все учетки с указанными дескрипшинами (например есть логин Pupkin.V с дескрипшином Пупкин Василий).
Список записан в файл, тхт или csv ...
И вот задача вытащить из АД, по очереди используя список, и создать список в виде логин/дескрипшн юзера/имя ПК/время входа и записать это в файл.
Или наоборот, по имени ПК вытащить то же самое но про пользователя.

Сообщение отредактировал Dik - Aug 30 2017, 10:10

[mak_v_]

Можт у кого-то есть под рукой скриптик для АД (2к3) выгребающий список локальных админов со всех раб.станций?
Ну и в идеале конечно смена паролей для них-же.

[Morftimg]

Помогите сделать людский скрипт для копирования профиля и данных пользователя и всех данных с диска Д.

Наваял скриптец но он не универсальный и не делает что я хочу.

NET USE \\Server\IPC$ /u:Server\user *password*

@echo off

set day=%date:~0,2%

set month=%date:~3,2%

set year=%date:~6,4%

Robocopy c:\users\Karpov \\Server\UserBackup\karpov%day%%month%%year%\ /E /A /DCOPY:T /R:2 /W:5 /MT:64

Что надо чтоб было СИСТЕМА WIN 10:
Авторизация на сетевой шаре и после бекапа размонтирование шары.

1. Универсальный скрипт, чтоб копировал профиль пользователя (только профили реальных пользователей, а не всех юзеров типа администратор и тд)
2. Все содержимое раздела D:\ исключая системный папки корзины и тд
3. К названию конечной папки чтоб дописывалась текущая дата, и вообще класно было бы если б было доступ 5 папок с датам допустим Karpov20042018 Karpov21042018 Karpov22042018 чтоб когда пишет 6 папку самая старая удалялась.
4. Хочется чтоб был батник, чтоб можно было вставить в обычный планировщик.

Очень надо срочно ) Спасибо.

[Morftimg]

Помогите со скриптом, уже срочно надо