Bir Foruma Erişenlerin Sadece Admin veya Moderatör Olmasını Ayarlama

[prog_cenk]

Arkadaşlar forum sayfasında açmış olduğumuz her forum için erişim izinlerini ayarlayabiliyoruz ancak şöyle birşey yapamıyoruz. Bu foruma sadece admin ve moderatörler erişebilir diyemiyoruz. Ancak erişebilecekleri tek tek belirtebiliyoruz. Bu da uzun ve yorucu bir işlem. Oysa ben şöyle bir şey düşünüyorum. Aşağıdaki kodlar sayfadaki üyenin admin yada moderatör olup olmadığına bakıyordu ve ona göre erişim izni veriyordu. Bu kodları forum sayfasında da kullanamaz mıyız. Ama bakın "fhome.asp" sayfasından bahsetmiyorum. Bu sayfa içerisinde açılmış bir kategori ve o kategori içerinde açılmış olan bir forum sayfasından bahsediyorum. Çünkü biz erişim iznini burada belirtebiliyoruz. Umarım anlatabilmişimdir.

<% if (mlev = 3) or (mlev = 4) or (lcase(strNoCookies) = "1") then %>
BU KISMA SAYFANIN İÇERİĞİNİ OLUŞTURAN KODLAR EKLENİR.
<%end if%>

Yardımlarınızı bekliyorum.

[AdmiN]

bilgileri veritabanında aldığı için böyle bir şey kontrol ettirmek zor.Forumda bu işi yapmanın başka bir yolu yok sanırım.

[burajan]

Admine katılıyorum. Şimdi forumdaki kategoriler, bölümler ve konular fhome.asp, forum.asp, topic.asp gibi dosyalardadır. Fakat bu dosyalarda bilgiler veritabanından alınmaktadır. Dolayısıyla bu dosyalar üzerinde kontrol ettirme gibi bir şansımız yok.

[prog_cenk]

Peki teşekkür ettim. Kolay gelsin.

[prog_cenk]

Sonunda başardım arkadaşlar. Baya uğraştırdı ama değdi doğrusu. Oluşturduğum forumun forum id' si 41. Bunu forumun linkini tıkladığımda adres satırından öğreniyorum. Bu foruma sadece admin ve moderatörler girecek. Bunun için yapmam gerekenler aşağıdadır :

Aşağıdaki kod satırını FHOME.asp sayfasında bulun :

Response.Write   "<tr width=""100%"" bgcolor=""" & strForumCellColor & """ onMouseOver=""this.bgColor='" & strForumFirstCellColor & "';"" onMouseOut=""this.bgColor='" & strForumCellColor & "';"" style=""cursor:pointer;"" onclick=""javascript:top.document.location.href='forum.asp?FORUM_ID=" & rsForum("FORUM_ID") & "&CAT_ID=" & rsForum("CAT_ID") & "&Forum_Title=" & ChkString(rsForum("F_SUBJECT"),"urlpath") & "';"">" & vbcrlf & _
                           "<td width=""5%"" align=center valign=top>" & vbcrlf


Bu kodun başına aşağıdaki kodu ekle :
if ((mlev <> 3) and (mlev <> 4) and rsForum("FORUM_ID") <> 41) or ((mlev = 3) or (mlev = 4) or (lcase(strNoCookies) = "1")) then


Sonra yukardaki Response.Write komutunun başına konumlanın ve Bul' u çalıştırarak ilk gelen  </tr>  kodunu bulun. Hemen altına aşağıdaki kodu koyun :
<% end if %>


Hepsi bu kadar. Deneyin ve görün...

[burajan]

Kodları denemedim ama kod olarak bakdığımda mantık olarak çalışması doğrudur. Yanlız bu kodları forum.asp ve topic.asp dosyalarında da uygulaman gerekir.

[prog_cenk]

Hocam topic.asp' de bu kodu nereye koymalıyız. Ben bir türlü içinden çıkamadım.

[burajan]

topic.asp dosyasında çok kod var. Tek tek deneyip bulman lazım. Ben kesin birşey söyleyemem

[prog_cenk]

Hocam dediğin gibi topic.asp çok kompleks. Çok denedim ama bir türlü beceremedim. İnşallah bilen birisi çıkar.

[prog_cenk]

Arkadaşlar elhamdülillah sonunda yaptım. Size aşağıda kodları veriyorum.
Bu arada normal kullanıcının ulaşmasını istemediğim Forumun ID' si 41.

Topic.asp' de aşağıdaki kodları bul :
<%mwpThemeSmallBlock_close()
end if
end if%>



<%end if

Hemen altına şu kodu koy :
if ((mlev <> 3) and (mlev <> 4) and (Request.QueryString("FORUM_ID") <> 41)) or ((mlev = 3) or (mlev = 4) or (lcase(strNoCookies) = "1")) then

Sayfanın en altına da şu kodları koy :
<% else %>
 <font face="<%= strDefaultFontFace %>" size="2" color="<%= strDefaultFontColor %>">
 
<center>Bu bölümü sadece yönetici ve moderatörler görebilir!</center></font>


<!--#INCLUDE FILE="inc_footer.asp" -->
<% end if %>


Forum.asp' de ise aşağıdaki kodları bul :
<%
mwpThemeTableCustomCode = "align=""center"" width=""95%"" bgcolor="""""

Hemen üstüne şu kodu koy :
<% if ((mlev <> 3) and (mlev <> 4) and (Request.QueryString("FORUM_ID") <> 41)) or ((mlev = 3) or (mlev = 4) or (lcase(strNoCookies) = "1")) then %>

Sayfanın en altına da şu kodları koy :
<% else %>
 <font face="<%= strDefaultFontFace %>" size="2" color="<%= strDefaultFontColor %>">
 
<center>Bu bölümü sadece yönetici ve moderatörler görebilir!</center></font>


<!--#INCLUDE FILE="inc_footer.asp" -->
<% end if %>