Avatar billede mijovdan Nybegynder
03. november 2003 - 12:26 Der er 18 kommentarer og
1 løsning

udskriv antal poster i en database.

Hvordan kan jeg udskrive antalle af poster i en kollonne fra en database.
Vil gerne vide hvordan jeg kan udskriver det fulde antal, plus antallet af hvor mange poster der f.eks er grøn, gul osv. altså det der står i posten.
tak.
Avatar billede neander Nybegynder
03. november 2003 - 12:31 #1
Eksempel:

<%
QueryTotal = "Select count(*) as Found from Links;"
  Set rsTotal =  connect.Execute(QueryTotal)

  Ialt = rsTotal("Found")
%>

<%=Ialt%>
Avatar billede neander Nybegynder
03. november 2003 - 12:33 #2
Med grøn gul o.s.v. så laver du en ny søgning for hver farve:

<%
QueryTotal_groen = "Select count(*) as Found from Links Where farve=groen;"
  Set rsTotal_groen =  connect.Execute(QueryTotal_groen)

  Ialt_groen = rsTotal_groen("Found")
%>
Grønne:
<%=Ialt_groen%>
Avatar billede erikjacobsen Ekspert
03. november 2003 - 12:36 #3
Antal for hver farve

  select farve,count(*) as antal from dintabel group by farve
Avatar billede mijovdan Nybegynder
03. november 2003 - 13:03 #4
neander: hvor skal det indsættes i en side?
Avatar billede neander Nybegynder
03. november 2003 - 13:25 #5
Efter du har åbnet din database så lægger du dette:
<%
QueryTotal = "Select count(*) as Found from Links;"
  Set rsTotal =  connect.Execute(QueryTotal)

  Ialt = rsTotal("Found")
%>

Der hvor du vil have tallet til at stå i din HTML indsætter du:
<%=Ialt%>
Avatar billede neander Nybegynder
03. november 2003 - 13:27 #6
Hvordan ser din side ud pt?
Avatar billede mijovdan Nybegynder
03. november 2003 - 13:33 #7
siden er ik rigtigt oppe og køre. skal brae finde ud af koderne.
Avatar billede mijovdan Nybegynder
03. november 2003 - 13:34 #8
skal det der ind mellem <% databasen åbnes %> skal det så være deri med endnu <% %>
Avatar billede neander Nybegynder
03. november 2003 - 13:42 #9
Byg din side op sådan:

- åbn databasen
- læg sql-query
- start din side i HTML
- læg <%=Ialt%> der hvor du vil have antallet til at stå
- afslut din HTML side




Hele din side kan se sådan ud:
-----------------------------------------------
<%
Dim Connect, connString
Set Connect = Server.CreateObject("ADODB.Connection")
connString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("databasenavn.mdb")
Connect.Open connString

QueryTotal = "Select count(*) as Found from Links;"
  Set rsTotal =  connect.Execute(QueryTotal)

  Ialt = rsTotal("Found")
%>

<html>
<body>
<h2>antal: <%=Ialt%></h2>
</body>
</html>

<%
Connect.Close
Set Connect = Nothing
%>
-----------------------------------------------

- husk at sørge for at dit databasenavn, dine tabelnavne og kolonnenavne stemmer overéns.
Avatar billede mijovdan Nybegynder
03. november 2003 - 13:59 #10
mange tak det virker. men kan jeg lægge flere ind af gangen?
så der både er grøn, rød og blå
Avatar billede erikjacobsen Ekspert
03. november 2003 - 14:22 #11
Det er det du får med
select farve,count(*) as antal from dintabel group by farve
Avatar billede mijovdan Nybegynder
03. november 2003 - 14:40 #12
okay mange tak. jeg laver en ny query for hver mulighed. kan det gøres på en lettere måde. tak for din hjælp
Avatar billede neander Nybegynder
03. november 2003 - 14:40 #13
Brug erikjacobsens forslag eller følgende:
-----------------------------------------------
<%
Dim Connect, connString
Set Connect = Server.CreateObject("ADODB.Connection")
connString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("databasenavn.mdb")
Connect.Open connString

QueryTotal = "Select count(*) as Found from Links;"
  Set rsTotal =  connect.Execute(QueryTotal)
  Ialt = rsTotal("Found")

QueryTotal2 = "Select count(*) as Found from Links Where farve=groen;"
  Set rsTotal2 =  connect.Execute(QueryTotal2)
  Ialt2 = rsTotal2("Found")
%>

<html>
<body>
<h2>antal: <%=Ialt%></h2>
<h2>Grøn: <%=Ialt2%></h2>
</body>
</html>

<%
Connect.Close
Set Connect = Nothing
%>
-----------------------------------------------
Avatar billede neander Nybegynder
03. november 2003 - 14:41 #14
tak for points :o)
Avatar billede mijovdan Nybegynder
03. november 2003 - 14:46 #15
pt. har jeg lavet det på samme måde som i dit sidste indlæg og det virker. blir dog bare rodet med mange query
Avatar billede erikjacobsen Ekspert
03. november 2003 - 15:08 #16
Rodet, ja. Hvorfor prøver du ikke
select farve,count(*) as antal from dintabel group by farve
Avatar billede a-torsten Nybegynder
03. november 2003 - 15:23 #17
Ku måske også have været lavet sådan her... :

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DB = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("databasenavn.mdb")
Conn.Open DB

Function antal(farve)
    Sql = "Select count(*) as Found from Links where farve = '"&farve"&'"
      Set rs =  Conn.Execute(Sql)
      antal = rs("Found")
End Function
%>

<html>
<body>
antal: <%=antal("rød")%><
</body>
</html>

<%
Conn.Close
Set Conn = Nothing
%>
Avatar billede a-torsten Nybegynder
03. november 2003 - 15:25 #18
Ret
Sql = "Select count(*) as Found from Links where farve = '"&farve"&'"
Til
Sql = "Select count(*) as Found from Links where farve = '"&farve&"'"

Og så henter du bare med antal("grøn") osv....
Avatar billede neander Nybegynder
04. november 2003 - 08:16 #19
tak for points :o)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester