Home > SCCM, SCCM Client > Something worth trying – Fix ConfigMgr Remote Tools

Something worth trying – Fix ConfigMgr Remote Tools


I have this in production using a modified Ron Crumbaker Web Remote Console v3.21 with a button that calls “PSEXEC.EXE” to remotely run the script below. More often than not this will fix Remote Tools if there aren’t client issues in general.

‘**********************************************
on error resume Next

‘**********************************************
‘Variables and Constants
‘***********************************************
Dim WshShell, objFSO, objNetwork, objShell
Dim strDirectory, strFileName,  objTextFile
Dim regPath, regValue

Set WshShell = CreateObject(“Wscript.Shell”)
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
Set objNetwork = CreateObject(“Wscript.Network”)
Set objShell = CreateObject(“WScript.Shell”)

Const ForReading = 1, ForWriting = 2, ForAppending = 8
Const HKEY_LOCAL_MACHINE = &H80000002

regPath = “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\SMS\Client\Client Components\Remote Control\Enabled”
regValue = “1”

‘**********************************************
‘Create logs folder if it does not exist
‘**********************************************
strDirectory = “c:\Logs”
strFileName = “c:\Logs\RemoteToolsFix.log”

If objFSO.FolderExists (strDirectory) Then

 ‘WScript.Echo “No need to create ” & strDirectory
Else
 Set objFolder = objFSO.CreateFolder(strDirectory)
 ‘WScript.Echo “Created ” & strDirectory
End If

Set objTextFile = objFSO.OpenTextFile (strFileName, ForAppending, True)
 objTextFile.WriteLine
 objTextFile.WriteLine(“****************************************************************”)
 objTextFile.Write (“RemoteToolsFix script ran at “)
 objTextFile.WriteLine Now
objTextFile.Close

objShell.RegWrite regPath,regValue,”REG_DWORD”

Set objTextFile = objFSO.OpenTextFile (strFileName, ForAppending, True)
 objTextFile.Write(“Script finished at “)
 objTextFile.WriteLine Now
 objTextFile.WriteLine(“****************************************************************”)
objTextFile.Close

‘**********************************************

Advertisements
Categories: SCCM, SCCM Client
  1. No comments yet.
  1. No trackbacks yet.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: