Open-AudIT
https://www.open-audit.org/phpBB3/

Modify audi.vbs
https://www.open-audit.org/phpBB3/viewtopic.php?f=20&t=3785		 Page 1 of 1
Author:  jrc_101077 [ Thu Sep 16, 2010 8:56 pm ]
Post subject:  Modify audi.vbs
Buenas tardes,

Estoy utilizando Openaudit de Obras Públicas y muy bien. Estoy interesado en hacer varios cambios, pero cuando puedo verificar la estructura de la aplicación me confundo , quiero crear una opción para audit.vbs para que verifica los perfiles que están en " Documents and Settings "y , al mismo tiempo crea una lista y lo agrega a la información del PC . Tengo casi terminado , pero he utilizado la misma tabla de archivo de paginación.

¿Cómo puedo obtener la lista creada para ser guardado en una nueva mesa?

Muchas gracias por su atención.


[code] audit.vbs

''''''''''''''''''''''''''''''''''''
" archivo de paginación de información '
''''''''''''''''''''''''''''''''''''
comment = " archivo de paginación Info "
Echo (comentario )
On Error Resume Next

colItems Set = objWMIService.ExecQuery (" Select * from Win32_PageFile " , , 48)
Para cada objItem en colItems
   form_input = " archivo de paginación ^ ^ ^ " y limpia ( objItem.Name ) y "^^^" y limpio ( objItem.InitialSize ) y "^^^" y limpio ( objItem.MaximumSize ) y "^^^"
   form_input entrada , comentario, objTextFile , oAdd , oComment
   form_input = ""
Próximo

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''''''''''''''
Const perfilDeUsuario = & H28 &
objFolder Dim, numSize

WshNetwork Set = WScript.CreateObject (" WScript.Network ")
Establecer objShell = CreateObject (" Shell.Application ")
Set objFolder = objShell.Namespace ( perfilDeUsuario )
Establecer objFolderItem = objFolder.Self

Carpeta = " c: \ Documents and Settings "

Establecer objFSO = CreateObject (" Scripting.FileSystemObject ")
Set objFolder = objFSO.GetFolder ( Carpeta )
Establecer colSubfolders = objFolder.Subfolders
para cada objsubFolder en colSubfolders
                               Tamaño de archivo = int ( objsubFolder.Size/1048576 )
                               MaxFileSize = int ( objsubFolder.Size/1048576 )
                form_input = " archivo de paginación ^ ^ ^ "& & objsubFolder.Name "^^^" Tamaño de archivo & & & "^^^" MaxFileSize y "^^^"
                form_input entrada , comentario, objTextFile , oAdd , oComment
                form_input = ""
Próximo
[/code]

[code] system_viewdef_os.php

                                   " Perfiles "= > array (
                                                    "Título "=>__(" Perfiles "),
" sql "= > " pagefile_timestamp SELECT * FROM WHERE pagefile_uuid archivo de paginación = '".$_ PEDIDO [ "% pc "]."' Y COMO NO pagefile_name " pagefile.sys % 'y = '" . $ GLOBAL [" system_timestamp "] . "' ORDER BY pagefile_name " ,
                                                    "Imagen" = > "images / shared_drive_l.png " ,
                                                    " table_layout "= > " horizontal " ,
                                                    "Campos" = > array ("10 "= > array ("nombre "= > " pagefile_name " , "cabeza "),), Nombre "=>__("
                                                                    "20" = > array ("nombre "= > " pagefile_initial_size "," "=>__(" cabeza "),), Tamaño inicial
                                                                    "30" = > array ("nombre "= > " pagefile_max_size " , "jefe máximo "=>__(" "),), Tamaño
                                                                   ) ,
                                                    ) ,
[/code]
Page 1 of 1 All times are UTC + 10 hours
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/