1. Accueil
  2. Tous les snippets
  3. Snippets Visual Basic / VB.NET
  4. Un fichier est-il ouvert ?

Un fichier est-il ouvert ?

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 148 fois - Téléchargée 44 fois

Commenter

Contenu du snippet

Une méthode comme une autre.
Peut être pas très nickel, mais cela fonctionne.
Vos commentaires sont les bienvenues. (Constructif, les autres s'abstenir)

Source / Exemple : 


Public Function FileInUse(NomdeFichier as String) As Boolean
    Dim FF As Integer
    On Error GoTo FileOKError
    FileInUse = False
    FF = FreeFile
        Open NomdeFichier For Input Lock Read Write As #FF
        Close #FF
    Exit Function
FileOKError:
  FileInUse = True
End Function

A voir également

Ajouter un commentaire Commentaires
JeffdeStSEb Messages postés 4 Date d'inscription lundi 16 septembre 2002 Statut Membre Dernière intervention 14 novembre 2002
21 oct. 2002 à 16:47
Grand merci pour cette fonction courte mais efficace !
Bricomix Messages postés 340 Date d'inscription vendredi 11 octobre 2002 Statut Membre Dernière intervention 14 février 2005
15 oct. 2002 à 17:34
Perso j'utilise la commande DIR$ (c'est plus simple, et ca marche).
Cyberdevil Messages postés 483 Date d'inscription mardi 10 juillet 2001 Statut Membre Dernière intervention 12 juillet 2006
15 oct. 2002 à 10:13
Alors la tu m'apprend qqu chose ! Je savais pas que l'on pouvait faire un lock sur un fichier en vb !
Merci bcp et bravo !
cyberdevil
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_Hobby)