Nel database ho un campo visibile (Tipo dati SI/NO) con valore predefinito in vero - True
Nel form per modificare il valore ho inserito una select
<select name="visibile" size="1">
<%
Dim valore
valore = True
%>
<%
If valore=objRs("visibile") Then
%>
<option selected value="True">True</option>
<option value="False">False</option>
<%
Else
%>
<option value="True">True</option>
<option selected value="False">False</option>
<%
End If
%>
</select>
Il valore viene ripreso con:
visibile_barca = replace(Request.Form("visibile"),"'", "''")
il valore lo inserisco nel database con:
strSql = "UPDATE barche SET nome_barca = '"& nome &"' , modello = '"& modello &"' , posizione = '"& posiz &"' , visibile = '"& visibile_barca &"' WHERE ID_barca ="& Session("idbarca")'
Mi riporta l'errore :
Microsoft JET Database Engine error '80040e07'
Data type mismatch in criteria expression.
Come mai?
Ciao.
Federico

Rispondi quotando