Gönderen: 21-Ekim-2010 Saat 00:06 | Kayıtlı IP
|
|
|
chat sistemimde Adminlere ozel komutlar vardı fakat ben admin haricinde birde moderator dıye bir session olusturdum sitemdeki kod
ElseIf Mid(strMessage, 1, 6) = "/shun " Then strCommand = Trim(Mid(strMessage, 6, Len(strMessage))) If blnAdmin Then If CheckIfShunned(strCommand) Then strMessage = strCommand & "Konuşması Daha Önce Engellenmiştir." Else Call ShunUser(strCommand) strMessage = strCommand & " Konuşması Engellenenler Listesine Eklendi." Call WriteLog(strUsername & "|>>> Tarafından Konuşması Yasaklanan IP Adresi: [" & strCommand & "] (" & Time & ")") End If saryUserMsgTo = Array(strUsername) intType = 1 Else strMessage = strUsername & " <font color=blue>Bu Komutu Kullanmaya Yetkiniz Yok</font><font color=red>!</font>" saryUserMsgTo = Array(strUsername) intType = 1 End If
Chat de /shun komutunu sadece blnAdmin = CBool(Session("Admin")) ile giriş yapmış adminler kullanmakda
benim iseteğim
hem blnAdmin = CBool(Session("Admin")) ile hemde blnMod = CBool(Session("Mod")) ile giriş yapmış kullanıcılar bu komutu kullansın
Yukarıda ki Asp dosyasında adminler için komut If blnAdmin Then komutu ile kısıtlanmış bu komutu hem bInAdmin hemde bInMod Kullanamazmı lütfen yardım edin :S
__________________ Amasra
|