FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Complemento .... Manejando CDROM
Posts: 446
Joined: Mon Dec 26, 2005 09:11 PM
Complemento .... Manejando CDROM
Posted: Fri Jul 17, 2009 12:17 AM

En vista que no hubo respuesta al requerimiento de trozo de codigo para manejar un CDROM, hago otra pregunta.... ¿Conoce alguien una aplicaciòn que me permita ver el interior de las DLL que vienen con Windows? Me parece que debo buscar dentro de las rutinas del Windows para ver què modulos contienen y, de ser posible, ver què rutinas se debe utilizar para manejar el CDROM. Acepto sugerencias de cualquier tipo! :)

FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: Complemento .... Manejando CDROM
Posted: Fri Jul 17, 2009 01:56 AM

Armando Picon,

La ExplorerLib de Andrés Reyes te servirá.

codigo-base.blogspot.com

saludos

William, Morales

Saludos



méxico.sureste
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: Complemento .... Manejando CDROM
Posted: Fri Jul 17, 2009 02:54 PM
Me parece, que talvez usando el objeto WMI encuentres ayuda,
WMI nos permite obtener informacion sobre casi cualquier cosa de windows
podria buscar informacion de "unidades de discos que sean de tipo unidad optica no removibles".
las consultas son incluso tipo consultas SQL (te dejo un ejemplo).

busca en el foro como crear un objeto WMI, luego en google como buscar x tipo de dispositivo usando ese objeto WMI.
Muchos de los ejemplos de google son con Visual Basic Script, pero son facilmente convertidos a sintaxis xbase.

ejemplo:
Code (fw): Select all Collapse
oWMI := CreateObject ("wbemScripting.SwbemLocator")
oWMICon := oWMI:ConnectServer()

oADSServ := oWMICon:ExecQuery("Select * from Win32_Service where DisplayName = 'Advantage Database Server'")

IF oADSServ:State == "Stopped"

oADSServ:StartService()

ENDIF
//NOTA:ejemplo tomado de Objeto Persitente


Esta Direccion te lleva al MSDN
http://msdn.microsoft.com/en-us/library/aa394582%28VS.85%29.aspx
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
Posts: 446
Joined: Mon Dec 26, 2005 09:11 PM
Re: Complemento .... Manejando CDROM
Posted: Fri Jul 17, 2009 04:53 PM
wmormar wrote:Armando Picon,

La ExplorerLib de Andrés Reyes te servirá.

codigo-base.blogspot.com

saludos


He probado la aplicaciòn de Andrès y solamente opera con .LIB y no con .DLL
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com

Continue the discussion