locked
Remover Forefront Protection Server for Exchange manualmente. RRS feed

  • Pregunta

  • Buenas..estoy teniendo un problema con Forefront Protection for exchange, no puedo desinstalar de manera normal, alguien conoce la manera de desinstalar el producto de manera manual, borrar registros, etc.

    Gracias......

    lunes, 20 de septiembre de 2010 14:19

Respuestas

  • Puedes tratar algo como esto tambien.
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    '
    '	Name	:Forefront Client Security (FCS) Uninstallation Script
    '
    '	Author	:Santhosh Sivarajan
    ''
    '	Date	:11/08/2009
    '
    '	Ref	:http://santhoshsivarajan.blogspot.com/2010/02/forefront-client-security-fcs.html
    '
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    Option Explicit
     
    const HKEY_LOCAL_MACHINE = &H80000002
    Dim SASProductName, SASProductKey, SSSProductName, SSSProductKey, Msg, MsgBoxStyle, RegKey
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    sub GetFCSKey()
     
    dim oReg, sPath, aKeys, sName, sKey
    Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
     
    sPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
    oReg.EnumKey HKEY_LOCAL_MACHINE, sPath, aKeys
     
    For Each sKey in aKeys
        oReg.GetStringValue HKEY_LOCAL_MACHINE, sPath & "\" & sKey, "DisplayName", sName
        If Not IsNull(sName) Then 
            if (sName = "Microsoft Forefront Client Security Antimalware Service") then
                SASProductKey = sKey
                SASProductName = sName
            end if
            if (sName = "Microsoft Forefront Client Security State Assessment Service") then
                SSSProductKey = sKey
                SSSProductName = sName
        end if
    end if
    Next
    end sub
     
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    sub UninstallFCS(key, name)
    dim cmd, objShell, iReturn, oshell
    
    cmd = "C:\windows\system32\msiexec.exe /q/x " & key
    set objShell = wscript.createObject("wscript.shell")
     
    objShell.LogEvent 0, "Removing the program [" & name & "] under Product Key [" & key & "]" & vbCrLf & "Executing command: " & vbCrLf & cmd
     
    iReturn=objShell.Run(cmd,1,TRUE)
     
    	if (iReturn = 0) then
        	objShell.LogEvent 0, "Program [" & name & "] was successfully removed"
    	else
        	objShell.LogEvent 0, "Failed to remove the program [" & name & "]."
    	end if
     
    Set objShell = Nothing 
    end sub
    
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    SASProductKey = ""
    SASProductName = ""
    SSSProductKey = ""
    SSSProductName = ""
    
    
    call GetFCSKey()
    
    	if Not (SASProductKey = "") then
    		call UninstallFCS(SASProductKey, SASProductName)
    	end if
    
    	if Not (SSSProductKey = "") then
    		call UninstallFCS(SSSProductKey, SSSProductName)
    	end if
    
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    
    
    
    
    

    1. Ensure that the Forefront Server Security Administrator is not running.

    2. Open “Services” in the Control Panel.

    3. Stop the “FSCController service”. This causes the Microsoft Exchange Transport Service and Microsoft Exchange Information Store to be stopped also.

    4. When all these services have stopped, close the “Services” dialog box.

    5. Open “Add or Remove Programs” in the Control Panel.

    6. Remove “Microsoft Forefront Security for Exchange Server”. Click “Yes” to confirm the deletion.

    7. At the Uninstall Complete screen, click Finish.


    Santos Martinez, MCSE, MCDBA, MCTS, MCITP MVP - SCCM http://www.mvplatino.ms/blogs/smartinezpr santosmvp@live.com
    • Marcado como respuesta Diego Almada sábado, 25 de septiembre de 2010 22:08
    jueves, 23 de septiembre de 2010 16:16