I figured it out. Only thing is, the code will work on Windows XP or 2000 because it uses ScriptPW (a COM object found only in these two versions of Windows)
Option Explicit
Dim objPassword, strPassword, objShell, objWMIService, PATH
Set objPassword = CreateObject("ScriptPW.Password")
WScript.StdOut.Write "Please enter your password:"
strPassword = objPassword.GetPassword()
Set objShell = WScript.CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:\\" & "." & "\root\cimv2:Win32_Process")
PATH = objShell.ExpandEnvironmentStrings( "%programfiles%" )
objWMIService.Create(PATH & "\Symantec Endpoint Protection\smc.exe -stop " & strPassword)
'objWMIService.Create("d:\program files\Symantec Endpoint Protection\smc.exe -stop " & strPassword)