Count i databasen

SELECT COUNT(KOLONNE) FROM TABEL WHERE KOLONNE = ET ELLER ANDET ORDER BY KOLONNE

Jeg har skrevet dette:

<% SELECT COUNT(Boligtype) FROM Hovedtabel WHERE Boligtype = Ejerlejligheder ORDER BY Boligtype%>

men får fejlen:

'Case' var ventet

"er i databasen i alt."
SELECT COUNT(*) AS antal FROM Orders
RS("antal")


"fundet i databasen"
som ncp hvor du evt. kan indføre "ET ELLER ANDET" som søgnings-paramter" og du skal også huske at lave as antal

øhh det forstår jeg ikke helt!

<% SELECT COUNT(*) AS antal FROM Hovedtabel WHERE Boligtype = Ejerlejligheder ORDER BY Boligtype%>


når du så skal hive antal frem fra dit record-sæt skal du
skrive
RECORDNAVN("antal")

hele koden:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb); DBQ=" & Server.MapPath("dinDB.mdb")
SQL = "SELECT COUNT(*) AS ialt FROM DinTabel WHERE DitFelt='EtEllerAndet'"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql, conn, 1, 3
intIalt = rs("ialt")
%>
Der er i alt <%= intIalt %> records hvor ditfelt=Etellerandet
<%
Set rs = Nothing
rs.Close
%>

Mvh
Mr.Meincke

"SELECT COUNT(Boligtype) FROM Hovedtabel WHERE Boligtype = 'Ejerlejligheder';"

Hej

jeg har prøvet og prøvet men uden held...

Her er nogle af mine koder på siden hvor jeg gerne vil have min counter, men er der nogle der kan finde ud af at sætte det ind ??




<%
if request.Form("send") = "ja" then

set cn = server.createobject("adodb.connection")
cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;"
cnstr = cnstr & "Data Source=c:\Inetpub\wwwroot\Ejendom\db\Ejendom.mdb;"
cn.connectionstring = cnstr
cn.open

sql = "SELECT * FROM Hovedtabel WHERE Boligtype LIKE '%"& Request.Form("Type") & "%';"
%>

                    <tr>
                      <td align="center" class="overskrift2">Boligtype</td>
                      <td align="center" class="overskrift2">Adresse</td>
                      <td align="center" class="overskrift2">Areal</td>
                      <td align="center" class="overskrift2">Brutto</td>
                      <td align="center" class="overskrift2">Netto</td>
                      <td align="center" class="overskrift2">Udbetaling</td>
                      <td align="center" class="overskrift2">Kontantpris</td>
                      <td align="center" class="overskrift2">Se bolig</td>
                    </tr>
<tr>
                      <td>
                      <%
Set objRec = cn.Execute(sql)
do while not objRec.eof
%>
                        <%
Response.Write "<tr class='overskrift'>" & "<td>" & objRec("Boligtype") & "</td><td>" & objRec("Gadenavn") & " " & objRec("Nummer") & "</a></td><td>" & objRec("Boligareal") & "</td><td><div align=right>" & objRec("Brutto") & "</div></td><td><div align=right>" & objRec("Netto") & "</div></td><td><div align=right>" & objRec("Udbetaling") & "</div></td><td><div align=right>" & objRec("Kontantpris") & "</div></td><td><a href=vis_bolig.asp?id=" & objRec("Sagsnummer") & ">" & "<div align=center><img src=Billeder/hus.gif border=0></div>" & "</a></td></tr>"
objRec.movenext
loop



%>
                    </table>
                </td>
              </tr><%SELECT COUNT(Boligtype) FROM Hovedtabel WHERE Boligtype = 'Ejerlejligheder';

cn.execute sql
cn.close
set cn=nothing
end if

%>

Udskift disse linier:

                </td>
              </tr><%SELECT COUNT(Boligtype) FROM Hovedtabel WHERE Boligtype = 'Ejerlejligheder';

cn.execute sql



MED DISSSE:

                </td>
              </tr>
<%
sql = "SELECT COUNT(Boligtype) as AntalBolig FROM Hovedtabel WHERE Boligtype = 'Ejerlejligheder';"
cn.execute sql
Response.write "Antal boliger fundet : " & rs("AntalBolig")
%>

21/04-2002 22:44:30

ups jeg ville forsætte mit svar men Eksperten har en underlig mani med at komme med timeout en gang imelllem så jeg prøver lige igen...Danm jeg glemt CTRL-C inden jeg trykkede på udfør.


Forsætelse fra forrige svar (21/04-2002 22:44:30)
Hvis du gerne vil hvade at den ikke altid kun viser antaller af 'Ejerlejligheder', men rent faktisk viser antallet af den bolig type man søger på. Det skifter bare denne SQL-sætning ud:

sql = "SELECT COUNT(Boligtype) as AntalBolig FROM Hovedtabel WHERE Boligtype = 'Ejerlejligheder';"

MED DENNE:

sql = "SELECT COUNT(Boligtype) as AntalBolig FROM Hovedtabel WHERE Boligtype LIKE '%" & Request.Form("Type") & "%';"

der er fejl i rs

Response.write "Antal boliger fundet : " & rs("AntalBolig")


Hvad er der galt?

ups sorry prøv lige at rette:

Denne linie:
cn.execute sql

Til Denne
Set objRec = cn.Execute(sql)

Også dette rs("AntalBolig")    Til objRec ("AntalBolig")

Det har jeg rettet nu, men jeg får fejlen "Et objekt er obligatorisk"

i denne linie:

Set objRec = cn.Execute(sql)

Som jeg ser der ud fra fejlen "'Case' var ventet" så anvender du cases.

Er du sikker på du har defineret din 'Case'??

Kan du ikke poste hele koden fra den fil du arbejder med?

Eller sende den til mig på michaelpe@scanbox.com?

Sådan her skal de sidse linier se ud.

%>
                    </table>
                </td>
              </tr>
sql = "SELECT COUNT(Boligtype) as AntalBolig FROM Hovedtabel WHERE Boligtype LIKE '%" & Request.Form("Type") & "%';"
Set objRec = cn.Execute(sql)
Response.write "Antal boliger fundet : " & objRec ("AntalBolig")

cn.close
set cn=nothing
end if

Er der noget mere kode mellem loop og %> i det du har vist her?  (se nedenfor)


objRec.movenext
loop

'ER DER ASP KODE HER ????
'Evt objRec.Close  for så slet den linie

%>
                    </table>

webbe du skal lige lavet et svar!

Oki - here goes ;0)