Vale pues me ejecuta la sentencia, en cuanto a que responde correcto, pero en realidad no ha cambiado las opciones a true.
Te paso los códigos que creé.
ACTIVAR.ASP
Código:
<HTML>
<HEAD>
<TITLE>Activar un usuario</TITLE>
</HEAD>
<BODY>
<div align="center">
<h1>Activar un usuario</h1>
<br>
<%
'Instanciamos y abrimos nuestro objeto conexion
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/mdb-base/registrosin.mdb")
%>
<FORM METHOD="POST" ACTION="Activado.asp">
Número de la base<br>
<%
'Creamos la sentencia SQL y la ejecutamos
sSQL="Select autonumerico From registro Order By autonumerico DESC"
set RS = conn.execute(sSQL)
%>
<select name="autonumerico">
<%
'Generamos el menu desplegable
do while not RS.eof%>
<option><%=RS("autonumerico")%>
<%RS.movenext
loop
%>
</select>
<%
'Creamos la sentencia SQL y la ejecutamos
sSQL="Select autonumerico From registro Order By autonumerico DESC"
set RS = conn.execute(sSQL)
%>
<select name="autonumericogrande">
<%
'Generamos el menu desplegable
do while not RS.eof%>
<option><%=RS("autonumerico")%>
<%RS.movenext
loop
%>
</select>
<br>
<INPUT TYPE="SUBMIT" value="Activar">
</FORM>
</div>
<div align="center"><a href="Ver.asp" target="_blank">Visualizar el contenido de la base</a></div>
<br>
<div align="center"><a href="Activar.asp">Volver a activar usuario</a></div>
</BODY>
</HTML>
ACTIVADO.ASP
Código:
<HTML>
<HEAD>
<TITLE>Activar un usuario</TITLE>
</HEAD>
<BODY>
<%
'Recogemos los valores del formulario
autonumerico=Request.Form("autonumerico")
autonumericogrande=Request.Form("autonumerico")
'Instanciamos y abrimos nuestro objeto conexion
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/mdb-database/registrosin.mdb")
'Ahora creamos la sentencia SQL
sSQL="Update registro Set activado = true Where autonumerico between (" & autonumerico & "," & autonumericogrande &")"
'Ejecutamos la orden
set RS = Conn.Execute(sSQL)
%>
<h1></h1>
<div align="center"><font color="#FFFFFF" size="5">
<span style="background-color: #008080">Usuario activado</span></font></div>
<div align="center"> </div>
<div align="center"> </div>
<div align="center"><a href="Ver333333.asp">Visualizar el contenido de la base</a></div>
<br>
<div align="center"><a href="Activar333333.asp">Volver a activar un usuario</a></div>
<%
'Cerramos el sistema de conexion
Conn.Close
%>
</BODY>
</HTML>
Creo que ya estoy, cerca, anda y dame un empujón.