summe ausgeben der werte in einer spalte aus der sql datenbank

hallo,
hablefolgendes problem,
ich möchte die summe ausgeben einer spalte aus der sql datenbank
und zwar kommt in der spalte nur 1 oder 0 vor, ich möchte das ergebniss aller 1er ausgeben..
habe es hiermit versucht:
------------------------------------
'Mein versuch
dim sqlSumme
sqlSumme = SELECT SUM(aktiv) AS sumgepatcht & _
FROM haus1

Response.Write <tr> & vbCrLf
Response.Write <td>Summe:</td> & vbCrLf
Response.Write </tr> & vbCrLf
Do while Not objRS.EOF
Response.Write <tr> & vbCrLf
Response.Write <td> & _
objRS.Fields(sumgepatcht) & _
</td> & vbCrLf
Response.Write </tr> & vbCrLf
objRS.MoveNext
Loop


----------------------------
'Fehlermeldung

Laufzeitfehler in Microsoft VBScript- Fehler '800a01a8'

Objekt erforderlich: ''

/Patchfeldbelegung-BKP/haus1/switch-h1.asp, line 11


Vielen dank für eure unterstützung
ciao markus

hi

was steht denn in zeile 11?

nico

Do while Not objRS.EOF

ist das RecordSet in zeile 11 schon erstellt und geöffnet?

hi,
ahhh etz bringt er scho ma keine fehlermeldung mehr,
hab die datei falsch includet...

nur etz zeigt er mir keine summe an*g*

dim sqlSumme
sqlSumme = SELECT SUM(aktiv) AS sumgepatcht & _
FROM haus1
Response.Write <td>Summe:</td> & vbCrLf
Do while Not objRS.EOF
Response.Write <td> & _
objRS.Fields(sumgepatcht) & _
</td> & vbCrLf
objRS.MoveNext
Loop

danke
ciao markus

hi,

wenn du SELECT SUM verwendest brauchst du die schleife nicht.
objRS(sumgepatcht) enthält ja bereits die summe aller felder.

hmm*g*
hast du vielleicht a beispiel wo des geht

hi,

.........
SQL = SELECT SUM(feld_name) AS Summe FROM tabelle ;
rs.Open SQL, con, 0,1
Summe = rs(Summe)
rs.Close
.........
Response.Write Summe
.........


hier fehlen natürlich noch die db-connection usw.

ich hoffe der schnipsel hilft dir weiter.

nico

servus nico

jo danke etz hats hingehaun
vielen dank
schönen wochenstart noch!!

ciao markus