| Respuesta: LogonScript Active Directory
Hola, puedes usar el "WKIX32.EXE" para realizar varias cosas con un script cuando los usuarios se logueen en el sistema, busca en Google por el WKIX32 y descárgalo, luego cópialo completo a la carpeta \\TUSERVIDOR\NETLOGON y allí crea un archivo llamado SCRIPT.SCR, lee la ayuda que tiene el programita, te permite hacer infinidades de cosas...
Luego vas al Active Directory y le das doble click al usuario que quieres que se le ejecute el SCRIPT cuando inicie sesión, seleccionas la pestaña PROFILES (PERFIL) y en donde dice:
Logon Script pones:
WKIX32.EXE SCRIPT.SCR
y así sucesivamente para todos los usuarios que desees...
Un ejemplo del SCRIPT.SCR mio te lo paso a continuación:
;
; kixtart.scr
;
; kix32 3.21 script
;
; 21/03/2000
;
; Windows NT Logon Script para todos los usuarios
;
; Para ejecutar el script sin que sea minimizado:
;
; En HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon
; crear una nueva clave llamada RunLogonScriptSync de tipo REG_DWORD y con valor 1
/*
IF @dos >= "5.0"
$hklms = 'HKLM\SOFTWARE'
IF 1 <> ReadValue($hklms+"\Microsoft\Windows NT\CurrentVersion\Winlogon", "RunLogonScriptSync")
$ = WriteValue ($hklms+"\Microsoft\Windows NT\CurrentVersion\Winlogon", "RunLogonScriptSync", "1", "REG_DWORD")
ENDIF
ENDIF
*/
;ESTABLECE EL TITULO DE LA VENTANA
SETTITLE("[ Comercializadora ESCAMBRAY UCT Cienfuegos ]")
;COMO SE EJECUTA
SETCONSOLE("FOREGROUND")
;QUE SE MUESTRE
SETCONSOLE("SHOW")
;MAXIMIZADO
;SETCONSOLE("MAXIMIZE")
;SIEMPRE ARRIBA
SETCONSOLE("ALWAYSONTOP")
;FUNCION DELETE FILES AND FOLDERS
Function DeleteFilesFolders ($files)
$fso = CreateObject("Scripting.FileSystemObject")
$fso.DeleteFile($files, True)
$fso.DeleteFolder($files, True)
;$DelFiles = 0
EndFunction
CLS
Color g+/n
small
at (2,34) "Comercializadora"
big
at (7,4) "ESCAMBRAY"
small
at (18,34) "UCT Cienfuegos"
;
sleep 2
;
CLS
COLOR b+/n
Box (0,0,24,79,"grid")
COLOR g+/n
Box (7,18,17,60,"full")
; Verificar la hora del día y seleccionar el saludo
; apropiado.
color w+/n
IF ((@time > "00:00") AND (@time < "12:00"))
At (9,20) "Buenos días,"
ELSE
IF ((@time > "12:00") AND (@time < "18:00"))
At (9,20) "Buenas tardes,"
ELSE
At (9,20) "Buenas noches,"
ENDIF
ENDIF
;cls
$fileserver=\\WEBSERVER
$ExactServer=\\EXACT
$timeserver=\\WEBSERVER
beep
At (9, 35) "usted ha iniciado una"
At (10,20) "seccion de trabajo en el servidor"
At (11,20) "@lserver, del dominio @DOMAIN."
At (13,20) "Hora : @TIME"
At (14,20) "Fecha : @DATE"
At (15,20) "Usuario : @USERID"
Sleep 5
cls
; SINCRONIZANDO FECHA Y HORA CON EL SERVIDOR DE TIEMPO
color w+/n
/* ? "- Sincronizando fecha y hora con el servidor de tiempo $timeserver....."
settime $timeserver
if @error
Color r+/n
At (1,71) "[ ERROR ]"
else
Color g+/n
At (1,71) "[ OK ]"
endif */
; LIBERANDO ASIGNACIONES EXISTENTES
color w+/n
;?
? "- Liberando asignaciones existentes...................................."
?
SHELL "CMD /c net use * /d /yes > nul"
if @error
Color r+/n
At (1,71) "[ ERROR ]"
else
Color g+/n
At (1,71) "[ OK ]"
endif
; MAPEANDO RECURSOS DISPONIBLES EN LA RED
color w+/n
?
? "- Mapeando recusos disponibles en la red..............................."
use K: "$ExactServer\Globewin"
use Z: "$fileserver\Movimientos"
if @error
Color r+/n
At (3,71) "[ ERROR ]"
else
Color g+/n
At (3,71) "[ OK ]"
endif
; REALIZANDO LIMPIEZA EN EL EQUIPO
color w+/n
?
? "- Realizando limpieza en el equipo....................................."
$HOMEPATH=%HOMEPATH%
$WINDIR=%WINDIR%
?
? " . Limpiando desde \Configuración local\Archivos temporales de Internet"
;Eliminando ficheros y carpetas de \Configuración local\Archivos temporales de Internet
DeleteFilesFolders($HOMEPATH + "\Configuración local\Archivos temporales de Internet\Content.IE5\*.*")
Sleep 1
?
? " . Limpiando desde \Configuración local\Historial\History.IE5"
;Eliminando ficheros y carpetas de \Configuración local\Historial\History.IE5
DeleteFilesFolders($HOMEPATH + "\Configuración local\Historial\*.*")
Sleep 1
?
? " . Limpiando desde \Configuración local\Temp"
;Eliminando ficheros y carpetas de \Configuración local\Temp
DeleteFilesFolders($HOMEPATH + "\Configuración local\Temp\*.*")
Sleep 1
?
? " . Limpiando desde \Cookies"
;Eliminando ficheros y carpetas de \Cookies
DeleteFilesFolders($HOMEPATH + "\Cookies\*.*")
Sleep 1
?
? " . Limpiando desde \Reciente"
;Eliminando ficheros y carpetas de \Reciente
DeleteFilesFolders($HOMEPATH + "\Reciente\*.*")
Sleep 1
?
? " . Limpiando desde C:\WINNT\TEMP"
;Eliminando ficheros y carpetas de C:\WINDOWS\TEMP
Sleep 1
DeleteFilesFolders($WINDIR + "\TEMP\*.*")
if @error
Color r+/n
At (5,71) "[ ERROR ]"
else
Color g+/n
At (5,71) "[ OK ]"
endif
If RedirectOutput( "\\WEBSERVER\Login$\login.log" ) = 0
?"@DATE - @TIME - MAC @ADDRESS - @WKSTA - @LSERVER - User @USERID logged in. "
endif
if RedirectOutput( "" ) = 0
endif
color w+/n
?
?
?
?
?
?
?
?
?
?
?
?
?
?
? "Cierre correctamente la sesion en la computadora @WKSTA antes de terminar"
? "-------------------------------------------------------------------------------"
SLEEP 5
goto fin
:fin |