none
LiveUpdate RRS feed

  • Pergunta

  • preciso de um script que fassa um download de um arquivo.rar ou .zip e descompacte ele no diretório em que ele se encontra...

     

    exenplo:

    C:\projeto\update.vbs

    descompactar em.....

    C:\projeto\.

    C:\projeto\..

    C:\projeto\...

    o script vai fazer o download de uma url qualquer ex: " http://update.myhost.com.br/update.rar " escompactar e substituir os arquivos sem perguntar se deve ou não subistituir...

     

    sei que em um bat tem como se fazer isso mas gostaria de deixa-lo mais dinamico...

    se alguem tiver alguma coisa ja pronta ou uma ideia de como faze-lo fico agradecido

    quarta-feira, 22 de novembro de 2006 17:40

Respostas


  • 'Mostra que gravou o arquivo ou erro :
    wscript.echo GetSource("http://servername/path/arquivo.rar", _
                     CreateObject("WScript.Shell").CurrentDirectory & "\meuarquivo.rar")

    Set abc = CreateObject("WScript.Shell")
    abc.Run  =  " comando para descompactar seu arqvuivo"


    Function GetSource(source, target)
      With CreateObject("MSXML2.XMLHTTP")
        .open "GET", source, False
        .send
        sText = .responseText
      End With

      With CreateObject("Scripting.FileSystemObject").OpenTextFile(target, 2, True)
        .Write sText
        .Close
      End With
      GetSource = source & vbcrlf & vbcrlf & "  Gravado como:" & vbcrlf & vbcrlf & target

    End Function

    segunda-feira, 27 de novembro de 2006 09:16