WMI scripting template which prompts you to enter (via StdIn) the name of the computer you want to run the script against. This script requires Windows Script Host 5.6 and must be run under Cscript.exe.

Visual Basic
Edit|Remove
On Error Resume Next

Wscript.StdOut.Write "Please enter the name of the computer you want to connect to: "

strComputer = WScript.StdIn.ReadLine

If strComputer = "" Then
    Wscript.Quit
End If

' =====================================================================
' Insert your code here
' =====================================================================

Set objWMIService = GetObject _
    ("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
    ("Select * From Win32_OperatingSystem")
For Each objItem in ColItems
     Wscript.Echo strComputer & ": " & objItem.Caption
Next

' =====================================================================
' End
' =====================================================================