ASP: Telle rader i en tabell og legge i en variabel

[haqbar]

Trenger å telle alle radene i en tabell og få disse inn i en variabel.

Har prøvd "SELECT COUNT(*) FROM tblPersoner" men finner ikke ut hvordan jeg kan legge resultatet av spørringen (feks. 10) inn i en variabel. Skal ha en for løkke som kjører like mange ganger som det er rader i tabellen.

[haqbar]

Fant ut av den forrige men nå trenger je hjelp til denne:

SQL2="Select * FROM tblKat where NR=" & i & ""     
RS.Open SQL2, Connection   
if RS.Eof then   
RS.Close   
Else   
Response.Write ("<br><span class='overskrift'>")   
Response.Write RS("Navn")   
Response.Write ("<br></span>")   
Loop   
RS.Close   
End If 

 

Problemet er at den bare hopper over alt selv om det er noe der (altså selv om RS.Eof = false)

Noen som vet hva som er feil her?

Endret 22. mai 2005 av kuroger

[Stian_S]

Sikker funnet ut av dette for lengst, men for sikkerhetsskyld, eller noen andre skulle ha behov for dette:

 

Set ConnTemp = Server.CreateObject("ADODB.Connection")
ConnTemp.Open Application("ODBC")  ' ODBC streng setter du i global.asa.

sSql  = "SELECT COUNT(*) AS Found FROM myTable"
Set RsCount = ConnTemp.Execute(sSql)

nFound  = RsCount("Found")

Set RsCount = Nothing
ConnTemp.Close()

Response.Write("Fant "& nFound &" treff i tabellen")

 

 

For det andre spørsmålet, så skulle vel egentlig koden fungere. Er et fnuttproblem der ser jeg, men det kan være noe som dukket opp når du skrev inn spørsmålet. Uansett, denne koden skal fungere:

 

Set ConnTemp = Server.CreateObject("ADODB.Connection")
ConnTemp.Open Application("ODBC")  ' ODBC streng setter du i global.asa.

sSql = "SELECT * FROM tblKat WHERE NR="& myNr
Set RsList = ConnTemp.Execute(sSql)

If Not RsList.EOF Then 
 Response.Write(RsList("Navn") &"<br>")
End If 

Set RsList = Nothing
ConnTemp.Close()

[bjornawarjar]

Sikker funnet ut av dette for lengst, men for sikkerhetsskyld, eller noen andre skulle ha behov for dette:

 

Set ConnTemp = Server.CreateObject("ADODB.Connection")
ConnTemp.Open Application("ODBC")  ' ODBC streng setter du i global.asa.

sSql  = "SELECT COUNT(*) AS Found FROM myTable"
Set RsCount = ConnTemp.Execute(sSql)

nFound  = RsCount("Found")

Set RsCount = Nothing
ConnTemp.Close()

Response.Write("Fant "& nFound &" treff i tabellen")

 

TAKK!

Akkurat det jeg lette etter