SQL - Bloqueo

Buenas

tngo una aplicacion con Vb 6 y SQL y necesito q mientras un usuario esta actualizando la tabla este bloqueada y la libere cuando termina el update
me podrian ayudar con esto?
utilizo control adodb

SQL Server, BLOQUEA de forma automatica, las paginas donde se localiza el registros en cuestion, ahora, si lo que quieres es manejar transacciones, este store es un FOLIADOR, no entrega un folio igual, aun sin importar el numero de peticiones o ejecuciones del mismo

CREATE PROCEDURE sPS_ObtieneFolioHost
@iOrigen tinyint = 0,
@iFolioHost int = 0 OUTPUT
AS
BEGIN
SET NOCOUNT ON
BEGIN TRAN MyTran
UPDATE TablaFoliador WITH (ROWLOCK)
SET FOLIO = ISNULL(FOLIO, 0) + 1
SELECT @iFolioHost = FOLIO FROM FOLIADOR ROWLOCK
COMMIT TRAN MyTran
IF @iOrigen = 1
SELECT @iFolioHost
END