modifica campo valuta

[robert965]

Salve a tutti, allora ho una pagina per la modifica dei record in un db access. ecco un pezzo di codice:

function fixquotes (strtxt)
fixquotes = Replace(strtxt, "'", "''")
end function
if len (request.Form)>0 then
dim conn, strConn




strConn = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "& Server.MapPath ("../database/data.mdb")
Set conn = Server.CreateObject("ADODB.Connection")

Conn.Open StrConn
SQL = "select * from vendita where comune ='"
SQL = SQL & fixquotes(request.Form("ida"))&"'"
set rs = Server.CreateObject("ADODB.Recordset")

rs.Open SQL, conn, 1, 3


if rs.eof<>true and rs.bof<> true then

if len(request.Form("comune"))>0 then
rs.update "comune", request.Form("comune")
end if


if len(request.Form("prezzo"))>0 then
rs.update "prezzo", request.Form("prezzo")
end if

if len(request.Form("tipo"))>0 then
rs.update "tipo", request.Form("tipo")
end if

ecc. ecc.

il tutto funziona perfettamente, se nel db i campi sono tutti campo testo, purtroppo il campo prezzo è valuta. e qui succedono cose strane, praticamente la pagina mi scrive correttamente in tutti i campi del db tranne nel primo, in questo caso il campo "comune" e mi ci mette uno 0. chi può aiutarmi? grazie ragazzi, i dati che arrivano a questa pagina provengono da una pagina asp con form dinamico creato leggendo i campi dal db stesso, e modificabili direttamente da li.

[robert965]

ragazzi sto provando e riprovando ma niente da fare, spero in qualche anima pia.