Dataset

[GaRcY]

Gracias, me habéis servido de gran ayuda. Por si le sirve a alguien pongo el código que realice.

<script language="vb" runat="server">
Sub page_load()
call conexion()
dim con as new OdbcConnection(Ccon)
dim da as OdbcDataAdapter
dim cmd as OdbcCommand
dim ds as new Dataset
Dim drc as OdbcCommandBuilder 'Lo necesitas para hacer el update ya que ejecuta automáticamente las sentencias insert,update o delete segun los cambios hechos en tu dataset
dim login,nusuario,sql as string
login=request.QueryString("l")
nusuario=request.QueryString("n")
if login="" or nusuario="" then
response.redirect("info.aspx?i=3")
end if
sql=misentenciasql
da=new OdbcDataAdapter(sql,con)
da.fill(ds,"Usuarios")
if ds.tables("Usuarios").rows.count<>0 then
if ds.tables("Usuarios").rows(0)("Numero_usuario")=nu suario then
ds.tables("usuarios").rows(0)("activo")="s"
dcr= new OdbcCommandBuilder(da)
da.Update(ds,"usuarios")
session("navegar")="login.aspx"
Response.Redirect("info.aspx?i=4")
else
session("navegar")="index.aspx"
Response.Redirect("info.aspx?i=3")
end if
end if
end sub
</script>