begin process at 2012 02 11 07:40:54
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Fichier / Disque

 > UN FICHIER EST-IL OUVERT ?

UN FICHIER EST-IL OUVERT ?


 Information sur la source

Note :
10 / 10 - par 3 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Fichier / Disque Niveau :Débutant Date de création :15/10/2002 Date de mise à jour :15/10/2002 06:12:20 Vu :2 897

Auteur : Hobby

Ecrire un message privé
Site perso
Commentaire sur cette source (3)
Ajouter un commentaire et/ou une note

 Description

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

  • 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
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



 Sources du même auteur

Source avec Zip Source avec une capture MODIFIEZ LES PLACES BAR DE OFFICE 2000 ET XP
Source avec Zip FICHIER ASCII MAC VERS ASCII WINDOWS
Source avec Zip BROWSE FOR FOLDER

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) MODIFIER LES EXTENSION DES FICHIERS par okosa
ROUTINE DIR RÉCURSIVE POUR OBTENIR LA LISTE DE TOUS LES FICH... par kerisolde
Source avec Zip Source avec une capture FILE,SECURITY,FICHIER par okosa
Source avec Zip Source avec une capture Source .NET (Dotnet) PATCHEUR DE FICHIER par tototh
Source avec Zip Source avec une capture LECTURE DES INFORMATIONS DES DISQUES COMPOSANT UN ENSEMBLE R... par jack

Commentaires et avis

Commentaire de Cyberdevil le 15/10/2002 10:13:07

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

Commentaire de Bricomix le 15/10/2002 17:34:51

Perso j'utilise la commande DIR$ (c'est plus simple, et ca marche).

Commentaire de JeffdeStSEb le 21/10/2002 16:47:19

Grand merci pour cette fonction courte mais efficace !

 Ajouter un commentaire




Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,744 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales