Ho un problema nell'aggiornamento del db access, devo maggiorare del 10% il campo prezzo del mio database e ho usato il seguente script:

<%
sql="select * from tabella"
set rs=conn.execute (sql)

do while not rs.eof
prezzo=rs("prezzo")
sconto=prezzo*12/100
prezzot=prezzo+sconto
codice=rs("codice")

s="update tabella set prezzo='"&prezzot&"' where codice="&codice
set r=conn.execute(s)

rs.movenext
loop
%>


ma ho il seguente errore:

Tipi di dati non corrispondenti nell'espressione criterio.


Sapete darmi una mano?