none
Verificar o Service Pack do Office RRS feed

  • Pergunta

  • Bom dia galera,

        Preciso verificar em todos os pcs da rede a versão do office instalada + o service pack, alguem tem idéia de como faço isso???



    desde já agradeço a ajuda de todos

    vlw!!


    Douglas Oliveira Admin Rede []
    segunda-feira, 14 de dezembro de 2009 12:50

Respostas

  • Olá,

    Verifique o link abaixo:

    http://support.microsoft.com/default.aspx/kb/821549


    Você pode usar um script... para checar a versão:


    officepath="c:\Arquivos de programas\Microsoft Office\Office11\"
    strLog = "c:\log.txt"

    set fso=createobject("scripting.filesystemobject")
    Set ArqLog = FSO.OpenTextFile(strLog, 8, True, 0)
    returnstring=fso.getfileversion(officepath & "winword.exe")

    ArqLog.WriteLine  VBCRLF
    ArqLog.WriteLine "==================================================="
    ArqLog.WriteLine "LOG OFFICE  EM: " & now
    ArqLog.WriteLine "==================================================="
    ArqLog.WriteLine  VBCRLF
    ArqLog.WriteLine returnString & VBCRLF
    ArqLog.WriteLine "==================================================="

    ArqLog.Close
    set fso=nothing


    Até mais,

    Jesiel

    Obs.: Se útil, classifique


    segunda-feira, 14 de dezembro de 2009 13:17

Todas as Respostas

  • Olá,

    Verifique o link abaixo:

    http://support.microsoft.com/default.aspx/kb/821549


    Você pode usar um script... para checar a versão:


    officepath="c:\Arquivos de programas\Microsoft Office\Office11\"
    strLog = "c:\log.txt"

    set fso=createobject("scripting.filesystemobject")
    Set ArqLog = FSO.OpenTextFile(strLog, 8, True, 0)
    returnstring=fso.getfileversion(officepath & "winword.exe")

    ArqLog.WriteLine  VBCRLF
    ArqLog.WriteLine "==================================================="
    ArqLog.WriteLine "LOG OFFICE  EM: " & now
    ArqLog.WriteLine "==================================================="
    ArqLog.WriteLine  VBCRLF
    ArqLog.WriteLine returnString & VBCRLF
    ArqLog.WriteLine "==================================================="

    ArqLog.Close
    set fso=nothing


    Até mais,

    Jesiel

    Obs.: Se útil, classifique


    segunda-feira, 14 de dezembro de 2009 13:17
  • vlw!!!  

    fiz umas alterações para atender a minha necessidade... e funcionou perfeitamente.
    Douglas Oliveira Admin Rede []
    segunda-feira, 14 de dezembro de 2009 16:13
  • Estou com uma necessidade parecida:

    Preciso inventariar todas as estações e descobrir qual a versão do office instalada + service pack

    Preciso que gere um ÚNICO log onde contenha o nome da estação  + versão office + SP

    Algúem pode me dar um Help?


    rbo

    terça-feira, 27 de agosto de 2013 17:05
  • Douglas, que modificações você fez? Pode compartilhar conosco pra eu comparar com o script inicial?

    Valeu.


    Daniel Silva Analista de TI

    terça-feira, 3 de setembro de 2013 11:48
  • Pessoal!

    Alguém pode nos ajudar, nos disponibilizando o script?


    rbo

    quinta-feira, 5 de setembro de 2013 13:24