Si funziona.... sono d'accordo!

Però ora assegni a numero
codice:
'il numero che trattiamo
numero = request.form("numero")
Request.Form("numero") da un valore formato Strig per quello va..

in precedenza assegnavi a numero:

codice:
'il numero che trattiamo
numero = 41.3
così è formato numerico e quando vai ad elaborare:

codice:
'se ha una virgola vuol dire che è decimale 
seDecimale = Instr(  numero,"," )
da un errore tutto qui!


basta modificare:
seDecimale = Instr(Cstr(numero),"," )

Ciao...