Allora sono sicuro che dipende dal varchar perche se lo tolgo mi inserisce il record.

in ogni caso il codice è questo
codice:
<%
Dim RsInseriscoPrenotazione
Dim RsInseriscoPrenotazione_numRows

Set RsInseriscoPrenotazione = Server.CreateObject("ADODB.Recordset")
RsInseriscoPrenotazione.ActiveConnection = MM_Conn_STRING
RsInseriscoPrenotazione.Source = "SELECT * FROM prenotazioni"
RsInseriscoPrenotazione.CursorType = 0
RsInseriscoPrenotazione.CursorLocation = 2
RsInseriscoPrenotazione.LockType = 3
RsInseriscoPrenotazione.Open()

RsInseriscoPrenotazione_numRows = 0
%>


<%
RsInseriscoPrenotazione.addnew ()
RsInseriscoPrenotazione ("ID") = VARIDcon
RsInseriscoPrenotazione("ospite") = Ospite
RsInseriscoPrenotazione ("email") = Email
RsInseriscoPrenotazione ("telefono") = Telefono

RsInseriscoPrenotazione ("CHECKIN") = CHECKIN
RsInseriscoPrenotazione ("CHECKOUT") = CHECKOUT
RsInseriscoPrenotazione ("preno_data") = preno_data

if preno_flessibile = 1 then
	RsInseriscoPrenotazione("preno_flessibile") = 1
end if
if IsNumeric (preno_adulti) then 
	RsInseriscoPrenotazione("preno_adulti") = preno_adulti
end if

RsInseriscoPrenotazione("altro") = preno_altro

RsInseriscoPrenotazione("IDnazione") = VARIDnazione
RsInseriscoPrenotazione.update
%>
<%
RsInseriscoPrenotazione.Close()
Set RsInseriscoPrenotazione = Nothing
%>
i dati li prende da un form che sta nella pagina precedente.
Ma ho provato anche ha dargli l istruzione:
RsInseriscoPrenotazione("ospite") = "GIANLUCA"
e mi da il medesimo errore.
Ospite è uno dei campi varchar che mi genera l errore.