Ciao,
non so come tu abbia strutturato il file modifica.asp, tuttavia ti mando uno spunto:
<html>
<body>
<%
If Request("tipoPagamento")="" Then
%>
<form action="pagamento.asp">
Selezionare il tipo di pagamento
<br>
<input type="radio" name="tipoPagamento" value="true">Bonifico bancario
<br>
<input type="radio" name="tipoPagamento" value="false">Posta
<br>
<input type="submit" value="ok">
</form>
<%
Else
%>
Il tipo di selezionato pagamento è
<%
If Request("tipoPagamento")="true" Then
Response.Write "bonifico bancario"
Else
Response.Write "posta"
End If
AggiornaDB
End If
%>
</body>
</html>
<%
Sub AggiornaDB
Dim cn,cSql,cIDPersona
With Server
Set cn = .CreateObject("ADODB.Connection")
cn.Open "Driver={Microsoft Access Driver (*.mdb)}; dbq=" & .MapPath("db.mdb")
End With
cIDPersona = Session("IDPersona")
cSql = "UPDATE tblAnagrafica SET PagamentoBonifico=" & Request("tipoPagamento")
cSql = cSql & " WHERE IDPersona=" & cIDPersona
With cn
.Execute cSql
.Close
End With
Set cn = Nothing
End Sub
%>
La routine AggiornaDB si collega al database, ed effettua il salvataggio del valore boolean tramite una query di comando; attenzione: è necessario mantenere l'id della persona su cui si stanno effettuando le modifiche (in questo esempio si suppone che sia stato precedentemente salvato nell'oggetto Session).
Senza una clausola where che limiti la modifica ad un solo record (quello di pertinenza), l'esecuzione abbraccerebbe infatti tutti i record della tabella, con conseguenze catastrofiche... ![Lightning [li]](/emoticons/emotion-60.gif)