%@ Language=VBScript %> <% Option Explicit dim conexion, registros, sql, id_var set conexion = Server.CreateObject ("ADODB.connection") %><% conexion.CursorLocation = 3 conexion.open set registros = Server.CreateObject ("ADODB.RECORDSET") registros.CursorLocation = 2 registros.CursorType = 2 registros.LockType = 3 %>