Anti Virus

Imports System.Security.Cryptography Imports System.Text Imports System.IO Public Class Form1 Dim file As String = "asdf" Dim newfile As String = "non" Dim filein As New FileStream(INfile.text, FileMode.Open, FileAccess.Read) Function getMd5Hash(ByVal input As String) As String ' Create a new instance of the MD5 object. Dim md5Hasher As MD5 = MD5.Create() ' Convert the input string to a byte array and compute the hash. Dim data As Byte() = md5Hasher.ComputeHash(Encoding.Default.GetBytes(input)) ' Create a new Stringbuilder to collect the bytes and create a string. Dim sBuilder As New StringBuilder() ' Loop through each byte of the hashed data and format each one as a hexadecimal string. Dim i As Integer For i = 0 To data.Length - 1 sBuilder.Append(data(i).ToString("x2")) Next i ' Return the hexadecimal string. Return sBuilder.ToString() End Function 'Get the SHA1 Hash of a String ''' <param name="strToHash">The String to Hash</param> Function getSHA1Hash(ByVal strToHash As String) As String Dim sha1Obj As New Security.Cryptography.SHA1CryptoServiceProvider Dim bytesToHash() As Byte = System.Text.Encoding.ASCII.GetBytes(strToHash) bytesToHash = sha1Obj.ComputeHash(bytesToHash) Dim strResult As String = "" For Each b As Byte In bytesToHash strResult += b.ToString("x2") Next Return strResult End Function Private Sub Bencrypt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bencrypt.Click file = filein.ToString() If RBmd5.Checked = True Then newfile = getMd5Hash(file) ElseIf RBsha1.Checked = True Then newfile = getSHA1Hash(file) End If newfile = getMd5Hash(file) Dim this As System.IO.StreamWriter this = My.Computer.FileSystem.OpenTextFileWriter("C:\Users\Sprinkles\Desktop\new.txt", True) this.WriteLine(newfile) this.Close() End Sub End Class

8f588de478ee81a213fe9e1be0a78131

浜ᙴ榈屠훗췜댳ꁵ퇳

private void Bscan_Click(object sender, EventArgs e) { scanForm Form = new scanForm(); Form.Show(); this.Dispose(); } private void Bconfig_Click(object sender, EventArgs e) { configForm Form = new configForm(); Form.Show(); this.Dispose(); }

this.Dispose();

this.Hide

private void Bfullscan_Click(object sender, EventArgs e) { //string avscandir = Directory.GetCurrentDirectory() + "\avscan.exe"; //MessageBox.Show(avscandir, "this.Show"); try { System.Diagnostics.Process.Start(Directory.GetCurrentDirectory() + "\avscan.exe","full"); } catch (Exception exeption) { MessageBox.Show("There was a problem starting the scan." + exeption.ToString(), "Error"); } } private void Bfastscan_Click(object sender, EventArgs e) { try { System.Diagnostics.Process.Start(Directory.GetCurrentDirectory() + "\avscan.exe", "fast"); } catch (Exception exeption) { MessageBox.Show("There was a problem starting the scan." + exeption.ToString(), "Error"); } }