Home » Developer & Programmer » Forms » HDD SerialNumber
HDD SerialNumber [message #356736] Sat, 01 November 2008 16:55 Go to next message
MMA_EG_CAIRO
Messages: 25
Registered: August 2008
Junior Member
I am very sorry to Izaaajkm, but I have a problem I did not find participants in the forum here, and I think it will benefit everyone

The problems of bringing information on the hardware of the computer automation, especially the hard disk and No. No. No. processor and motherboard

At the outset of this letter and values you easily through the Allwegwal 6.0 or dot Net claims through the Library wbemdisp.dll Or wbemdisp.TLB, but the problem I tried to use the library from within the model, unfortunately, did not get there, check out the code Bilge Basic:

Dim R, Y, T 

Set R = GetObject ( "winmgmts ://.") 
Set y = r.ExecQuery ( "SELECT * FROM Win32_PhysicalMedia") 

For Each T In Y 
   MsgBox "HDD SerialNumber =" & Trim (T.serialnumber) 
Next 

Aldivilubar code, but I do not want to work for Kalam, see:

DECLARE 
R OLE2.OBJ_TYPE; 
Y OLE2.OBJ_TYPE; 
T OLE2.OBJ_TYPE; 
LT OLE2.LIST_TYPE; 
BEGIN 
- R: = OLE2.CREATE_OBJ ( 'WbemScripting.SWbemServices'); 
R: = OLE2.CREATE_OBJ ( 'winmgmts ://.'); 
   LT: = OLE2.CREATE_ARGLIST; 
   OLE2.ADD_ARG (LT, 'SELECT * FROM Win32_PhysicalMedia'); 
Y: = OLE2.INVOKE_OBJ (R, 'ExecQuery', LT); 
- FOR I IN 1 .. Y. COUNT 
END;



I hope to find a solution to this problem


Thanks
Re: HDD SerialNumber [message #356790 is a reply to message #356736] Sun, 02 November 2008 07:56 Go to previous messageGo to next message
mudabbir
Messages: 235
Registered: April 2006
Location: Kuwait
Senior Member

search this forum for webutil.
Re: HDD SerialNumber [message #356811 is a reply to message #356736] Sun, 02 November 2008 10:44 Go to previous messageGo to next message
MMA_EG_CAIRO
Messages: 25
Registered: August 2008
Junior Member
I'm sorry, but I seriously considered whether I did not find anything I am talking about.

I wish if I attach a link how to bring No. hard drive (not solid CD).


Thanks
Re: HDD SerialNumber [message #356818 is a reply to message #356790] Sun, 02 November 2008 11:14 Go to previous messageGo to next message
mudabbir
Messages: 235
Registered: April 2006
Location: Kuwait
Senior Member

Do you know what webutil is? how it functions? download the webutil package and READ the PDF document which comes with it. you will find your answer there...

http://www.oracle.com/technology/products/forms/htdocs/webutil/webutil.htm
Re: HDD SerialNumber [message #356840 is a reply to message #356736] Sun, 02 November 2008 14:54 Go to previous message
MMA_EG_CAIRO
Messages: 25
Registered: August 2008
Junior Member
Thank you very much for your interest in restitution.

But I still initially with Oracle, and I think that meant Webutil is the same group of Bilt-In Packages such as libraries Text_IO, OLE2, Standard, Is this true???

I generally deal with the usage OLE2, and the problem is that I do not know why the library from within the model, but with the programming language or other VB6.0 B_igl good VBS


Why


Thanks
Previous Topic: Return value to calling form from called form
Next Topic: Setting Visual attribute to a specific record in tabular block if the condition is satisfied
Goto Forum:
  


Current Time: Thu Dec 08 08:22:07 CST 2016

Total time taken to generate the page: 0.09779 seconds