Script to Remove the Server 2012 IE Icon

5 Nov

I was locking down a server and stripping the desktop but the IE icon wouldn’t shift.

I found the script to resolve the issue:

On Error Resume Next

dim filesys

Set objNetwork = CreateObject("WScript.Network")

Set filesys = CreateObject("Scripting.FileSystemObject")

strUserName = objNetwork.UserName

strFilePath = "C:\Users\" & strUserName & "\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Internet Explorer (64-bit).lnk"

filesys.CreateTextFile strFilePath, True

If filesys.FileExists(strFilePath) Then

filesys.DeleteFile strFilePath

End If

WScript.quit