fonction shell

Question

bonjour

je programme en VB6

voici mon code

Private Sub resultats_Click()
If str1 = "" Then
MsgBox "Veuillez s&#233;lectionner un fichier pour effectuer le calcul", vbInformation, "R&#233;sultats"
Else
mon str1 est la variable qui stocke le fichier que j'ai  recuperer grace a un common dialog
donc si je n'ai rien selectionn&#233; il me fait une msgbox ...bref 
'Ex&#233;cution de l'application
Dim myapp
    myapp = Shell(str1, 1)
End If
End
End Sub

et quand je lance mon application il me met "fichier introuvable" alors que je pense avoir bien definit ma variable?!
une  seconde chose est que quand l'application se fait il ne met renvoie pas la totalit&#233; des donn&#233;es dans mon fichier texte
manque t-il une instruction a faire apres le shell??? pour executer correctement

@+

NHenry · Answer

Bonjour


Tu peux regarder ta valeur de Str1 en ajoutant un espion.

Attention, Shell est asychrone, l'app continu alors que l'exe lanc&#233; n'est pas termin&#233;e.

Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
Une question se pose sur le forum, pas en priv&#233;
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

pentahertz · Answer

si il y a des espaces dans ta chaine il faut penser a mettre des ""

shell      "C:\Documents and Settings\admin\Menu D&#233;marrer	oto.exe"

Fonction shell

2 réponses

Discussions similaires