Säg att jag ska göra ett register över mitt godis (eller inte).
Först tabell ett:
1 - Fazer
2 - Marabou
3 - Ahlgrens
Tabell två:
1 - 1 - Nisses saltisar
2 - 1 - Sega kolor
3 - 1 - Guffegott
4 - 2 - Med luftbubblor
5 - 2 - Utan luftbubblor
6 - 3 - Sega bilar
Här hör alltså olika produkter till olika fabrikat. Så har jag gjort förrut för att loopa ut innehållet i dessa två tabellerna:
' SELECT som hämtar alla fabrikat
' Loopar igenom alla posterna
' I loopen sriver jag ut fabrikatet
' Sedan kör jag en ny SELECT som hämtar alla sorters godis
' från tabell två som har samma "kopplings-id" som det i det
' aktuella "recordet".
' ... skriver alltså ut fabrikat överst och under olika sorter.
' Slut på loop
Är detta ett bra sätt? Kan man fixa med på något annat sätt utan att använda två SELECTS och RecordSets?
SELECT *, tm.Name as ManuName FROM tManu tm
INNER JOIN tProd tp ON tm.ID = tp.ManuID
do until rs.eof
if rs("ManuName") <> strBef then
response.write rs("ManuName")
end if
response.write("name") & "<br>"
strBef = rs("ManuName")
rs.movenext
loop
Ja. Bef är en förkortning som jag använde. 'Str' för String (datatypen) och 'Bef' för Before (före). Detta är alltså inget som är inbyggt i ADO, recordsets eller liknande, det är bara en variabel som håller koll på om den skall skriva ut en ny tillverkare eller inte, eftersom de grupperas och listas så. :)
Alltså; SQL-satsen skall vara på en rad, jag skrev den bara på två, för att förenkla. :)
Alltså t.ex:
set recset = connect.execute("SELECT *, tm.Name as ManuName FROM tManu tm INNER JOIN tProd tp ON tm.ID = tp.ManuID")
Det ser ut som om du har nåt fel i din SQL, kan du skriva ut hela sql-satsen så vi får se om det är nåt fel där?
LarsG: Ojsan, du hade rätt. Råkade posta OveRRides kod.. :)
Connect.Execute "SELECT *, ak.gruppnamn FROM ArtikelKategorier ak ORDER BY prioritet INNER JOIN Artiklar a ON ak.ID = a.kategori"
SELECT *, ak.gruppnamn FROM ArtikelKategorier ak ORDER BY prioritet INNER JOIN Artiklar a ON ak.ID = a.kategori
SELECT * FROM artiklar a INNER JOIN artikelKategorier ak ON a.kategori = ak.id
Skriv ut med:
do until rs.eof
if rs("ManuName") <> strBef then
response.write "<b>" & rs("artikelkategori") & "</b><br>"
end if
response.write rs("artikel") & "<br>"
strBef = rs("artikelkategori")
rs.movenext
loop
Landstings + Organisationen = L + O = LO
LarsG + OveRRidE = L + O = LO
Ok, den var dålig! :e
En sak, hur får jag med ett id (från kolummen id alltså) från Artikelar? Försöker jag med rs("id") blir det "Item cannot be found in the collection corresponding to the requested name or ordinal. "
