Avatar billede inkognito1 Nybegynder
07. marts 2002 - 02:18 Der er 8 kommentarer og
1 løsning

Finde og count forskellige i felt.

Hej folkens !

End er har en smart funktion eller kode der kan kigge i et felt i en database og gøre følgende.

1. Finde forskelige slags.
2. Tælle hvor mange af de forskelige.

eks. Feltet hedder [BY] hvis der er 10 feter der står Aarhus skal den skrive Aarhus = 10. Hvis der er 5 felter der står Københaven skal den skrive København = 10.

håber en lige har en genial løsning.
Avatar billede hartnet.dk Nybegynder
07. marts 2002 - 02:25 #1
Select count(*) by from tabel where by = Aarhus

Sådan ville jeg gøre det
Avatar billede nih Novice
07. marts 2002 - 02:26 #2
SELECT tabel.by, Count tabel.by
FROM tabel
GROUP BY tabel.by

Niels
Avatar billede nih Novice
07. marts 2002 - 02:28 #3
argh for sent igen ;o)

Det kan være problematisk med feltnavn der ligner de reserverede ord i SQL sproget.
[by] burde omdøbes

Niels
Avatar billede nih Novice
07. marts 2002 - 02:29 #4
SELECT tabel.by, Count(tabel.by) As taeler
FROM tabel
GROUP BY tabel.by
Avatar billede inkognito1 Nybegynder
07. marts 2002 - 02:42 #5
strDSN = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\data.mdb"
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open strDSN

strSQL = "SELECT tabel.by, Count(tabel.by) As taeler"
FROM tabel
GROUP BY tabel.by

Set rs = myConn.Execute(strSQL)

------

Er det rigtig og hvordan får jeg resultatet frem ?
Avatar billede inkognito1 Nybegynder
07. marts 2002 - 02:43 #6
Resultate skulle gerne så sådan ud:

Århus = 1
Aalborg = 10
Odense = 2

osv..
Avatar billede nih Novice
07. marts 2002 - 03:08 #7
strSQL = "SELECT tabel.by, Count(tabel.by) As taeler " & _
          "FROM tabel GROUP BY tabel.by "
Set rs = myConn.Execute(strSQL)

Do While Not rs.EOF
    Response.Write & rs(0) & "    " & rs(1)
    rs.MoveNext
Loop

Jeg er ikke god til ASP (mere SQL og VB), men prøv noget der ligner det her

Niels
Avatar billede inkognito1 Nybegynder
07. marts 2002 - 03:29 #8
<%
strDSN = "database kald"
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open strDSN
strSQL = "SELECT tabel.[by], Count(tabel.[by]) As taeler " & _
          "FROM tabel GROUP BY tabel.[by] order by [by]"
Set rs = myConn.Execute(strSQL)
Do While Not rs.EOF
%>
<%=rs(0)%>-<%=rs(1)%>
<%
rs.MoveNext
Loop
%>
Avatar billede inkognito1 Nybegynder
07. marts 2002 - 03:30 #9
den virker :)
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