Download-Script?

  • hi leute,

    wollte mal fragen ob folgendes möglich ist:
    DateiA-vXXXXX.zip liegt auf https://autoit.de/www.testA.com/DateiA-vXXXXX.zip
    DateiB-vXXXXX.zip liegt auf https://autoit.de/www.testB.com/DateiB-vXXXXX.zip

    so nun ändert sich aber vXXXXX dauernd, da da fast jeden Tag ein neues Update kommt.

    nun wollte ich fragen, ob man ein DownloadScript schreiben kann, was einfach auf beiden URLs nach diesen Dateien sucht und zwar nur nach DateiA-v und nach DateiB-v und diese automatisch downloaded weil die Versionsnummer hinten sich immer ändert und somit der Dateiname nie gleich bleibt?

    (P.S.: beide Dateien sind winzig - also 50-100kb, kann man das auch machen ohne IE starten zu müssen, ka über console oder so? :rolleyes:)
    mfg Van

  • ok bin ja schon bissl weiter gekommen: die hilfe war aufschlussreich

    Code
    InetGet("http://wowace.com/files/Ace2/Ace2-r20187.zip", "ace2.zip", 1, 1)
    While @InetGetActive
      TrayTip("Downloading ACE2", "Bytes = " & @InetGetBytesRead, 10, 16)
      Sleep(250)
    Wend

    so nun ändert sich aber r20187 laufend - also was tun um das script nicht jeden tag neu anpassen zu müssen? :(

  • Bitteschööön


    p.s me spielt auch WoW xD

    [autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    ; Download newest ACE , by Huggy @ Gilneas PvE ;)

    [/autoit][autoit][/autoit][autoit]

    InetGet("http://wowace.com/files/Ace2/latest.txt", @ScriptDir & "\data.txt")

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    $version = FileRead(@ScriptDir & "\data.txt")

    [/autoit][autoit][/autoit][autoit]

    if $version <> FileREad(@ScriptDir & "\old.txt") Then


    InetGet("http://wowace.com/files/Ace2/Ace2-r" & $version & ".zip", @ScriptDir & "\ace2.zip", 1, 1)

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    While @InetGetActive
    TrayTip("Downloading ACE2", "Bytes = " & @InetGetBytesRead, 10, 16)
    Sleep(250)
    Wend

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    FileDelete(@ScriptDir & "\old.txt")
    sleep(100)
    FileWrite(@ScriptDir & "\old.txt", $version)

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    TrayTip("Fertig", "Downloaded from: " & "http://wowace.com/files/Ace2/Ace2-r" & $version & ".zip", 5)
    sleep(3000)

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    Else


    TrayTip("Nix neues!", "Du hast bereits die neuste Version!", 5)
    sleep(3000)

    [/autoit][autoit][/autoit][autoit]

    Endif

    [/autoit]


    Funtzt :D

    3 Mal editiert, zuletzt von huggy (12. Dezember 2006 um 16:44)