none
Desinstalar programa utilizando script RRS feed

  • Pergunta

  • Boa tarde galera!

    Estou querendo remover um determinado software, encontrei o executável de instalação na Registry (HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall)

    Gostaria que o script testasse a existencia da chave, por exemplo, se o RealVNC estiver instalado na máquina existirá a chave RealVNC_is1 neste caminho, porque, se o programa não estiver instalado não é necessário fazer mais nada naquela estação.

    Considerando que o script localizou a chave, existirá o seguinte valor de sequência UninstallString, que é o executável de desisntalação do programa.

    Então, o script deve testar a existencia da chave, se não existir finalizar, caso exista, o caminho do valor de sequência UninstallString deve ser executado. Como fazer isso?

    Muito obrigado!

    Bruno

    segunda-feira, 5 de fevereiro de 2007 18:31

Respostas

  • Bruno,

    Testa este...

    Set WshShell = CreateObject("Wscript.Shell")

    on error resume next
    'Ler valor da chave uninstall
    regExiste = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\RealVNC_is1\UninstallString")
    on error goto 0

    if regExiste > "" then 'Existe a chave
     'Executa a string encontrada no registro
     WshShell.Run regExiste
    end if

    terça-feira, 6 de fevereiro de 2007 12:36
    Moderador

Todas as Respostas

  • Bruno,

    Testa este...

    Set WshShell = CreateObject("Wscript.Shell")

    on error resume next
    'Ler valor da chave uninstall
    regExiste = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\RealVNC_is1\UninstallString")
    on error goto 0

    if regExiste > "" then 'Existe a chave
     'Executa a string encontrada no registro
     WshShell.Run regExiste
    end if

    terça-feira, 6 de fevereiro de 2007 12:36
    Moderador
  • Na prática dá na mesma, mas fica mais legível o código se vc trocar

    if regExiste > "" then 'Existe a chave

    por

    if regExiste <> "" then 'Existe a chave

    []s,

    Vinicius
    quarta-feira, 7 de fevereiro de 2007 10:36
    Moderador