My script sometimes quits on this line:
Set objReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &
strCompName & "\root\default:StdRegProv")

The script is for installing the Microsoft SCCM client to a group of remote
PCs. The script checks if the remote PC can be pinged, checks the local PC
for the necessary installation files, and copies whichever files are needed
to the remote PC. Remote PCs can either already have the SCCM client, the SMS
client (the previous version of SCCM), or neither client. If either the 2nd
or 3rd case are true, the SCCM client gets installed on the remote PC. The
script reports the results to a log file and runs against multiple PCs by
reading a txt file.

It works fine most of the time, but every so often it bombs at the line I
noted above. As an alternative I tried this:
Set objReg = GetObject("winmgmts:\\" & strCompName &
"\root\default:StdRegProv")

But that produced the same result: the script gets to that line and quits
running instead of continuing on to the rest of the script or going to the
next PC.

I added "On Error Resume Next" to the file to allow the script to continue
if it finds a PC it can't ping. But even when I comment that out, the code
errors on the lines above and then exits. The error message says "Permission
denied: GetObject. The remote server has been paused or is in the process of
being restarted."

All the PCs are Windows XP, Service Pack 2, Office 2003.