erreur d'execution 53 fichier introuvable

Question

Bonjour, 
mon problème, quand je lance un shell je veux copier ce kil affiche dans un fichier, jusqu'a la tout marche bien,mais quand j'ouvre le fichier il me marke kil exite pas.

Shell ("cmd /k net view >netview.txt"), vbHide
DoEvents
Open "netview.txt" For Input As #1
Do Until EOF(1)
Line Input #1, a$
text10 = text10 + a$ + vbCrLf
Loop
Close

je comprend pas pouquoi ça marche pas!
j'ai l'impression qu'i n"a pas le temps de copier!
Quel seré alors la commande?
Merci 

N-BISS

bubble44 · Answer

Si il le trouve pas, teste sa presence avant de l'ouvrir.
Et attends... ou faire un dir$ vb (je crois que c'est ca)...

Nbiss · Answer

Je te remercie bubble44 ça marche!!
mais j'utilise la commande dir tous simplement jusqu'a temps qu'il me trouve un fichier (en faisant un goto).
J4ai trouver aussi un autre myen c de faire un msgbox avant l'ouverture du fichier le temps kil le copie comme c tres court le temps de copie tt marche bien!
merci!!

N-BISS

crenaud76 · Answer

Ou alors va voir dans mees souurces, tu trouveras une version de Shell() qui attend que la commande lancée ne se termine avant de rendre la main au programme vB. Car ton pb viens de la. Ta cmd Shell lance l'execution du "net view", mais n'attend pas que celle-ci soit terminé, donc que le ficheir txt en soit créé pour repasser al main a la ligne de code suivant.
Et si tu veux "explorer" les ordinateur d'un réseau, cherche du cote des API réseau.
JE dois avoir un bout de code sur le sujet. Ca te dit ?

Christophe R.

Nbiss · Answer

Salut!

Je vais vé regarder tes sources je pense que ton idée est mieu que ma commande!
Au faite si ta un bout de code sur les API reseau je seré interéser! Si tu n'y vois pas d'inconvénien je veux bien que tu me l'envoie sur mon mail.

MERCI...

N-BISS

Erreur d'execution 53 fichier introuvable

4 réponses

Discussions similaires