Script Session Part-4 Desfragmentando Discos

Olá pessoal, segue mais um scriptizinho fácil para agilizar uma tarefa adminsitrativa, hoje no caso é um script em VBS que irá fazer a desfragmentação de todos os discos da sua máquina, bem simples rápido e funcional, basta abrir o bloco de notas, copiar/colar e salvar com a extensão .vbs.
Só um conselho, para salvar em uma outra extensão, faça assim: Na hora que você salvar o arquivo, coloque aspas duplas ( " ), como exemplo "desfragmenta.vbs". Pois assim salvará como vbs e ao como .vbs.txt.

Segue abaixo o script

'====================================================
' NAME: Desfragmenta.vbs
'
' AUTHOR: RayzenX
'
'
' MODIFICATIONS:
' DATE MODIFIED MODIFIER MODIFICATION
'
'
'====================================================
' Set Variables
'===============

Dim Logfile, LogPath
'Sets the path and the file for the log file
LogPath = "C:\REPORTS\"
LogFile = "DefragRpt.txt"
'Combinds the File and the path.
Logfile = Logpath & LogFile

Set objShell = CreateObject("WScript.Shell")

'Makes directory for the Logfile
objShell.Run ("cmd /C CD C:\ & if not exist " & Logpath & " mkdir " & Logpath), 1, True

'Clears and creates the Logfile
objShell.Run ("cmd /C CD C:\ & Echo Server: %Computername% - %Date% %Time% > " & _
Logfile), 1, True

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colDiskDrives = objWMIService.ExecQuery("SELECT * FROM Win32_DiskDrive")

For Each objDrive In colDiskDrives
strDeviceID = Replace(objDrive.DeviceID, "\", "\\")
Set colPartitions = objWMIService.ExecQuery _
("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & _
strDeviceID & """} WHERE AssocClass = " & _
"Win32_DiskDriveToDiskPartition")

For Each objPartition In colPartitions
Set colLogicalDisks = objWMIService.ExecQuery _
("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & _
objPartition.DeviceID & """} WHERE AssocClass = " & _
"Win32_LogicalDiskToPartition")

For Each objLogicalDisk In colLogicalDisks
objShell.Run ("cmd /C CD C:\ & echo -------------------------------------- >> " & _
Logfile), 1, True
objShell.Run ("cmd /C CD C:\ & echo " & objLogicalDisk.DeviceID & " Drive >> " & _
Logfile), 1, True
objShell.Run ("cmd /C CD C:\ & defrag.exe " & objLogicalDisk.DeviceID & " -f -v >> " & _
Logfile), 1, True

Next
Next
Next


É isso ai pessoal espero que tenham gostado, até a próxima.

Script Session Part-3 Desabilitando o Firewall do Windows

Poxa pessoal galera do TI com Farofa, fala a verdade... Tem muitas horas que o firewall do Windows só atrapalha nossa vida, como por exemplo para mim que uso determinadas ferramentas de gerenciamento de estação de trabalho via servidor, que preciso ficar incluindo N regras no firewall e ainda sim as vezes da pau, o normal que vejo é desativarem o firewall do windows nas estações de trabalho, mas imaginem fazer isso em várias máquinas uma a uma.
Por isso trago hoje um comandinho simples para desativar o firewall do Windows que pode ser salvo em um arquivinho .bat e executado da forma que achar melhor em massa na sua rede.

netsh firewall set opmode mode = disable

OBS: Esse comando funcionará apenas com usuários que tenham poderes administrativos, se caso incluir em um, talvez sript de logon, pode ser combinado com o comando "runas" e uma conta administrativa para que o usuário comum consiga executar a tarefa sem problemas, ou também em uma gpo para scripts.

É isso ai pessoal até a próxima.

Script Session Part-2 Configurando a Placa de Rede

Olá pessoal, segue hoje um script bem simples para configurar a placa de rede da sua estação de trabalho ou seus server membros via remoto talvez por linha de comando, ou inclui-lo num arquivo em lote onde logo após a formatão da máquina, só com 2 clicks ele configura tudo pra vc inclusive a rede conforme iremos mostrar hoje.

Segue aqui o script que pode ser salvo como um .bat e logo após explicarei as linhas:


netsh interface ip set address name="interno" source=static addr=192.168.0.10 mask=255.255.255.0
netsh interface ip set address name="interno" gateway=192.168.0.1 gwmetric=0
netsh interface ip set dns name="interno" source=static addr=208.67.220.220
netsh interface ip add dns name="interno" addr=208.67.222.222

Explicação:

O comando usado é o "netsh" com os parametros "interface ip set adress" diz que deve ser configurado uma interface de rede com o nome onde coloca o parametro "name" o parametro name é o mais importante pq é por esse nome que o comando encontra qual placa de rede deverá ser configurada; por exemplo se você tiver em seu computador 2 placas de rede uma com o nome "interno"e outra com o nome "externo", se você quiser por exemplo configurar o ip da placa "interno" código ficaria assim:

netsh interface ip set address name="interno" source=static addr=192.168.0.10 mask=255.255.255.0

logo após segue o parametro "source=static" que diz que o ip é fixado na placa junto com o resto das configurações de rede, o parametro "addr" é a entrada do ip e o "mask" é o da máscara de rede.

Agora temos que configurar o gateway:

netsh interface ip set address name="interno" gateway=192.168.0.1 gwmetric=0

esse é bem simples, mas o parametro "gwmetric" é a Métrica do Gateway.

Configuração do dns:

netsh interface ip set dns name="interno" source=static addr=208.67.220.220
netsh interface ip add dns name="interno" addr=208.67.222.222

Para configurar o dns também é bem simples, use o "set dns" para informar que é a config de um dns e o "add dns" para incluir um segundo dns, como normalmente é usado o preferencial e o secundário.


É isso ai galera do TIcomFarofa, espero que tenha sido útil, mande suas dúvidas e sugestões abraço até a próxima.

Script Session Part-1 Gerenciamento de Energia do Windows

Fala galera do TI com Farofa como estão??
Bom inaugurando aqui mais um novo projetinho que é o Script Session, postando aqui um sério de scripts que usamos no dia a dia para que cada vez mais o trabalho de um ADM de Rede seja mais simples com menos esforço administrativo.

O primeiro da Session é um script que usei para que eu não tivesse problemas com o agendador de tarefas, fazendo a gestão da ferramenta de gerenciamento de energia do Windows XP via linha de comando numa batizinha simples.

Segue abaixo o Script:

POWERCFG /CREATE POWPERF
REM ----- TEMPO PARA DESLIGAR O MONITOR -----
POWERCFG /CHANGE POWPERF /monitor-timeout-ac 0
POWERCFG /CHANGE POWPERF /monitor-timeout-dc 0
REM ---------------------------------------------
REM ------ TEMPO PARA DESLIGAR O HD ----------
POWERCFG /CHANGE POWPERF /disk-timeout-ac 0
POWERCFG /CHANGE POWPERF /disk-timeout-dc 0
REM -------------------------------------------
REM ------------ SISTEMA EM ESPERA ------------
POWERCFG /CHANGE POWPERF /standby-timeout-ac 0
POWERCFG /CHANGE POWPERF /standby-timeout-dc 0
REM ----------------------------------------------
POWERCFG /HIBERNATE OFF
POWERCFG /CHANGE POWPERF /hibernate-timeout-ac 0
POWERCFG /CHANGE POWPERF /hibernate-timeout-dc 0
POWERCFG /SETACTIVE POWPERF

Explicação:

O código em si é bem simples e fácil de entender, as linhas já estão comentadas pelo comando REM, e a execução do comando é feita pelo comando POWERCFG / o parametro especificado, no fim dele, onde eu deixei o valor "0" (zero) u que quer dizer que esta desativado o recurso, os parametros "ac" para computadores na tomada e "dc" para quando entrarem na bateria.
Um exemplo prático para esse script é:
Imaginem que você precise configurar o gerenciamento de energia para o notebook do seu chefe pra que ele nunca hiberne, mas que desligue o monitor em 10 minutos na bateria e em 20 na tomada, que o hd desligue em 30 minutos independente se na tomada ou na bateria e num quer que entre em standyby, então o comando ficaria mais ou menos assim:

POWERCFG /CREATE POWPERF
REM ----- TEMPO PARA DESLIGAR O MONITOR -----
POWERCFG /CHANGE POWPERF /monitor-timeout-ac 20
POWERCFG /CHANGE POWPERF /monitor-timeout-dc 10
REM ---------------------------------------------
REM ------ TEMPO PARA DESLIGAR O HD ----------
POWERCFG /CHANGE POWPERF /disk-timeout-ac 30
POWERCFG /CHANGE POWPERF /disk-timeout-dc 30
REM ----------------------------------------------
POWERCFG /HIBERNATE OFF
POWERCFG /CHANGE POWPERF /hibernate-timeout-ac 0
POWERCFG /CHANGE POWPERF /hibernate-timeout-dc 0
POWERCFG /SETACTIVE POWPERF

é isso pessoal, espero que tenha sido útil para vocês, e se tiverem scripts e comandos para dividir com agente e dúvidas só postar nos comentários ou no twitter, abração a todos.