Launcher pour jeu

Version imprimable

13/11/2014, 02h16
mixmasterfrance

Launcher pour jeu

Bonjour, j'aimerais créer un launcher pour mon MMORPG, mais je n'arrive pas vraiment à le coder...

Voila ce que j'aimerais que le programme lance:

MixMaster.exe 3.855000 188.165.221.142 22005 0 "NOMDECOMPTE" "MOTDEPASSE" 0 AURORA_BRA

J'ai déjà essayer:

Shell("C:\Users\Julien\Desktop\MixMasterFrance\MixMaster.exe", 3.855000 188.165.221.142 2200, 1 TextBox1.Text TextBox2.Text 0 AURORA_BRA)

Mais ça ne fonctionne pas. Pouvez-vous me parvenir en aide?

Merci d'avance.

Bonjour
Avec la classe Process on peut spécifier les arguments de cette façon.

Code:

1
2
3
4
5
6
7
            Dim psi As System.Diagnostics.ProcessStartInfo = New System.Diagnostics.ProcessStartInfo()
            psi.FileName = "C:\Users\Julien\Desktop\MixMasterFrance\MixMaster.exe" ' nom de fichier indispensable
            psi.Arguments = String.Format("3.855000 188.165.221.142 2200, 1 {0} {1} 0 AURORA_BRA", TextBox1.Text, TextBox2.Text)
            'psi.Verb = "runas"                                      ' admin
            Dim p As System.Diagnostics.Process = New System.Diagnostics.Process
            p.StartInfo = psi
            p.Start()

sinon pour shell il suffit mettre les arguments dans les guillements avec le nom du programme (séparé par un espace)

13/11/2014, 17h21
mixmasterfrance

Merci pour votre réponse , mais ça ne fonctionne pas que Textbox1.Text et Textbox2.Text doivent être placé entre "1" et "0".

Et j'ai essayer de les replacer mais ça ne fonctionnent toujours pas.

Citation:

Envoyé par mixmasterfrance

Merci pour votre réponse , mais ça ne fonctionne pas que Textbox1.Text et Textbox2.Text doivent être placé entre "1" et "0".

Code:

psi.Arguments = String.Format("3.855000 188.165.221.142 2200, 1 {0} {1} 0 AURORA_BRA", TextBox1.Text, TextBox2.Text)

Dans cette ligne le contenu de TextBox1.Text sera placé à l'emplacement de {0} et le contenu de TextBox2.Text sera placé à l'emplacement de {1} (en remplacant {0} et {1})
C'est ce que vous voulez.

Citation:

Envoyé par mixmasterfrance

Et j'ai essayer de les replacer mais ça ne fonctionnent toujours pas.

Et qu'est ce qui ne fonctionne pas ?
Un message d'erreur ?
...
En plus sans voir le code de ce que vous avez fait, impossible de deviner ce qui ne va pas et de vous guider.

sinon il faut faire une concaténation de chaîne.
Un peu de lecture, le Cours VB.NET de Philippe Lasserre est une mine d'information, très bien pour apprendre.

Exemple avec notepad
Un bouton nommé : btnLanceNotepad
Un textbox nommé : txtFichier
Code:

1 2 3 4 5 6 7 8 9 Private Sub btnLanceNotepad_Click(sender As System.Object, e As System.EventArgs) Handles btnLanceNotepad.Click Dim psi As System.Diagnostics.ProcessStartInfo = New System.Diagnostics.ProcessStartInfo() psi.FileName = "notepad" ' nom de fichier indispensable psi.Arguments = String.Format(txtFichier.Text) 'psi.Verb = "runas" ' admin Dim p As System.Diagnostics.Process = New System.Diagnostics.Process p.StartInfo = psi p.Start() End Sub
Il faut bien sur saisir le chemin et un nom de fichier correct en .txt.

13/11/2014, 18h12
mixmasterfrance

1 pièce(s) jointe(s)

Voilà mon codage:

Pièce jointe 161386

ça ne fonctionne pas, rien ne se lance et aucune erreur.
13/11/2014, 18h40
rv26t

Place un point d'arrêt sur

Code:

p.Start()

Regarde avec le curseur souris le contenu de psi.FileName et psi.Arguments.

Fait un test avec notepad.
Ton jeu n'a pas besoin d'être lancé en administrateur ?
13/11/2014, 18h50
mixmasterfrance

1 pièce(s) jointe(s)

Jai mis un point d'arret sur p.start() ça ne fonctionne toujours pas.
Non le jeu n'a pas besoin d’être exécuter en administrateur.

Pièce jointe 161394
13/11/2014, 19h55
rv26t

1)

Citation:

Envoyé par mixmasterfrance

Jai mis un point d'arret sur p.start() ça ne fonctionne toujours pas.

On place un point d'arrêt pour suivre se qui ce passe.

Citation:

Envoyé par rv26t

Regarde avec le curseur souris le contenu de psi.FileName et psi.Arguments.

Et ... ? (ils ont les valeurs correctes ?)

2)

Citation:

Envoyé par rv26t

Fait un test avec notepad.

en utilisant l'exemple avec notepad 2 posts avant.

J'ai trouver le problème, mon programme s'execute enfaite avec CMD.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        Dim p As New Process

        p.StartInfo.FileName = "cmd.exe"
        p.StartInfo.Arguments = "/c MixMaster.exe 3.855000 188.165.221.142 22005 0 {0} {1} 1 AURORA_BRA", TextBox1.Text, TextBox2.Text
        p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden

        p.Start()

    End Sub

Maintenant j'ai un probleme avec la partie variable de textbox1 et textbox2(en rouge).

14/11/2014, 08h23
rv26t

Explication de la méthode string.format post4
14/11/2014, 16h26
mixmasterfrance

Bonjour,

j'ai résolu presque tous mes problème, sauf celui la:

Je voudrais faire 2 radioboutton, un pour mettre le jeu en petit ecran, l'autre pour le mettre en plein écran.
Je voudrais que: si radioboutton1 est coché = 1 / radioboutton2 est coché= 0

p.StartInfo.Arguments = String.Format("/c MixMaster.exe 3.855000 188.165.221.142 22005 0 {0} {1} 1 AURORA_BR", TextBox1.Text, TextBox2.Text)

Pouvez-vous m'aider ? merci d'avance.

Vu qu'il n'y a que 2 'RadioButton'.
Code:

1 2 3 Dim Arg3 As Integer = 0 If RadioButton1.Checked Then Arg3 = 1 p.StartInfo.Arguments = String.Format("/c MixMaster.exe 3.855000 188.165.221.142 22005 {0} {1} {2} 1 AURORA_BR", Arg3.ToString, TextBox1.Text, TextBox2.Text)
Si après cette dernière correction, tout est fonctionnel, pense à marquer la discussion en résolue.;)