Zmiana fukncji

[NibyCheater]

Witam, mam pewien problem. Chodzi o autopatchera do metina.

Chciałbym Was spytać jak można tą funkcje zastąpić taką, która zamiast usuwać plik i go pobierać, będzie sprawdzać czy on istnieje i sprawdzi jego wage(niekoniecznie juz).

If My.Computer.FileSystem.FileExists("pack/drzewa.exs") Then
	    My.Computer.FileSystem.DeleteFile("pack/drzewa.exs")
	    TextBox1.Text = "Locale_PL zostało usunięte..."

[Bennq123]

Imports System.Net

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
	'plik
	TextBox1.Text = "Sprawdzanie plik ..."
	Dim info As IO.FileInfo = New IO.FileInfo("plik.exe") ' tu pobiera wage pliku, ktora przechowuje w zmiennej plik1, pozniej mozesz to zmienic
	Dim plik1 As Integer = info.Length
	Dim ftpplik1 As New WebClient
	Dim wagaftpplik1 As String = ftpplik1.DownloadString("adres") ' tu podstawiasz swoj adres do pliku na dedyku
	If plik1 = wagaftpplik1 Then
		TextBox1.Text = "Plik "plik.exe" jest ok" ' jesli waga pliku ze zmiennej plik1 zgadza sie z waga w zmiennej wagaftpplik1 wyswietla info i idzie dalej
	Else
		My.Computer.FileSystem.DeleteFile("plik.exe") ' usuwa plik.exe jeśli waga się nie zgadza
		My.Computer.Network.DownloadFile("adres", "gdzie ma pobrac") 'pliku zostaje pobrany z serwera
	End If
End Sub
End Class