perchè probabilmente lo script è messo in cima alla pagina e i campi sono tutti false all'interno del recordset...

Metti solo questo code:

codice:
<%
Dim ConnDown
Set ConnDown=Server.CreateObject("ADODB.Connection")
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"N_CONF.mdb")
Dim SQLDown,RECDown
SQLDown="select * from n_conf order by REL_TEC_DEL asc"
Set RECDown=ConnDown.Execute(SQLDown)

Function ConvertiData(data)
    giorno = Mid(data, InStr(1, data, "/") + 1, InStrRev(data, "/") - InStr(1, data, "/") - 1)
    mese = Left(data, InStr(1, data, "/") - 1)
    anno = Right(data, Len(data) - InStrRev(data, "/"))
    ConvertiData = giorno & "/" & mese & "/" & anno
End Function

if RECDown.eof then
response.write "Record non trovato"
else
While Not RECDown.EOF
%>
poi qua in mezzo inserisci il code che crea la riga relativa al recordset che ti serve e al punto giusto metterai il code che ti ho postato prima...

al posto di response.write metterai una cosa del genere:

codice:
if CBool(RECDown("Bonificato")) = True then
  response.write("<input type="checkbox" name="checkbox" value="checkbox"> checked")
else
  response.write("<input type="checkbox" name="checkbox" value="checkbox">")
end if
mi sono spiegato? :quote: