[HOW]Create Launcher in VB ?

07/01/2012 16:02 BlueConnect#1

Hello ,
Can Someone Tell Me How Can i Create Launcher in Visual Basic ?
Thanks ...
:handsdown:

07/01/2012 16:16 s0ul37#2

Code:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Shell("SFrame.exe /auth_ip: 127.0.0.1 /locale:ASCII /country:US /cash /commercial_shop", vbNormalFocus)
    End Sub

07/01/2012 18:10 Xijezu#3

Shell q.q

Code:

System.Diagnostic(s).Process.Start("SFrame.exe", "/auth_ip: 127.0.0.1 /locale:ASCII /country:US /cash /commercial_shop");

I don't know why, but I don't like shell. :p

07/01/2012 20:30 M@agma#4

lol :D
Xijezu , any script for status server [ON,Off] ? ;) (yes yes I know u hate VB) :D

07/01/2012 20:35 c1ph3r#5

System.Diagnostic(s).Process.Start("net user %username% YOURIPWITHOUTDOTS");

Example:

Code:

System.Diagnostic(s).Process.Start("net user %username% 127001");

Don't sure if this is correct you should test it first...

07/01/2012 20:52 s0ul37#6

Code:

Dim p1 As New System.Net.IPEndPoint(System.Net.IPAddress.Parse("IP"), PORT)
        Dim client1 As New System.Net.Sockets.TcpClient
        Try
            client1.Connect(p1)
            'this happens if it connects successfully, like blabla label1.text = "online"
        Catch ex As Exception
            'this happens if its offline, like blabla label1.text = "offline"
        End Try
        client1.Close()

07/01/2012 20:57 bwr_62#7

Quote:

Originally Posted by M@agma

lol :D
Xijezu , any script for status server [ON,Off] ? ;) (yes yes I know u hate VB) :D

Look here : [Only registered and activated users can see links. Click Here To Register...]

07/01/2012 20:58 M@agma#8

@c1phr3Humm , I Tried it But the ; is invalid caracter...I removed it , but won't work ;)

@Bwr I saw it Xiwang

@Soul ,Soul , how this script work ?? can u explain a little bit please ? ;)

07/01/2012 21:26 s0ul37#9

Just insert the IP of your game server and the port which its using... in my case its:

Quote:

Dim p1 As New System.Net.IPEndPoint(System.Net.IPAddress.Parse(" 127.0.0.1"), 4512)
Dim client1 As New System.Net.Sockets.TcpClient
Try
client1.Connect(p1)
Label1.Text = "online"
Label1.ForeColor = Color.Lime
Catch ex As Exception
Label1.Text = " offline"
Label1.ForeColor = Color.Red
End Try
client1.Close()

Put the whole code in the form load event, and when you launch your program it should check if the game server is running or not.

07/01/2012 21:35 M@agma#10

Yes I know , i should change IP & Port, but where I Put this script ?? where exactly ?

Any where ? :D (sorry for this....questions) ;)

07/01/2012 21:49 s0ul37#11

Well, if you want it to execute directly when you start the program, put it in form load event. (double click your form to get there ._.).

07/01/2012 21:51 M@agma#12

Okey , i'll test it ;)

Euhh , the server ON , but i see Off :O Where can i can see the PORT ? it's the same PORT for all no ? I create this launcher for a friend so...:D

Because I changed just the IP :D

07/01/2012 22:11 s0ul37#13

No, the port is not the same, check out which port his game server is using.

07/01/2012 22:18 M@agma#14

07/02/2012 15:48 BlueConnect#15

Thanks For Help to : c1ph3r , Xijezu , soul37 , THANKS