Tipo non corrispondente....

[Mizushi]

Ciao a tutti.

Mi spiegate dove sbaglio?

Il codice restituisce 'tipo non corrispondente' sulla variabile 'totale2':

SQL = " SELECT COUNT(VisitProven) as tot, "
SQL = SQL & " VisitProven FROM tbl_sessioni "
SQL = SQL & " WHERE ( VisitProven IS NOT NULL ) "
SQL = SQL & " AND ( VisitProven <> '' ) "
SQL = SQL & " GROUP BY VisitProven "
SQL = SQL & " ORDER BY tot desc "
SQL = SQL & " LIMIT 5 "

Set recordset = Server.CreateObject("ADODB.Recordset")
recordset.Open SQL, objconn

while not recordset.eof

totale = recordset("tot")
totale2 = (tot * 100)

:master:

[varrilaro]

totale2 = (totale * 100 )

credo

[Mizushi]

E' uguale:

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A000D)
Tipo non corrispondente
/visite/index.asp, line 30

SQL = " SELECT COUNT(VisitProven) as tot, "
SQL = SQL & " VisitProven FROM tbl_sessioni "
SQL = SQL & " WHERE ( VisitProven IS NOT NULL ) "
SQL = SQL & " AND ( VisitProven <> '' ) "
SQL = SQL & " GROUP BY VisitProven "
SQL = SQL & " ORDER BY tot desc "
SQL = SQL & " LIMIT 5 "

Set recordset = Server.CreateObject("ADODB.Recordset")
recordset.Open SQL, objconn

while not recordset.eof

totale = recordset("tot")
totale2 = (totale * 100)

[Roby_72]

Ma anche solo totale te lo stampa?

totale = recordset("tot")
response.write totale
response.end

Roby

[varrilaro]

totale = cInt(recordset("tot"))

totale2 = totale * 100

tipo non corrispondente indica che la variabile non è un numero

se provi a stampare totale che ti da ???

[Mizushi]

Originariamente inviato da varrilaro
totale = cInt(recordset("tot"))

Era questo grazie!

Un'ultima domanda:

Se ho questo numero 22569 come faccio a stamparlo 22.569 ?

[Roby_72]

Formatnumber(numero)

Roby

[Mizushi]

Originariamente inviato da Roby_72
Formatnumber(numero)

Roby

Grazie !

Per la precisione:

FormatNumber(numero, 0)