Gambas France BETA


Pas de compte ? Incription

Demande d'avis

1
AuteurMessages
Neiglen#1 Posté le 27/8/2010 à 20:34:00
Dim dPath As String ' Déclaration de la variable
dPath = "~/ankama/Dofus/bin/Dofus" ' Déclaration des données de la variable
Access(dPath, gb.Exec) ' Vérification des permissions du jeu
If Not Error
Print "Lancement du jeu..."
Shell (dPath) ' Lancement du jeu si il n'y a pas d'erreur
Else
Print "Impossible d'ouvrir le jeu..."
Endif


J'ai fais un code comme exemple d'un tutoriel que je fais pour un amis, pourriez vous me dire ce que vous en pensez ? (J'ai pris le jeu Dofus comme exemple)
GarulfoUnix#2 Posté le 28/8/2010 à 09:03:00
By the way
Dim dPath As String ' Déclaration de la variable
dPath = "~/ankama/Dofus/bin/Dofus" ' Déclaration des données de la variable
Access(dPath, gb.Exec) ' Vérification des permissions du jeu
If Not Error
Print "Lancement du jeu..."
Shell (dPath) ' Lancement du jeu si il n'y a pas d'erreur
Else
Print "Impossible d'ouvrir le jeu..."
Endif
fais un code comme exemple d'un tutoriel que je fais pour un amis, pourriez vous me dire ce que vous en pensez ? (J'ai pris le jeu Dofus comme exemple)[/Quote]

Je te recommanderai plutôt d'utiliser EXEC en lieu et place de Shell.
Neiglen#3 Posté le 28/8/2010 à 13:26:00
Je n'ai qu'à placer Exec [dPath] donc ?
Je viens d'essayer et il ne s'ouvre même plus...
Prokopy#4 Posté le 28/8/2010 à 13:50:00
Kinder PinguiJe crois qu'Exec n'interprète pas le ~, essaie plutôt à la place :

1
dPath = User.Home &/ "ankama/Dofus/bin/Dofus"
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
GarulfoUnix#5 Posté le 28/8/2010 à 14:30:00
By the wayOui il faut indiquer le chemin absolue tel indiqué par Prokopy.
Neiglen#6 Posté le 28/8/2010 à 17:38:00
Ça ne fonctionne toujours pas...
GarulfoUnix#7 Posté le 29/8/2010 à 19:32:00
By the way
Ça ne fonctionne toujours pas...

Comment ça ?
Si ton fichier est executable il doit marcher.
Que retourne la sortie ?
Neiglen#8 Posté le 29/8/2010 à 20:44:00
Enfaite j'avais écris ça...
1
dPath = User.Home &/ "/ankama/Dofus/bin/Dofus"
Prokopy#9 Posté le 29/8/2010 à 22:16:00
Kinder PinguiNon en principe ça ne doit rien changer… vérifie que l'exécutable est bien là où il faut.

Sinon, une autre petite proposition d'amélioration : essaie de remplacer

1
Access(dPath, gb.Exec) ' Vérification des permissions du jeuIf Not Error


… par :

1
IF Access(dPath, gb.Exec) ' Vérification des permissions du jeu


C'est plus simple et plus clair. :)
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
GarulfoUnix#10 Posté le 30/8/2010 à 08:30:00
By the wayNeiglen, c'est une mauvaise manipulation de ta part.
Pour moi ça fonctionne très bien et la syntaxe de ton code est bonne également.

Vérifie la casse de ton path. Ca peut-être une erreur bête.
Neiglen#11 Posté le 30/8/2010 à 10:56:00
Il ne bug plus...
Merci Prokopy je vais regarder :P
GarulfoUnix#12 Posté le 30/8/2010 à 13:26:00
By the wayEt bien voilà ;)
1