elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Únete al Grupo Steam elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [VBS] Ayuda sobre objeto nuevo (Para mi)
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [VBS] Ayuda sobre objeto nuevo (Para mi)  (Leído 2,204 veces)
danny920825

Desconectado Desconectado

Mensajes: 175


Ver Perfil WWW
[VBS] Ayuda sobre objeto nuevo (Para mi)
« en: 18 Enero 2014, 07:06 am »

Hola, hace algun tiempo Elektro me posteo un codigo que monitoreaba la conexion y desconexion de cualkier dispositivo USB en el sistema. Por el momento me asuste con el codigo y pense que con el tiempo sabria que dice ahi. Pues el caso es que el tiempo paso y sigo sin saber que dice ahi. El codigo es el siguiente:


 
Citar
 
Código
  1. Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
  2.  
  3.    Set wmiEvent = objWMIService.ExecNotificationQuery( _
  4.       "Select * From __InstanceCreationEvent Within 1" & _
  5.           " Where TargetInstance ISA 'Win32_PnPEntity'")
  6.  
  7.    While True
  8.       Set objEvent = wmiEvent.NextEvent()
  9.       Set objUSB = objEvent.TargetInstance
  10.       strName = objUSB.Name
  11.       strDeviceID = objUSB.DeviceID
  12.       Set objUSB = Nothing
  13.  
  14.       Set colDrives = objWMIService.ExecQuery( _
  15.           "Select * From Win32_LogicalDisk Where DriveType = 2")
  16.  
  17.       For Each objDrive in colDrives
  18.           strDriveLetter = objDrive.DeviceID
  19.       Next
  20.  
  21.       Set colDrives = Nothing
  22.  
  23.       WScript.Echo strName & " Se ha montado como " & strDriveLetter
  24.    Wend
  25.  
  26.    Set wmiEvent = Nothing
  27.    Set objWMIService = Nothing

si alguien me puede explicar mas sobre ese objeto porque no se mucho ingles como par leer el archivo de ayuda y los traductores no son recomendables en programacion.



[MOD]: Utiliza las etiquetas para insrtar código.


« Última modificación: 18 Enero 2014, 14:21 pm por Eleкtro » En línea

"Los que reniegan de Dios es por desesperación de no encontrarlo".
   Miguel de Unamuno
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.885



Ver Perfil
Re: [VBS] Ayuda sobre objeto nuevo (Para mi)
« Respuesta #1 en: 18 Enero 2014, 14:49 pm »

si alguien me puede explicar mas sobre ese objeto

¿Que es exáctamente lo que no entiendes?, pues hay varias referencias a objetos declarados en ese trozo de código ...aunque todas tienen que ver con WMI.

WMI (Windows Management Instrumentation) es una infraestructura para obtener diversa información del sistema haciendo querys.

Citar
Código
  1. Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")

Lo que está entre paréntesis es una expresión para conectar con el namespace del objeto (en este caso .\root\cimv2) donde el punto representa cualquier PC (podría especificarse otro nombre de máquina o dirección), y winmgmts: es un prefijo que nunca cambia.

~> Connecting to WMI Objects
~> Windows Remote Management and WMI

Citar
Código
  1.    Set wmiEvent = objWMIService.ExecNotificationQuery( _
  2.      "Select * From __InstanceCreationEvent Within 1" & _
  3.          " Where TargetInstance ISA 'Win32_PnPEntity'")

Con esa query lo que haces es subscribirte a un evento, pues cuando insertas o extraes un dispositivo sucede un evento en el sistema, y de esta manera se reporta a ti, y la class Win32_PnPEntity representa las propiedades de un dispositivo plug&play.

Por ejemplo, el evento __InstanceCreationEvent ocurre cuando un dispositivo se conecta/crea, __InstanceDeletionEvent cuando un dispositivo de extrae/elimina, y el evento __InstanceModificationEvent cuando un dispositivo se modifica.

~> __InstanceCreationEvent class
~> Win32_PnPEntity class
~> Receiving a WMI Event

Dentro del búcle, el resto de métodos, propiedades del objeto, y querys, creo que són más fáciles de entender sin necesidad de explicaciones, pero si no entiendes algo de ahí entonces requiere más lectura en inglés por tu parte (cosa que ya has dejado clara que no quieres), así que lo dejo aquí.

Saludos!


« Última modificación: 18 Enero 2014, 15:01 pm por Eleкtro » En línea



Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Problema con objeto dentro de otro objeto
PHP
Skeletron 3 6,542 Último mensaje 5 Enero 2011, 04:10 am
por Skeletron
¿que lenguaje de programacion para web o objeto me recomiendan soy nuevo?
Foro Libre
Weeken 1 2,531 Último mensaje 23 Noviembre 2012, 19:01 pm
por Graphixx
Saber sobre que objeto está el ratón
Programación General
diegoCmC 0 1,522 Último mensaje 6 Marzo 2013, 20:40 pm
por diegoCmC
POO - ¿Diferencia entre usar una constructora-copiadora a Objeto = Objeto? « 1 2 »
Programación General
xaps 12 9,307 Último mensaje 16 Noviembre 2013, 21:41 pm
por xaps
Ayuda para que un metodo me devuelva un objeto
Java
rych 5 4,581 Último mensaje 2 Mayo 2016, 03:29 am
por + 1 Oculto(s)
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines