Unconfigured Ad Widget

Collapse

Anúncio

Collapse
No announcement yet.

Baixando atualização da Internet

Collapse
X
 
  • Filter
  • Tempo
  • Show
Clear All
new posts

  • Font Size
    #1

    Baixando atualização da Internet

    Fazer com que seu programa se atualize automaticamente pela internet pode ser vital em algumas situações, tais como os exemplos:

    - Mudei meu IP e meu Trojan / Keylogger perdeu as vitimas
    - Correções e atualizações remotas
    - Execução de comandos especiais


    Neste método, a atualização é feita com o suporte de um arquivo .txt, que armazena a versão atual do programa, e também serve de comparação para averiguar a necessidade de atualizar.

    Além disso, também é necessário armazenar o mesmo arquivo .txt em um servidor na internet, este sendo o arquivo de referencia, ou seja, aquele que vai propor a atualização. Exemplificando:





    Código: Importações necessárias.

    Imports System.IO
    Imports System.Net



    Código: Verifica conexão com a internet e baixa o arquivo do site para o local especificado.

    If My.Computer.Network.IsAvailable Then
    HTTPClient.DownloadFile(New Uri("http://www.site.com/novaversao.txt"), ("novaversao.txt"))



    Código: Aqui o programa carrega a versão atual do programa.

    Reader = IO.File.OpenText("versaoatual.txt")
    Dim versao() As String = Reader.ReadToEnd.Split(" ")
    Reader.Close()
    Reader.Dispose()
    versaoatual = versao(0)



    Código: E agora ele carrega a versão baixada da internet.

    Reader = IO.File.OpenText("novaversao.txt")
    Dim versao As String = Reader.ReadToEnd.Split(" ")
    Reader.Close()
    Reader.Dispose()
    novaversao = versao(0)



    Código: Após isso, efetuamos a comparação de versões baixadas e, caso necessário, executamos os comandos desejados.

    If versaoatual <> novaversao Then
    "AQUI VEM SEU CÓDIGO"



    Código: Para finalizarmos, o programa deve aderir a nova versão em seu arquivo .txt.

    Dim Writer As New IO.StreamWriter("versaoatual.txt", False)
    Writer.WriteLine(novaversao)
    Writer.Close()
    Writer.Dispose()




    A partir daqui, o resto vai de acordo com suas necessidades.

    No meu caso, o meu arquivo .txt possui muito mais informações que apenas a versão do programa. Isso permite a substituição remota de valores, executáveis, adição de módulos...

    Ter um programa que se atualiza sozinho pela internet é um grande simbolo de profissionalismo!
    Similar Threads
X
Working...
X