Lock, Unlock, instructions

  • Article

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

Syntaxe

Lock [ # ] filenumber, [ recordrange ] . . . .Unlock [ # ] filenumber, [ recordrange ]

La syntaxe des instructions Lock et Unlock présente trois éléments :

Élément Description
filenumber Obligatoire. Tout numéro de fichier valide.
recordrange Facultatif. Plage d'enregistrements à verrouiller ou déverrouiller.

Paramètres

Les paramètres de l’argument recordrange sont les suivants :

recnumber | [ start ] Pourterminer

Paramètre Description
recnumber Numéro d'enregistrement (fichiers en mode aléatoire) ou numéro d'octet (fichiers en mode binaire) auquel le verrouillage ou le déverrouillage commence.
start Numéro du premier enregistrement ou octet à verrouiller ou déverrouiller.
end Numéro du dernier enregistrement ou octet à verrouiller ou déverrouiller.

Remarques

Les instructions Lock et Unlock sont utilisées dans des environnements dans lesquels plusieurs processus doivent pouvoir accéder au même fichier.

Les instructions Lock et Unlock sont toujours utilisées par paires. Les arguments des instructions Lock et Unlock doivent correspondre exactement.

Dans un fichier, le premier enregistrement ou octet se trouve à la position 1, le deuxième enregistrement ou octet se trouve à la position 2, etc. Si vous ne spécifiez qu'un enregistrement, seul ce dernier est verrouillé ou déverrouillé. Si vous spécifiez un seul enregistrement, seul cet enregistrement est verrouillé ou déverrouillé. Si vous utilisez l'instruction Lock sans recnumber, le fichier entier est verrouillé. L’utilisation de Lock sans recnumber verrouille l’intégralité du fichier ; L’utilisation de Unlock sans recnumber déverrouille l’intégralité du fichier.

Si le fichier a été ouvert pour une saisie ou sortie séquentielle, les instructions Lock et Unlock affectent le fichier entier, quelle que soit la plage spécifiée par start et end.

Importante

Veillez à supprimer tous les verrous avec une instruction Unlock avant de fermer un fichier ou de quitter votre programme. L’échec de la suppression des verrous produit des résultats imprévisibles.

Exemple

Cet exemple illustre l'utilisation des instructions Lock et Unlock. Pendant la modification d'un enregistrement, tout accès à ce dernier par d'autres processus est refusé. Cet exemple suppose que TESTFILE est un fichier contenant cinq enregistrements du type Recorddéfini par l’utilisateur.

Type Record    ' Define user-defined type. 
    ID As Integer 
    Name As String * 20 
End Type 
 
Dim MyRecord As Record, RecordNumber    ' Declare variables. 
' Open sample file for random access. 
Open "TESTFILE" For Random Shared As #1 Len = Len(MyRecord) 
RecordNumber = 4    ' Define record number. 
Lock #1, RecordNumber    ' Lock record. 
Get #1, RecordNumber, MyRecord    ' Read record. 
MyRecord.ID = 234    ' Modify record. 
MyRecord.Name = "John Smith" 
Put #1, RecordNumber, MyRecord    ' Write modified record. 
Unlock #1, RecordNumber    ' Unlock current record. 
Close #1    ' Close file.

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.