Make your own Custom Launcher in VB .net 2008

[razordemon]

As the title says, this is a follow up to my other guide which can be found
HERE
With that said lets begin.


Content
1 - Delete Cache
2 - Normal Realmlist or yours
3 - Get rid of the windows frame
4 - Extra


1 - Delete the Cache

1.Add an new button to your form and double click it so you get into the code window.

2.Enter this

Code:

Dim installpath As String = String.Empty
        installpath = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\blizzard entertainment\world of warcraft", "installpath", Nothing)
        If Directory.Exists(installpath & "/cache") Then
            Directory.Delete(installpath & "/cache", True)
            MsgBox("Cache deleted successfully")
        Else
            MsgBox("There is no cache")
        End If

2 - Normal Realmlist or yours

What i will explain to you now, is how to change so the launcher can switch peoples realmlist for them. Also, i will remove the code part that makes wow start with your realmlist when you click the button (In my previous guide i told you how to make it do so):
1. Go to "project" in the top bar.
2. Click "Add windows form".
3. Select "windows form".
4. Click "add"
5. You should now see a new form in the solution explorer the form will by default be named "form2.vb" By now, it should also display form2 in design mode.
6. Now make your form like you want it.
7. Add 3 buttons. 1 for engb, one for enus and one for your own server.
8. Double click the engb button.
9 Insert this code before anything els in the code window.

Code:

Imports System.IO

10. Insert code into the button click sub
Code:

        Dim installpath As String = String.Empty
        installpath = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\blizzard entertainment\world of warcraft", "installpath", Nothing)
        Dim fs As New FileStream(installpath & "realmlist.wtf", FileMode.Create, FileAccess.Write)
        Dim s As New StreamWriter(fs)
        s.WriteLine("set realmlist eu.logon.worldofwarcraft.com")
        s.WriteLine("set patchlist eu.version.worldofwarcraft.com")
        s.Close()

11. Lets do the same with the enus

Code:

        Dim installpath As String = String.Empty
        installpath = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\blizzard entertainment\world of warcraft", "installpath", Nothing)
        Dim fs As New FileStream(installpath & "realmlist.wtf", FileMode.Create, FileAccess.Write)
        Dim s As New StreamWriter(fs)
        s.WriteLine("set realmlist us.logon.worldofwarcraft.com")
        s.WriteLine("set patchlist us.version.worldofwarcraft.com")
        s.Close()

12. Now lets add some code to your own realmlist button.

Code:

  Dim installpath As String = String.Empty
        installpath = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\blizzard entertainment\world of warcraft", "installpath", Nothing)
        If File.Exists(installpath & "realmlist.wtf") Then
            File.Delete(installpath & "realmlist.wtf")
            Dim fs As New FileStream(installpath & "realmlist.wtf", FileMode.Create, FileAccess.Write)
            Dim s As New StreamWriter(fs)
            s.WriteLine("set realmlist your realmlist")
            s.Close()
        End If

13. Now go to form1
14. Double click the button you've used to start wow.
15. Delete

Code:

        Dim fs As New FileStream("realmlist.wtf", FileMode.Create, FileAccess.Write)
        Dim s As New StreamWriter(fs)
        s.WriteLine("set realmlist your realmlist")
        s.Close()

16. You'r done!

Pew pew, lets take a 2 min break shall we?
--------------
Break over! Back to work

3 - Remove the windows frame

Now i will show you how to remove that ugly blue/silver/what ever bar on top of your application.

1. Go to form1[design]
2. Make sure you got the whole window marked (so that you edit the form and not an button)
3. In the lower right corner you will find the properties window.
4. Now find Font -> FormBorderStyle.
5. Change it to None.
6. Now you may notice that the border above your application is gone (:O) Lets start making our own.
7. Depending on what you want your user to be able to do add:
-Only close the application: 1 button.
-Close and minimize the application: 2 buttons.
-All the things you normaly can (minimize, maximize, and close): 3 buttons.
8. Double click the button you've added to close the appication.
9. Add this code

Code:

Application.Exit()

10. If you have an button to minimize the application add this code

Code:

  Me.WindowState = FormWindowState.Minimized

11. If you have an button to maximize the application add this code

Code:

        If Me.WindowState = FormWindowState.Maximized Then
            Me.WindowState = FormWindowState.Normal
        Else
            Me.WindowState = FormWindowState.Maximized
        End If

If you do chose to do this, i would advise you to do the same with the realmlist form. (form2)

4 - Extra

This is just some things you might want.
1. - Reshack: A program that allows you to get .ico(icons) from exe files, like wow.exe

Filebeam - Free Fast File Hosting

2. - Icons well, just some icons i had on my computer, perhaps you can use them, wow icon also there + ts, msn, xfire etc etc etc

Filebeam - Free Fast File Hosting

That's it! you're done! I hope this was any help to you, as I've spend a lot of time on this guide.

Thank you for reading
Your sincerely
Razordemon

All Credits go to Kolklik on Ac-Web I just think that Mmowned should know about this.

[Appled]

OMG Very nice ;D +2rep

[Power of Illuminati]

Nice guide +Rep

[razordemon]

Thanks for +rep

[colincancer]

13. Now go to form1
14. Double click the button you've used to start wow.
15. Delete

Code:

        Dim fs As New FileStream("realmlist.wtf", FileMode.Create, FileAccess.Write)
        Dim s As New StreamWriter(fs)
        s.WriteLine("set realmlist your realmlist")
        s.Close()

16. You'r done!

that part i dont get...in the code tags is that what im deleting? and from where, the button ive used to start WoW? wtf does that even mean? please help.

[AzolexX]

+rep for you

[Neth'zul]

err didnt I see this in the programming area? lol