response.write ultimo record

[betto]

Ciao a Tutti,

volevo chiedere se il seguente codice funzionante si poteva migliorare:

Set objConn2 = Server.CreateObject("ADODB.Connection")
objConn2.ConnectionString = "DSN=9_feed.dsn"
objConn2.Open
strSQL2 = "SELECT SUM(Lun) FROM t_feed GROUP BY Numero HAVING Numero=174"
Set objRS2 = objConn2.Execute(strSQL2)
Do While Not objRS2.EOF
Response.Write objRS2(0)
objRS2.MoveNext
Loop

con questo codice stampo la somma di tutti i valori del campo Lun, quindi quello che ottengo e' un unico record; la sintassi per stampare questo "singolo" valore e' l' unica oppure si puo' evitare di ricorrere al ciclo Do While ??

Grazie in anticipo per l' attenzione !!!

[betto]

Toc, toc ... qualcuno puo' essermi di aiuto ??

[Vincent.Zeno]

Set objConn2 = Server.CreateObject("ADODB.Connection")
   objConn2.ConnectionString = "DSN=9_feed.dsn"
   objConn2.Open
   strSQL2 = "SELECT SUM(Lun) as somma FROM t_feed GROUP BY Numero HAVING Numero=174"
   Set objRS2 = objConn2.Execute(strSQL2)
Response.Write objRS2("somma")
'poi chiudi oggetti e connessioni...

[betto]

Grazie mille davvero, funziona !!