none
Script BAT para VBSCRIPT RRS feed

 > 

  • Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Camaradas, bom dia!

    Criei um Bat para verificar a existência de um arquivo nos pcs da minha rede e, caso não existisse, instalasse um aplicativo buscando no meu domain controller, no meu caso, o IE 10 para Windows XP, rodando via logon script. Ficou assim, mas não funcionou...

    ______________

    @echo off

IF EXIST "c:\%programfiles%\internet explorer\ieproxy.dll" GOTO 2

ELSE GOTO 1

:2
echo IE 8 Instalado

GOTO 1

:1
"\\192.168.0.1\netlogon\IE8XP\IE8-Setup-Full.exe /q"


    _____________

    Alguém poderia me ajudar convertendo para VBSCRIPT?

    Muito Obrigado!!

    Mcp Mcdst Itil Iso



    sexta-feira, 8 de agosto de 2014 11:52
    |

Respostas

Todas as Respostas

  • Question
    Entrar para Votar
    1
    Entrar para Votar

    Leonardo,

    Seu script faz basicamente duas coisas:

    1-Verificar se um arquivo existe

    2-Executar  um arquivo

    Tente "montar o quebra-cabeça" a partir deste dois artigos, se não conseguir poste o que você já fez.

    How to Verify if file exist with VB script

    http://stackoverflow.com/questions/3031497/how-to-verify-if-file-exist-with-vb-script

    Run Method (Windows Script Host)

    http://msdn.microsoft.com/en-us/library/d5fk67ky(v=vs.84).aspx

    Edição:

    Opa, tem mais uma coisa importante, ele usa uma váriavel do sistema (%progrmafiles%)

    Environment Variables

    http://www.robvanderwoude.com/vbstech_data_environment.php

    Edição 2

    Acho que seu script não funcionou porque você concatenou c:\ + %programfiles%, a variavel programfiles já contém c:\, é como se vc estivesse tentando encontrar o arquivo "c:\C:\arquivos de programs\..."

    Fábio de Paula Junior



    sexta-feira, 8 de agosto de 2014 12:53
    |
    Moderador
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Camarada, vai me ajudar muito! Como não sou desenvolvedor, dei uma lida aqui sobre vbscripts e vou "montar o quebra cabeças" com disse... Conseguindo ou não, posto aki...

    Vlw demaissss!!

    Mcp

    sexta-feira, 8 de agosto de 2014 13:34
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Camarada, ficou assim:

    Option Explicit
    DIM fso, WshShell  

    Set fso = CreateObject("Scripting.FileSystemObject")
    Set WshShell = WScript.CreateObject("WScript.Shell")

    If (fso.FileExists("%programfiles%\internet explorer\ieproxy.dll")) Then
      WScript.Echo("Internet Explorer 8 Instalado!")
      WScript.Quit()

    Else
      WshShell.Run "\\192.168.0.1\netlogon\IE8XP\IE8-Setup-Full.exe /q" & WScript.ScriptFullName
    End If

    WScript.Quit()

    Porém, ele está ignorando a linha em negrito, pois o arquivo ieproxy.dll está na pasta, então ele deveria retornar -Full.exe

    O que faltou ou fiz errado?

    Obrigado mais uma vez...

    Mcp

    sexta-feira, 8 de agosto de 2014 14:16
    |
  • Question
    Entrar para Votar
    1
    Entrar para Votar
    O VBScript não entende o %programfiles%, você tem que usar aquele ultimo link que postei para conseguir este valor e então concatenar com o seu "internet explorer\ieproxy.dll".

    Fábio de Paula Junior

    sexta-feira, 8 de agosto de 2014 14:29
    |
    Moderador
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Vlw Camarada... Fiz o que disse e deu certo... Muito obrigado!!!

    Mcp

    sexta-feira, 8 de agosto de 2014 18:35
    |