Lock, Unlock (Funciones)

Actualización: noviembre 2007

Controla el acceso de otros procesos a la totalidad o una parte de un archivo abierto utilizando la función Open.

La característica My proporciona mayor productividad y rendimiento en las operaciones de E/S del archivo que si se utiliza Lock y Unlock. Para obtener más información, vea My.Computer.FileSystem (Objeto).

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 _
)

Parámetros

• FileNumber
  Requerido. Cualquier número de archivo válido.

• Record
  Opcional. Número del único registro o byte que se deba bloquear o desbloquear.

• FromRecord
  Opcional. Número del primer registro o byte que se deba bloquear o desbloquear.

• ToRecord
  Opcional. Número del último registro o byte que se deba bloquear o desbloquear.

Excepciones

Consulte la columna "Número de error" si está actualizando aplicaciones de Visual Basic 6.0 que utilizan el control de errores no estructurado. (Se puede comparar el número de error con respecto a Number (Propiedad, objeto Err)). Sin embargo, siempre que sea posible, se debe considerar la sustitución de dicho control de errores por Información general sobre el control estructurado de excepciones de Visual Basic.

Comentarios

Las funciones Lock y Unlock se utilizan en entornos donde pueda ser necesario que varios procesos tengan acceso a un mismo archivo.

Las funciones Lock y Unlock se utilizan siempre por parejas. Los argumentos de Lock y Unlock deben coincidir exactamente.

Si no se proporcionan Record, o FromRecord y ToRecord, el bloqueo afectará al archivo completo. Si se especifica un solo Record, el registro único se bloqueará/desbloqueará.

Si el archivo se ha abierto para entradas o salidas secuenciales, Lock y Unlock afectan al archivo completo, independientemente del intervalo especificado por FromRecord y ToRecord.

Ejemplo

En este ejemplo se muestra el uso de las funciones Lock y Unlock. Se supone que People.txt es un archivo que contiene registros de la estructura 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

Notas para desarrolladores de dispositivos inteligentes

Esta función no es compatible.

Requisitos

Espacio de nombres:Microsoft.VisualBasic

**Módulo:**FileSystem

**Ensamblado:**Visual Basic Runtime Library (en Microsoft.VisualBasic.dll)

Vea también

Referencia

FileOpen (Función)

IOException

Otros recursos

Acceso a archivos con Visual Basic