Nuvarande kod: Nu har du inte skrivit något om hur databasen är uppbyggd, men en gissning är att det blir något i stil med. Okej. Men vart ska ja använda ditt exempel:Plockat ut projekt
<code>
SQL = "SELECT * FROM projekt where status = 0"
Set RecSet = objconn.Execute(SQL)
If Not RecSet.EOF then
response.write "<table>"
strVisade = 0
Do Until RecSet.EOF
strProjektID = RecSet("ID")
Set strTotalt = objconn.Execute("Select COUNT(*) From kostnader WHERE projekt_ID = " & strProjektID & "")
Set strKlara = objconn.Execute("Select COUNT(*) From kostnader WHERE projekt_ID = " & strProjektID & " AND status = 1")
If Clng(strKlara(0)) = Clng(strTotalt(0)) then
If Not Clng(strTotalt(0)) = 0 then
Response.Write "<tr class=""hovra""><td><img src=""gfx/accept-12x12.png""> "&recset("projekt")&" <b>Förhandsgranska Faktura</td></tr>"
strVisade = 1
End If
End If
strTotalt.Close : Set strTotalt = Nothing
strKlara.Close : Set strKlara = Nothing
RecSet.Movenext
Loop
response.write "</table>"
If strVisade = 0 then
Response.Write "Det finns inga fakturor klara för fakturering<br/>"
End If
Else
Response.Write "Det finns inga projekt i databasen"
End If
RecSet.Close : Set RecSet = Nothing
response.write "<br/><b>Fakturerade företag</b><br/>"
SQL = "SELECT * FROM projekt where status = 1"
Set RecSet = objconn.Execute(SQL)
if recset.eof then
response.write "Det finns inga företag är fakturerade än"
else
response.write "<table>"
do until recset.eof
response.write "<tr class=""hovra""><td>"&recset("projekt")&"</td></tr>"
recset.movenext
loop
response.write "</table>"
end if
</code>
Som det är nu så hämtar den ju ut projekt där status = 1. Det jag vill är ju att om låt säga 5 kostnader har projekt_id = 5 där 4 av dessa har månad = 8 och en av dessa 5 har månad = 7 så ska den skriva ut två stycken projekt. Ett som är för de 4 som har månad = 8 och en för den som har månad = 7.Sv:Plockat ut projekt
SELECT ProjektId, ProjektNamn, Manad FROM kostnader INNER JOIN projekt ON kostnader.ProjektId = projekt.ProjektId GROUP BY ProjektId, ProjektNamn, Manad
/JohanSv: Plockat ut projekt
SELECT ProjektId, ProjektNamn, Manad FROM kostnader INNER JOIN projekt ON kostnader.ProjektId = projekt.ProjektId GROUP BY ProjektId, ProjektNamn, Manad