La Web del Programador: Comunidad de Programadores
 
    Pregunta:  21601 - AYUDA SOBRE BLOQUEOS DE REGISTROS
Autor:  Khani Tomàs
Hola queridos Compañeros!!

Còmo están??

Necesito una ayudita de algun master!!!

Tengo que hacer una entrega con Visual Basic.
El prog. utiliza: ADO, ODBC, SQL y una base de datos ACCESS.
Tiene que correr en un entorno multiusuario y aqui me surgen los problemas ya que no se como se hacen los bloqueos!!!

Por lo que he podido leer me serviria un bloqueo optimista..

A quien pueda ayudarme le solicto ayuda!!!

Si pueden pasarme algun codigo de ej., alguna rutina, link, algo!!!

Y la otra preguntita es como se hace para saber el nombre de la maquina que se està conectando a la base de datos.

muchas gracias.

  Respuesta:  ignacio lorente Pérez
respecto a los bloqueos, mírate la ayuda de los recordset, ten en cuenta que si es multiusuario puede que necesites bloqueos optimistas para q varios puedan acceder a la vez a la misma tabla. Si lo q te preocupa es la seguridad genera los archivos propios de access.

'nombre del pc
'en el formulario
Option Explicit
Public Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
'la funcion
Private Function ComputerName() As String
Dim sBuffer As String
Dim lSize As Long
sBuffer = Space$(255)
lSize = Len(sBuffer)
Call GetComputerName(sBuffer, lSize)
If lSize > 0 Then
ComputerName = Left$(sBuffer, lSize)
Else
ComputerName = vbNullString
End If
End Function