Remote WMI? Hvorfor virker det ikke?

Hej eXperter.

Jeg har følgende kode. Men jeg kan ikke få den til at virke remote.

Jeg får Error code 70 - Access denied.

On Error Resume Next

strComputer = "test"
Set WshShell = CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

If Err.Number <> 0 Then
    WScript.Echo "Virkede ikke"
    WScript.Echo Err.Number & " " & Err.Description
End If
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystemProduct",,48)
For Each objItem in colItems
    Wscript.Echo "Caption: " & objItem.Caption
    Wscript.Echo "Description: " & objItem.Description
    Wscript.Echo "IdentifyingNumber: " & objItem.IdentifyingNumber
    Wscript.Echo "Name: " & objItem.Name
    Wscript.Echo "SKUNumber: " & objItem.SKUNumber
    Wscript.Echo "UUID: " & objItem.UUID
    Wscript.Echo "Vendor: " & objItem.Vendor
    Wscript.Echo "Version: " & objItem.Version
Next


Hvorden sætter jeg brugernavn og password imod den maskine jeg kører koden mod?

Jeg har lavet en "net use \\test\ipc$ * /user:administrator" inden jeg kørte scriptet, men det hjalp ikke noget.