nemakcanada
Programmer
I wrote a simple vbs that will list all the processes running on a specified machine. I am running this script on a win 2000 machine to list all the processes on the remote win 98 machine named “wap10469” in the domain “ncc”. I get the following error message
Error: The authentication service is unknown
Code: 800706D3
Source: SwbemServices
I know the problem lies in the fact that win98 uses a different authentication service than win2000. Win98 uses NTLMDomain and win2000 uses Kerberos. I been stuck on this problem for a couple of days now, any help would be appreciated. Thanks in advance.
------------------------------------------------------------------------------------------------------------------------------------
strComputer = "wap10469"
Set wbemServices = GetObject("winmgmts:{impersonationLevel=impersonate, authenticationLevel=connect, authority=ntlmdomain:ncc}!\\" & strComputer & "\root\cimv2")
Set wbemObjectSet = wbemServices.InstancesOf("Win32_Process")
For Each wbemObject In wbemObjectSet
WScript.Echo "Name: " & wbemObject.Name & vbCrLf & _
" Handle: " & wbemObject.Handle & vbCrLf & _
" Process ID: " & wbemObject.ProcessID
Next
----------------------------------------------------------------------------------------------
Here are the following things I tried.
Install WMI 1.5 on win98 machine
Follow the instructions to start up window management service automatically on win98
Install DCOM on the win98
Set the impersonation level to “Impersonate” and authentication level to “Connect” and authority to “NTLMDomain” as suggested by this article.
Error: The authentication service is unknown
Code: 800706D3
Source: SwbemServices
I know the problem lies in the fact that win98 uses a different authentication service than win2000. Win98 uses NTLMDomain and win2000 uses Kerberos. I been stuck on this problem for a couple of days now, any help would be appreciated. Thanks in advance.
------------------------------------------------------------------------------------------------------------------------------------
strComputer = "wap10469"
Set wbemServices = GetObject("winmgmts:{impersonationLevel=impersonate, authenticationLevel=connect, authority=ntlmdomain:ncc}!\\" & strComputer & "\root\cimv2")
Set wbemObjectSet = wbemServices.InstancesOf("Win32_Process")
For Each wbemObject In wbemObjectSet
WScript.Echo "Name: " & wbemObject.Name & vbCrLf & _
" Handle: " & wbemObject.Handle & vbCrLf & _
" Process ID: " & wbemObject.ProcessID
Next
----------------------------------------------------------------------------------------------
Here are the following things I tried.
Install WMI 1.5 on win98 machine
Follow the instructions to start up window management service automatically on win98
Install DCOM on the win98
Set the impersonation level to “Impersonate” and authentication level to “Connect” and authority to “NTLMDomain” as suggested by this article.