You are viewing our Forum Archives. To view or take place in current topics click here.
Minecraft 1.8 Pre Release 2 Auto-Updater
Posted:

Minecraft 1.8 Pre Release 2 Auto-UpdaterPosted:

Counterfieter
  • Ladder Climber
Status: Offline
Joined: May 26, 201113Year Member
Posts: 300
Reputation Power: 29
Status: Offline
Joined: May 26, 201113Year Member
Posts: 300
Reputation Power: 29
Hey guys, I coded a minecraft 1.8 PR auto installer, it's 100% clean and contains the source for both programs, it can be found here - [ Register or Signin to view external links. ]

I also have a youtube video up explaining how to use it below




You can also find the source below!

Auto-Updater Source

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        My.Computer.FileSystem.RenameFile("C:\Users\" + TextBox1.Text + "\AppData\Roaming\.minecraft\bin\minecraft.jar", "minecraft(backup).jar")
        Threading.Thread.Sleep(2000)
        My.Computer.Network.DownloadFile("http://dl.dropbox.com/u/38960196/minecraft.jar", "C:\Users\" + TextBox1.Text + "\AppData\Roaming\.minecraft\bin\minecraft.jar")
        Threading.Thread.Sleep(2000)
        MessageBox.Show("Finished!")

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class

Reverter

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        My.Computer.FileSystem.RenameFile("C:\Users\" + TextBox1.Text + "\AppData\Roaming\.minecraft\bin\minecraft.jar", "minecraft(1.8).jar")
        Threading.Thread.Sleep(500)
        My.Computer.FileSystem.RenameFile("C:\Users\" + TextBox1.Text + "\AppData\Roaming\.minecraft\bin\minecraft(backup).jar", "minecraft.jar")
        MsgBox("Success!", "0", "Finished!")
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        My.Computer.FileSystem.RenameFile("C:\Users\" + TextBox1.Text + "\AppData\Roaming\.minecraft\bin\minecraft.jar", "minecraft(backup).jar")
        Threading.Thread.Sleep(500)
        My.Computer.FileSystem.RenameFile("C:\Users\" + TextBox1.Text + "\AppData\Roaming\.minecraft\bin\minecraft(1.8).jar", "minecraft.jar")
        MsgBox("Success!", "0", "Finished!")
    End Sub
End Class



You're welcome ladies and gents, if you need help reply to this thread.

The following 1 user thanked Counterfieter for this useful post:

Clean (09-15-2011)
Jump to:
You are viewing our Forum Archives. To view or take place in current topics click here.