problemi di overflow

[techno]

Ciao raga.

Ho questo problema.

Ho un database con campi numerici con Dimensioni campo "Precisione doppia"

for x= 1 To 30
if recSomma.fields("Somma")<> 0 Then
somma= recSomma.fields("Somma")
calcolo= calcolo + 1
next
Response.Write (somma/calcolo)

e mi da errore di overflow

[kalosjo]

Può essere che la variabile calcolo resta a zero?

[techno]

no le variabili sono
somma= 18
Calcolo= 3

[techno]

ho provato con le altre operazioni cioè addizionando, sottraendo e moltiplicando e va bene.

Il problema me lo da solo se divido.

Non cè nessuno che mi può dire qualcosa?

[techno]

Ho provato in questi modi:

Response.Write (somma/calcolo)

e mi da overflow

Response.Write (somma\calcolo)

e mi a Divisione per zero

Non so più cosa fare

[techno]

visto che somma= 18

e

visto che calcolo= 3

Ho provato a scrivere direttamente i numeri:

Response.Write (18/3)

E mi da il risultato.

Quindi l'errore sono le variabili.

ma entrambi hanno il loro valore all'interno

se scrivo Response.Write somma mi da 18

e

se scrivo Response.Write calcolo mi da 3

non riesco proprio a capire come mai non va.

[wallrider]

e se fai

dim rapp
for x= 1 To 30
  if recSomma.fields("Somma")<> 0 Then
    somma= recSomma.fields("Somma")
    calcolo= calcolo + 1
  end if
next
rapp=somma/calcolo
Response.Write (cstr(rapp))

EDIT:ho modificato il response.write

[optime]

in vb/asp le variabili sono solo variant. prova tu a forzare il calcolo così

for x= 1 To 30
   if CLNG(recSomma.fields("Somma"))<> 0 Then
      somma= CLNG(Somma) + CLNG(recSomma.fields("Somma"))
      calcolo= CINT(calcolo) + 1
   end if ' QUESTO MANCAVA!
next
Response.Write (CDBL(somma)/CDBL(calcolo))

[techno]

ok non importa ho risolto il problema grazie lo stesso.

[optime]

Originariamente inviato da techno
ok non importa ho risolto il problema grazie lo stesso.

dicci come!