Simpel: Kan ikke joine
HejEr der en, som gider at joine recordset'ene rsBrevkasse1 og rsBrevkasse2, så de bliver til et recordset, altså henter oplysningerne i et hug.
strSQL = "SELECT FORUM_ID FROM FORUM_MODERATOR WHERE MEMBER_ID = " & RS("Member_ID")
Set rsBrevkasse1=dataConn.Execute(strSQL)
if not (rsBrevkasse1.bof or rsBrevkasse1.eof) then
strSQL = "SELECT COUNT(FORUM_ID) AS COUNTRECORDS FROM FORUM_FORUM WHERE FORUM_ID = " & rsBrevkasse1("FORUM_ID") & " AND F_STATUS = 1 AND F_PRIVATEFORUMS = 6"
set rsBrevkasse2=dataConn.Execute(strSQL)
if rsBrevkasse2("CountRecords") > 0 then
strPlusprofil = strPlusprofil & " <a href=""/plusprofil/gotoSite.asp?PlusprofilId=" & rs("ANNONCE_ID") & "&ClickType=links"">Brevkasse</a>"
end if
end if
PS. rsBrevkasse1("FORUM_ID") bruges kun til at finde counteren med og skal ikke udskrives. Det er kun counteren som skal anvendes.
