Count igen

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"db/db.mdb\")
set rs = Conn.execute(\"select * from tabel1 \")

if rs.EOF then
Response.write \"Databasen er tom.\"
else
Do Until rs.EOF
set temp = Conn.Execute(\"select count(*)  as antal from tabel2)
%>

<%=temp(\"antal\")%>

nu også som svar

jamen ikke sådan kik her


response.buffer = true
set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"../bank.mdb\")
Set rs = Connect.Execute(\"SELECT * FROM kategorier\")
Set rs2 = Connect.Execute(\"SELECT COUNT(*) AS antal FROM links\")
if not rs.EOF then
do until rs.EOF

response.write \"<tr>\"
response.write \"<td>\" & \"<a href=\"\"se-kat.asp?linkid=\" & rs(\"id\") & \"\"\">\" & rs(\"kategori\") & \"</a></td>\"
response.write \"<td>\"  & rs(\"kat-tekst\") & \"-\" HER SKAL DER OGSÅ TÆLLES HVOR MANGE LINK DER ER I DENNE KATEGORI</td>\"
response.write \"</tr>\"
response.write \"<tr>\"
response.write \"<td colspan=\'2\' bgcolor=\'#000066\' height=\'2\'></td>\"
response.write \"</tr>\"
if Cint(Request.QueryString(\"linkid\")) = rs(\"id\") then


end if
rs.movenext
Loop
else
response.write \"Ingen felter\"
end if

response.write \"der er \" & rs2(\"antal\") & \" billeder i databasen\"
%>

hvad er forskellen på rs(\"kategori\") og rs(\"kat-tekst\")?

kategorien er fek.s fiskestænger eller tandhjul
kat-tekst er den tekst der høre til kategorien.

ok to sekunder... laver lige en SQL-sætning

coooool

Prøv dette eks:

<%
response.buffer = true
set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"../bank.mdb\")

strSQL = \"SELECT Count(links.link) AS CountOflink, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL  = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.Kategori = links.kategori \"
strSQL  = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst];\"

Set rs = Connect.Execute(strSQL)
if not rs.EOF then
do until rs.EOF
  response.write \"<tr>\"
  response.write \"<td>\" & \"<a href=\"\"se-kat.asp?linkid=\" & rs(\"id\") & \"\"\">\" & rs(\"kategori\") & \"</a></td>\"
  response.write \"<td>\" & rs(\"kat-tekst\") & \"-\" & rs(\"CountOflink\") & \"</td>\"
  response.write \"</tr>\"
  response.write \"<tr>\"
  response.write \"<td colspan=\'2\' bgcolor=\'#000066\' height=\'2\'></td>\"
  response.write \"</tr>\"
  rs.movenext
Loop
else
  response.write \"Ingen felter\"
end if

\'\'\'\'response.write \"der er \" & rs2(\"antal\") & \" billeder i databasen\"
%>



Jeg ved ikke lige hvordan den sidste linie passer ind: response.write \"der er \" & rs2(\"antal\") & \" billeder i databasen\"
så jeg har udkommenteret den.

arh den går vis ikke for man kan ikke få unik linkID ud når man tæller sammen...

hvad gør filen se.kat.asp ?? viser den en kategori eller et link i kategorien??

jeg får denne fejl:

Microsoft OLE DB Provider for ODBC Drivers error \'80040e10\'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/mediebank/admin/kategori.asp, line 23

linie 23 er Set rs = Connect.Execute(strSQL)

hvad gør filen se.kat.asp ?? viser den en kategori eller et link i kategorien??


Viser link i kategorien

så har jeg nok stavet en af dine tabeller / kolonner forket....

hvad hedder kolonne som indeholder kategori i tabellen links ?

LEFT JOIN links ON kategorier.Kategori = links.kategori <---- rettes til rigtig navn

den hedder kategori

ok
Hvad skal se-kat.asp vise?  den får et linkid=rs(\"ID\") i din kode. Kommer det ID fra kategorier eller fra Links?

er kat-tekst i kategorier eller links tabellen?

hedder kategori også kategori i tabellen kategorier ?

hedder kategori også kategori i tabellen kategorier ? >> ja

har du en kolonne som hedder link i links?

Prøv denne SQL:

strSQL = \"SELECT Count(links.link) AS CountOflink, kategorier.ID, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.Kategori = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\"

eagleeye >> Det virker ikke :ø(

Her er min DB


[Kategorier] indeholder :
[id] - [kategori] - [kat-tekst]

[links] indeholder :
[ID] - [kategori] - [thumb-over] - [thumb-tekst] - [thumbnail] - [hi-res] - [hi-type] - [low-res] - [low-type] - [zip-file] - [zip-type] - [sog-1]- [sog-2]- [sog-3]- [sog-4]- [sog-5]



Når jeg kører den sidste sql du skrev får jeg fejlen:

Microsoft OLE DB Provider for ODBC Drivers error \'80040e10\'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/mediebank/admin/kategori.asp, line 23

Linie 23 er :
Set rs = Connect.Execute(strSQL)

Ok links indeholder ikke link.

Prøv denne SQL:
strSQL = \"SELECT Count(links.ID) AS CountOflink, kategorier.ID, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.Kategori = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\"

nu giver den ingen fejl men den viser at der er 0 links i alle kategorier selv om der er noget i nogen af dem.

Ps. undskyld fordi jeg fejl informerede dig ang. link

kategorier.Kategori skal være links.kategori for de bliver talt.

Ahm sorry men hvor er det lige jeg skal gøre det ??

strSQL = \"SELECT Count(links.ID) AS CountOflink, kategorier.ID, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.Kategori = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\" 

Det er i SQL\'en.

Hvis katergorier.katergor = \"kat1\"
så skal links.kategori også være = \"kat1\"

for den kan tælle dem.

Ahm sorry eagleeye >> Jeg fatter bare ikke hvad jeg skal gøre :ø(

Det var ment som information/spørgsmål for den kan tælle i links så skal links.kategori være = med katergorier.katergor.
Du skrev du fik 0 som count ved alle kategorier.

Kan du tjekke i databasen om links.kategori er = kategorier.kategori.

Hvis du har en kategori = \"biler\" for den kan tælle de record i tabellen links som høre til denne kategori så skal links.kategori også være = \"biler\".

kategorier er kategorier.kategori

links er links.kategori

Sådan ?

Det var ikke lige det jeg tænke på:


SQL\'en virker på den måde den filnder/går alle record I gennem I kategorier. Samtidig tæller den I links hvor mange records der er hvor links.kategori=kategorier.kategori. Hvis den tæller 0 for alle kategori\'er kunne det type på at links.kategori ikke har samme indhold som kategorier.kategori


Eks:
Kategorier
Katergori  kat-tekst
Biler          om biler
Både        om både

Links
Kategori    [felter]
Biler            data
Biler            data
Biler            data
Både          data
Biler            date

Så skulle de gerne ende med et recordset som dette:

Kategori  kat-tekst  coutoflinks
Biler          om biler      4
Både        om både    1

hej eagleeye kik lige her http://www.wild-game.dk/acces.jpg

håber det kan hjælpe på min lidt tågede forklaring

Jeps, så kategori i links er et tal (kategorier.ID)

Så skal links.kategori være defineret som tal og ikke tekst for det virker med den SQL.

yes det er

Hvis du laver kolonnen kategori i tabellen links (links.kategori) om til tal virker (skulle gerne) denne SQL:

SELECT Count(links.ID) AS CountOflink, kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID
FROM kategorier LEFT JOIN links ON kategorier.ID = links.kategori
GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;

Jeg prøver lige igen:

strSQL = \"SELECT Count(links.link) AS CountOflink, kategorier.ID, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.ID = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\"

Og så lige en extra gang, for fanden jeg skal vist lige læse lidt bedre havd jeg skriver :)

strSQL = \"SELECT Count(links.ID) AS CountOflink, kategorier.ID, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.ID = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\" 

Nu har jeg dette:

strSQL = \"SELECT Count(links.ID) AS CountOflink, kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.ID = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\"

men får fejlen:

Microsoft OLE DB Provider for ODBC Drivers error \'80004005\'
[Microsoft][ODBC Microsoft Access Driver] Type mismatch in expression.

/mediebank/admin/kategori_test.asp, line 25

linie 25 er Set rs = Connect.Execute(strSQL)

jeg får samme fejl med

strSQL = \"SELECT Count(links.ID) AS CountOflink, kategorier.ID, kategorier.Kategori, kategorier.[Kat-tekst] \"
strSQL = strSQL & \"FROM kategorier LEFT JOIN links ON kategorier.ID = links.kategori \"
strSQL = strSQL & \"GROUP BY kategorier.Kategori, kategorier.[Kat-tekst], kategorier.ID;\"

Det er fordi links.kategori er defineret som text i databasen.

så virker det coool
Tusind tak for hjælpen det var virkeligt godt gået.

eagleeye >> hvordan skal jeg så lige skrive

Set rs2 = Connect.Execute(\"SELECT * FROM links WHERE kategori = \'\" & request(\"linkid\") & \"\'\")

Nu er link jo et tal også får jeg en fejl når jeg kører scriptet.

Så skal du fjerne \'

Set rs2 = Connect.Execute(\"SELECT * FROM links WHERE kategori = \" & request(\"linkid\") & \"\")