Partager via


Lock, Unlock, fonctions

Mise à jour : novembre 2007

Contrôle l'accès par d'autres processus à tout ou partie d'un fichier ouvert à l'aide de la fonction Open.

La fonctionnalité My permet une meilleure productivité et de meilleures performances dans les opérations d'E/S sur fichier que Lock et Unlock. Pour plus d'informations, consultez My.Computer.FileSystem, objet.

Public Overloads Sub Lock(ByVal FileNumber As Integer)
' -or-
Public Overloads Sub Unlock(ByVal FileNumber As Integer)
' -or-
Public Overloads Sub Lock(_
   ByVal FileNumber As Integer, _ 
   ByVal Record As Long _
)
' -or-
Public Overloads Sub Unlock( _
   ByVal FileNumber As Integer, _ 
   ByVal Record As Long _
)
' -or-
Public Overloads Sub Lock( _
   ByVal FileNumber As Integer, _ 
   ByVal FromRecord As Long, _ 
   ByVal ToRecord As Long _
)
' -or-
Public Overloads Sub Unlock( _
   ByVal FileNumber As Integer, _
   ByVal FromRecord As Long, _
   ByVal ToRecord As Long _
)

Paramètres

  • FileNumber
    Requis. Tout numéro de fichier valide.

  • Record
    Facultatif. Numéro du seul enregistrement ou octet à verrouiller ou à déverrouiller

  • FromRecord
    Facultatif. Numéro du premier enregistrement ou octet à verrouiller ou à déverrouiller.

  • ToRecord
    Facultatif. Numéro du dernier enregistrement ou octet à verrouiller ou à déverrouiller.

Exceptions

Type d'exception

Numéro de l'erreur

Condition

IOException

52

FileNumber n'existe pas.

IOException

54

Le mode de fichier est non valide.

Consultez la colonne « Numéro d'erreur » si vous mettez à niveau des applications Visual Basic 6.0 qui utilisent la gestion des erreurs non structurée. (Vous pouvez comparer le numéro d'erreur par rapport à Number, propriété (objet Err).) Toutefois, lorsque cela est possible, vous devez envisager de remplacer un tel contrôle d'erreur par Vue d'ensemble de la gestion structurée des exceptions pour Visual Basic.

Notes

Les fonctions Lock et Unlock sont utilisées dans des environnements où plusieurs processus peuvent avoir besoin d'accéder au même fichier.

Les fonctions Lock et Unlock sont toujours utilisées par paires. Les arguments des fonctions Lock et Unlock doivent être totalement identiques.

Si Record, FromRecord ou ToRecord ne sont pas indiqués, le verrouillage portera sur la totalité du fichier. Si Record seul est spécifié, seul l'enregistrement sera verrouillé/déverrouillé.

Si le fichier a été ouvert en mode d'entrée ou de sortie séquentielle, Lock et Unlock s'appliquent à l'ensemble du fichier, quelle que soit la plage spécifiée par FromRecord et ToRecord.

Exemple

Cet exemple illustre l'utilisation des fonctions Lock et Unlock. Nous supposons que People.txt est un fichier contenant les enregistrements de la structure Person.

Structure Person
   Dim Name As String
   Dim ID As Integer
End Structure

Sub PutInLockedFile(ByVal index As Integer, ByVal onePerson As Person)
   Try
      FileOpen(1, "c:\people.txt", OpenMode.Binary)
      Lock(1)
      FilePut(index, onePerson)
      Unlock(1)
      FileClose(1)
   Catch
      ' Error recovery code here.
   End Try
End Sub

Notes du développeur sur Smart Device

Cette fonction n'est pas prise en charge.

Configuration requise

Espace de noms :Microsoft.VisualBasic

**Module :**FileSystem

**Assembly :**bibliothèque Visual Basic Runtime (dans Microsoft.VisualBasic.dll)

Voir aussi

Référence

FileOpen, fonction

IOException

Autres ressources

Accès au fichier avec Visual Basic