Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If My.Computer.FileSystem.FileExists(Application.StartupPath + "\sxs.dll") Then
System****.File.Delete(Application.StartupPath + "\sxs.dll")
End If
If My.Computer.FileSystem.FileExists(Application.StartupPath + "\HGWC.exe") And My.Computer.FileSystem.FileExists(Application.StartupPath + "\CrossFire.exe") And My.Computer.FileSystem.FileExists(Application.StartupPath + "\patcher_cf.exe") Then
If CheckBox1.CheckState = CheckState.Checked And CheckBox2.CheckState = CheckState.Unchecked And CheckBox3.CheckState = CheckState.Unchecked Then
Dim mydl1() As Byte = My.Resources.dl1
IO.File.WriteAllBytes(Application.StartupPath + "\sxs.dll", mydl1)
MsgBox("Ready to go!")
Process.Start(Application.StartupPath + "\patcher_cf.exe")
End If