acil yardım lütfen

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 & "&nbsp;<font color=blue>Bu Komutu Kullanmaya Yetkiniz Yok</font><font color=red>!</font>"
saryUserMsgTo = Array(strUsername)
intType = 1
End If

bu komutu su an sadece session admin ile gelenler kullana biliyor bu komutu hem mod hemde adminler kullansın ıstıyorum
Admin değeri : blnAdmin
Mod değeri : blnMod

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

bu işini görür heralde aralarında OR kullandım, ya da anlamındadır. yani kısacası admin ya da mod girmiş ise o if kontrolü çalışır ve içindekileri gösterir

çok teşekkür ederim çalıştı verdiğin kod Allah razı olsun kolay gelsin