Club Builder

[mario-mg]

Gracias cesar por contestarme, pero no entiendo lo coCreateinstance.

Mi problema es el siguiente:

Si intento obtener informacion del equipo a traves de un script(ficheros *.vbs), como por ejemplo:

Set colSettings = objWMIService.ExecQuery _
("Select * from Win32_ComputerSystem")

For Each objComputer in colSettings
Wscript.Echo "System Name: " & objComputer.Name
Wscript.Echo "System Manufacturer: " & objComputer.Manufacturer
Wscript.Echo "System Model: " & objComputer.Model
Wscript.Echo "Time Zone: " & objComputer.CurrentTimeZone
Wscript.Echo "Total Physical Memory: " & _
objComputer.TotalPhysicalMemory
Next

puedo obtener la informacion que desee, pero quiero saber si esto se
puede hacer desde builder.

He hecho lo siguiente, en builder:

Variant obj,obj1,obj2;

try
{
obj = CreateOleObject("WbemScripting.SWbemLocator");
obj1 = obj.Exec(Function("ConnectServer") << "SERVIDOR");
obj2 = obj1.Exec(Function("ExecQuery") << "select * from Win32_ComputerSystem");
AnsiString p=obj2.Exec(Function("Caption") << "Caption");
}
catch(...)
{
obj = obj1 = obj2 =Unassigned;
}

obj = obj1 = obj2 =Unassigned;


pero cuando intento obtener la informacion de la propiedad "Caption"
me dice que no es un metodo, sabría alguien ayudarme.

Gracias.