Launcher.

[Matzar]

Siemaneczko,

 

Potrzebuje jakiegoś launchera, który będzie miał za zadanie ściągać pliki z danego serwera w sieci do danego folderu na komputerze. Ktoś mi pomoże?

[Phoenix_PL]

ano mam takie coś.

Tylko jak chcesz to sobie troszkę zmodyfikuj:

 

#include <GuiConstantsEx.au3>

;GUI
$FORM_update = GUICreate("Update", 228, 60, -1, -1, 0x00C00000)
$PRG_postep = GUICtrlCreateProgress(8, 32, 206, 17)
$LABEL_pobieranie = GUICtrlCreateLabel("", 8, 8, 212, 17)
GUISetState(@SW_SHOW)

;rozpoczynanie pobierania

;zmienna z linkiem do pliku i miejscem zapisu pliku
Global Const $DownloadURL = "" ;link do pliku
Global Const $SavePath = "" ;miejsce zapisu pliku

GUICtrlSetData($LABEL_pobieranie, "Sprawdzam aktualnosć pliku...")

;pobierz informacje o pliku
$FileSize = InetGetSize($DownloadURL)

;sprawdź czy plik juz jest sciągnięty
If FileExists($SavePath) Then
;jesli plik istnieje to sprawdź jego wielkosć i porównaj z wielkoscią z serwera
$DwnFileSize = FileGetSize($SavePath)
If $DwnFileSize = $FileSize Then
;jesli wielkosć jest taka sama (więc pliki są identyczne)
MsgBox(64, "Informacja", "Masz aktualną wersję pliku!")
zakoncz()
EndIf
EndIf

;rozpocznij pobieranie
$Inet = InetGet($DownloadURL, $SavePath, 1, 1)
Local $Pos

;pętla do obsługi progressbara
While InetGetInfo($Inet, 2) = False
$Pos = Ceiling((InetGetInfo($Inet, 0)/$FileSize)*100)
GUICtrlSetData($PRG_postep, $Pos)
GUICtrlSetData($LABEL_pobieranie, "Pobieranie: "&$Pos&"%")
Sleep (250)
WEnd
GUICtrlSetData($PRG_postep, 100)

zakoncz()

;funkcje
Func zakoncz()
Run($SavePath)
Exit
EndFunc

;pętla programu
While 1
Sleep (100)
WEnd

 

[Gość]

• Połączenie INet/TCP/FTP z serwerem
  
• Sprawdzenie dostępności i wersji na serwie
  
• Sprawdzenie dostępności i wersji w folderze
  
• Jeśli wersja_server > wersja_folder to
  
• Pobierz plik(i)
  
• Zapisz
  

[Matzar]

Dzięki za pomoc. Przyda mi się to co mi Phoenix podrzucił.