none
Ajuda Por favor - Script que instala e verifica diretorios RRS feed

  • Pergunta

  •  

    Pessoal, boa tarde, preciso atualizar um software nos computadore da minha rede. consegui realizar por srcipt .bat, porem isso causa um transtorno para meus usuários, aparecendo telas do dos etc. Vocês poderia me ajudar a criar um VBscript apartir do meu .bat.

    Segue meu script que criei, ele faz a verificação dos arquivos antes, conforme essas verificações ele toma a decisão

     


    :TESTE
    if exist %windir%\Altirisnovo.txt goto SAIDA

    if not exist "%programfiles%\Altiris\" goto INST

    if exist "%programfiles%\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe" goto AGT

    If not exist "%programfiles%\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe" goto INST


    :AGT

    "%programfiles%\Altiris\Altiris Agent\AeXAgentUtil.exe" /stop

    "%programfiles%\Altiris\Altiris Agent\AeXAgentUtil.exe" /serverTongue Tiedervidor

    "%programfiles%\Altiris\Altiris Agent\AeXAgentUtil.exe" /restart
     

    :INST

    "\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns="servidor.bcsul.corp" NOSTARTMENU NOTRAYICON /s

    "%programfiles%\Altiris\Altiris Agent\AeXAgentUtil.exe" /restart

    xcopy \\servidor\nscap\Bin\Win32\X86\altirisnovo.txt %windir%
     
    goto SAIDA

    Tongue TiedAIDA
    exit

     

    Desde já agradeço pela ajuda

    Muito obrigado

    segunda-feira, 7 de abril de 2008 19:09

Respostas

  • diego tenta assim, o problema está sendo no ponto depois do servidor:

    server = "servidor.bcsul.corp"

    set fso = createobject("scripting.filesystemobject")

    set shell = createobject ("wscript.shell")

    set objnetwork = createobject("wscript.network")

    if fso.fileexists("C:\windows\Altirisnovo.txt") = false then

      if fso.fileexists("C:\Arquivos de Programas\\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe") = true then

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /stop"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /server: servidor"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart"), 0, true

      else

      shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=" & server & " NOSTARTMENU NOTRAYICON /s),0,true

      shell.exec("C:\Arquivos de progrmas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart")

      objnetwork.addnetworkdrive "Z:", "\\servidor\nscap\Bin\Win32\X86\"

      fso.copy "Z:\altirisnovo.txt" C:\Windows\"

      shell.run "net use Z: /delete /y" 
      end if

    end if

    set fso = createobject("scripting.filesystemobject")

    set shell = createobject ("wscript.shell")

    set objnetwork = createobject("wscript.network")

    if fso.fileexists("C:\windows\Altirisnovo.txt") = false then

      if fso.fileexists("C:\Arquivos de Programas\\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe") = true then

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /stop"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /serverervidor"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart"), 0, true

      else

      shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=""servidor.bcsul.corp"" NOSTARTMENU NOTRAYICON /s),0,true

      shell.exec("C:\Arquivos de progrmas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart")

      objnetwork.addnetworkdrive "Z:", "\\servidor\nscap\Bin\Win32\X86\"

      fso.copy "Z:\altirisnovo.txt" C:\Windows\"

      shell.run "net use Z: /delete /y" 
      end if

    end if

    quinta-feira, 10 de abril de 2008 22:59

Todas as Respostas

  • Diego testa e veja se te ajuda Wink

    set fso = createobject("scripting.filesystemobject")

    set shell = createobject ("wscript.shell")

    set objnetwork = createobject("wscript.network")

    if fso.fileexists("C:\windows\Altirisnovo.txt") = false then

      if fso.fileexists("C:\Arquivos de Programas\\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe") = true then

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /stop"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /serverTongue Tiedervidor"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart"), 0, true

      else

      shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=""servidor.bcsul.corp"" NOSTARTMENU NOTRAYICON /s),0,true

      shell.exec("C:\Arquivos de progrmas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart")

      objnetwork.addnetworkdrive "Z:", "\\servidor\nscap\Bin\Win32\X86\"

      fso.copy "Z:\altirisnovo.txt" C:\Windows\"

      shell.run "net use Z: /delete /y" 
      end if

    end if

    segunda-feira, 7 de abril de 2008 20:41
  • Laerte,

     

    Obrigado pela ajuda....

    Esta apresentando erro na linha:

     

    shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=""servidor.bcsul.corp"" NOSTARTMENU NOTRAYICON /s),0,true

     

     

    Linha: 19

    Caract: 82

    Erro: ')' esperado.

     

     

    O que pode ser?

     

    Obrigado

     

    terça-feira, 8 de abril de 2008 00:14
  •  Diego Amaral Araujo wrote:

    Laerte,

     

    Obrigado pela ajuda....

    Esta apresentando erro na linha:

     

    shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=""servidor.bcsul.corp"" NOSTARTMENU NOTRAYICON /s),0,true

     

     

    Linha: 19

    Caract: 82

    Erro: ')' esperado.

     

     

    O que pode ser?

     

    Obrigado

     

     

     

    Laerte, naum funcionou

    terça-feira, 8 de abril de 2008 11:16
  • Diego, coloque assim e veja se funciona

     

    shell.run "\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=""servidor.bcsul.corp"" NOSTARTMENU NOTRAYICON /s",0,true

     

    terça-feira, 8 de abril de 2008 20:53
  •  

    Não funcionou Laerte, teria alguma outra forma?

     

    Obrigado pela ajuda!

    quinta-feira, 10 de abril de 2008 21:16
  • diego tenta assim, o problema está sendo no ponto depois do servidor:

    server = "servidor.bcsul.corp"

    set fso = createobject("scripting.filesystemobject")

    set shell = createobject ("wscript.shell")

    set objnetwork = createobject("wscript.network")

    if fso.fileexists("C:\windows\Altirisnovo.txt") = false then

      if fso.fileexists("C:\Arquivos de Programas\\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe") = true then

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /stop"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /server: servidor"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart"), 0, true

      else

      shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=" & server & " NOSTARTMENU NOTRAYICON /s),0,true

      shell.exec("C:\Arquivos de progrmas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart")

      objnetwork.addnetworkdrive "Z:", "\\servidor\nscap\Bin\Win32\X86\"

      fso.copy "Z:\altirisnovo.txt" C:\Windows\"

      shell.run "net use Z: /delete /y" 
      end if

    end if

    set fso = createobject("scripting.filesystemobject")

    set shell = createobject ("wscript.shell")

    set objnetwork = createobject("wscript.network")

    if fso.fileexists("C:\windows\Altirisnovo.txt") = false then

      if fso.fileexists("C:\Arquivos de Programas\\Altiris\Altiris Agent\AeXSWDUsrUIWin.exe") = true then

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /stop"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /serverervidor"), 0, true

       shell.exec("C:\Arquivos de Programas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart"), 0, true

      else

      shell.exec("\\servidor\NSCap\Bin\Win32\X86\NS Client Package\AeXNSC.exe" -s -a ns=""servidor.bcsul.corp"" NOSTARTMENU NOTRAYICON /s),0,true

      shell.exec("C:\Arquivos de progrmas\Altiris\Altiris Agent\AeXAgentUtil.exe /restart")

      objnetwork.addnetworkdrive "Z:", "\\servidor\nscap\Bin\Win32\X86\"

      fso.copy "Z:\altirisnovo.txt" C:\Windows\"

      shell.run "net use Z: /delete /y" 
      end if

    end if

    quinta-feira, 10 de abril de 2008 22:59