<% DIM objRS DIM strSQL DIM nuid nuid= Request.QueryString("nuid") Set objRS = Server.CreateObject("ADODB.RecordSet") strSQL = "SELECT tblTest.id_test,tblTest.testActive FROM tblTest WHERE tblTest.id_test = " & nuid & ";" objRS.CursorType = 2 objRS.LockType = 3 objRS.Open strSQL, objConn objRS.Fields("testActive") = ("active") objRS.Update objRS.Close Set objRS = Nothing Set objConn = Nothing Response.Redirect "testView.asp" %>