Scusa Optime il ritardo,
il codice è questo:
codice:
<%
'Creo l'Ado object
Set adoCon = Server.CreateObject("ADODB.Connection")
'Apro la connessione
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & server.mappath("_private/DUclassified.mdb") & "; Persist Security Info = False"
'Creo un ADO recordset object
Set rs = Server.CreateObject("ADODB.Recordset")
session("myUser") = "rob2002"
strSQL = "SELECT * FROM CAP WHERE C_USERS = '" & session("myUser") & "'"
rs.Open strSQL, adoCon
%>
[/b]</font> </p>
<form action="check_edit.asp" method="post" name="form1" id="form1">
<table class= "text" width="100%" border="1" cellspacing="0" cellpadding="0">
<tr>
<td>[img]../../img/0.gif[/img]</td>
<td>[img]../../img/0.gif[/img]</td>
<td><div align="center">[img]../../img/0.gif[/img]
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Stato di Abilitatazione</font> </div></td>
<td>[img]../../img/0.gif[/img]</td>
</tr>
<tr>
<td width="50" height="38"><%= rs.fields("c_users") %></td>
<td width="130"><%= rs.fields("c_cap") %></td>
<td width="81"><% if rs.fields("abilitato").value = True then%>
<input name="stato" type="checkbox" id="stato" value="checkbox" checked="checked" />
<%else%>
<input name="stato2" type="checkbox" id="stato" value="checkbox" />
<%end if%></td>
<td width="51"><div align="center"><a href="check_edit.asp">
<%
session("id") = rs.fields("C_ID")
response.write("<a href=check_edit.asp?id="& session("id") & ">[img]img/bullet.gif[/img]</a></font></td>")
%>
</a>
<%
while not rs.eof
'response.write rs("nome del campo")
rs.movenext
wend
%>
:master: