<%
KatID=Request.QueryString("KatID")

Set Filmler=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM filmler WHERE kategori="&KatID&" "
Filmler.Open sql,Baglanti,1,3
If Not Filmler.Eof Then
Do While Not Filmler.Eof

FilmID=Filmler("id")

Set rs=Baglanti.Execute("SELECT Count(*) As Toplam FROM yorum WHERE filmid="&FilmID&" ")

Response.Write Filmler("baslik") &" ( Yorum Sayısı: "&rs("Toplam")&" ) "


Filmler.MoveNext : Loop
End If
Filmler.Close : Set Filmler=Nothing

%>

queryden kategorinin id sini çektim.
o kategoriye ait filmleri sıraladım.
sıralanan filmlerin id sini aldım ve yorum tablosunda o filmlerin id sini kontrol ettim.
son olarak da filmin başlığını yazdım ve yanına da parantez içinde yorum sayısını yazdırdım.

anlamışsındır umarım