Coding with WMI?

[Smithsco]

When I create a VB 6 app like

Private Sub Form_Load()
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2&quot
Set colItems = objWMIService.ExecQuery("Select * from Win32_Process",,48)
For Each objItem in colItems
msgbox "Name: " & objItem.Name
Next
end sub

It work fine, however if I add option explicit I get an error, do you know what I should be dim objwmiservice/colitems/objitem as?

 

[DrJavaJoe]

Dim strComputer As String
Dim objWMIService As Object
Dim colItems As Object
Dim objItem As Object