AIDE EXECUTION D'1 PROGRAMME EXTERNE

J'ai cree 1 programme en vb5 un bouton de commande avec le code
ci-dessous permet de lancer un application: le code est ds 1 module
ds le bouton de commande je fais appel à la procédure par call Tennis

Public Sub cheTennis()
qnr = FreeFile
Open Verif((App.Path) & "\sys") & "cheTennis.dat" For Input As #qnr
Line Input #qnr, FIF
Close #qnr
End Sub


Public Sub Tennis()
Call cheTennis
Shell FIF & "tennis.exe", 1
End Sub

Private Sub Command2_Click()
Call Tennis
End Sub

"programme mal installé.Veuillez renouveler l'operation"
or ce meme code fonctionnait auparavant??
J'ai rinstallé l'application ainsi que vb or rien n'y fait
Merci de l'aide

Salut
Il ne manque pas un antislash (\) dans ta ligne :
Open Verif((App.Path) & "\sys") & "cheTennis.dat" For Input As #qnr
Après le sys, moi j'essayerais.
Ph_D



-------------------------------
Réponse au message :
-------------------------------

J'ai cree 1 programme en vb5 un bouton de commande avec le code
ci-dessous permet de lancer un application: le code est ds 1 module
ds le bouton de commande je fais appel à la procédure par call Tennis

Public Sub cheTennis()
qnr = FreeFile
Open Verif((App.Path) & "\sys") & "cheTennis.dat" For Input As #qnr
Line Input #qnr, FIF
Close #qnr
End Sub


Public Sub Tennis()
Call cheTennis
Shell FIF & "tennis.exe", 1
End Sub

Private Sub Command2_Click()
Call Tennis
End Sub

"programme mal installé.Veuillez renouveler l'operation"
or ce meme code fonctionnait auparavant??
J'ai rinstallé l'application ainsi que vb or rien n'y fait
Merci de l'aide