test si un fichier est déja ouvertRésolu

Question

Bonjour je fait une application en VB 2005 qui m'ouvre un fichier(exel entre autre) 
je voudrai aussi pouvoir teste si celui ci est déja ouvert 
comment faire ?
Merci

mortalino · Accepted Answer

salut,

en VB6, la fonction d'api _lopen permet de savoir si un fichier est déjà ouvert.
Donc en dotnet, utilise System.IO.File.Open, le paramètre de retour doit certainement te retourner cette valeur

@++ 

<hr width="100%" size="2" />(

JM247L · Answer

Bonjour,
A mon avis tu dois pouvoir tester le message qu'envoie Excel lorsque le fichier est déjà ouvert
Un truc du type ReadOnly ... En toiut cas VBA le permet

JML
 Partageons notre savoir et nos acquis

cs_Exploreur · Answer

Salut,

Il me semble qu'une question identique à déjà été posée dans le forum réçament, une petite recherche s'impose...

A+
Exploreur

 Linux a un noyau, Windows un pépin

payhens · Answer

j'ai chercher et meme en ce moment je continu de chercher mais je ne trouve toujours pas la réponse a ma question
pour plus de précision 
je lance mon programme qui ouvre une feuille pour écrire dedans si je relance mon programme il va m'ouvrir a nouveau la meme feuille mais en lecture seul oo je voudrai que dans ce cas il ecrive les données a la suite donc il faut que je test si cette feuille est ouverte
Merci a toutes les personnes qui prennent du temps pour répondre sur ce forum et permmettent a des débutants comme moi de s'en sortir

JM247L · Answer

C'est exactement ce que je te disais plus haut : Si tu ouvres une seconde fois, il le sera en lecture seule
La solution c'est : A l'ouverture du fichier tu testes le staus et si c'est lecture seule ...

JML
 Partageons notre savoir et nos acquis

cs_etniqs · Answer

je confirme : il existe du code sur ce site pour cela , et y'en a pas qu'un ....

coïto ergo sum

vbnino · Answer

Salut!

-Voici un code VB6:

  
   On Error GoTo Command1_Click_Error

Open "C:\xxxx.txt" For Input As #1

   On Error GoTo 0
   Exit Sub

Command1_Click_Error:

    MsgBox "Le fichier est déja ouvert"

payhens · Answer

merci bcp

payhens · Answer

pour etre plus precis .
Dans mon code je demande l'ouverture d'un fichier
ensuite je teste si il est en lecture seule
(ok ca marche)
ce que je voudrai faire maintenant c'est que s'il est en lecture seul celui ci ne s'ouvre pas mais que le programme utilise le fichier deja ouvert et ca je ne sais pas comment le faire
voici une partie de mon code



Try

mrxls = 

New
 Application
mrxls.Visible = 

True

mrbook = mrxls.Workbooks.Open(

"c:\essaimr"
)


If
 mrbook.ReadOnly = 

True



Then


MessageBox.Show(

"le fichier est déjà ouvert celui-ci sera ouvert en lecture seul ou veuillez fermer l'autre fichier"
)


End



If

vbnino · Answer

Salut!

-Dans mon exemple ça marche , sans réouvrir le fichier et sans perdre le fichier déja ouvert.

  -Faut pas ajouter ,Close ton fichier ,dans l'exemple sinon  ....

Test si un fichier est déja ouvert

10 réponses

Votre réponse

Discussions similaires