Cannot create ActiveX component Error

[aeskan]

Hi everybody,

I'm not sure this post belongs to this section, if so I would apologize.

I'm trying to get the computer description by computer name. The problem is; I get this error "Cannot create ActiveX component" when the following codes run, while the variable ComputerName sets to another computer name in the network except the local computer that the code is running in it.

Dim Obj As Object = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & ComputerName & "\root\cimv2").ExecQuery("Select * FROM Win32_OperatingSystem")
For Each obj1 In Obj
ComputerDesc = obj1.description()
Next

When the ComputerName is the local computer name everything is fine, but when I use another computer name in my network an error occures in the line "Dim Obj as Object = GetObject(...", as Cannot create ActiveX component!

Appreciate any suggestion or help beforehand.

 

[JohnH]

In VB.Net you should use the System.Management classes, not the wbem scripting object (ActiveX).
Try the http://www.vbdotnetforums.com/web-resources/13972-wmi-code-creator-1-0-a.html linked to get sample VB.Net code.

 

[aeskan]

Thank you John, at a glance seems a little complicated, I try it.

 

[aeskan]

John,

Surely it's an extremely useful tool. It generated codes below.

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem",,48)
For Each objItem in colItems
Wscript.Echo "-----------------------------------"
Wscript.Echo "Win32_OperatingSystem instance"
Wscript.Echo "-----------------------------------"
Wscript.Echo "Description: " & objItem.Description
Next

But when I use (strComputer = "RemoteComputerName") and execute the code it says: Microsoft VBScript runtime error: Permission denied: 'GetObject'

It's almost similar to my own code. Did you pay proper attention to my codes? I think the problem is somewhere else other than code!

 

[JohnH]

That is still scripting. You have to change Code Language from Visual Basic Script (vbs) to Visual Basic .Net. Check out the app menus.
For remote computer there is also choice in Target Computer menu.

 

[aeskan]

Thank you anyway John for WMI Code Creator, it was useful.

But in my case, the problem was a bunch of permissions in Group Policy, WMI Policy, Windows Firewall, DCOM port range configuration and some Windows services that must run for remote computer mananging. After error: "Cannot create ActiveX component", step by step I got "Permission Denied", "RPC server is unavailable" errors and etc, which guided me to the mentioned local area network configurations. So far I dismissed the case until have a time to consider it again.

Thanks.