implant


  Aktif KonularAktif Konular  Forum Üyelerini GösterÜye Listesi  Forumu AraArama  YardımYardım
  Kayıt OlKayıt Ol  GirişGiriş
ASP / ASP.NET
 ASPTurkiye.com Forum : ASP / ASP.NET
Konu Konu: bu kodda hata nedir arkadaşlar Yanıt YazYeni Konu Gönder
Yazanlarda
Mesaj << Önceki Konu | Sonraki Konu >>
aydd
Yeni Üye
Yeni Üye


Kayıt Tarihi: 17-Kasım-2007
Gönderilenler: 2
Gönderen: 17-Kasım-2007 Saat 13:55 | Kayıtlı IP Alıntı aydd

bu kod niye çalışmadı arkadaşlar yetki bir de olsa sıfırda olsa hep bu yazı çıkıyor niye kodda bi eksiklik varmı

BURASI SADECE ADMİNDE GÖRÜNÜR..İĞERLERİNE GÖRÜNMEZ

Kod:
<%
Dim baglan
Dim hocam

Set baglan = Server.CreateObject("ADODB.Connection")
baglan.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("uyeler.mdb")


%>

<%
Set hocam = Server.CreateObject ("ADODB.RecordSet" ) 
sql="select * From uyelerim "
hocam.Open sql,baglan,1,3
%>



<%

Session("yetki") = hocam("yetki") 
   
%>

     
     <% if session("yetki")="1" then %>
     BURASI SADECE ADMİNDE GÖRÜNÜR..İĞERLERİNE GÖRÜNMEZ
     <% end if %>

     <% if session("yetki" )="0" then %>
     BURASI SADECE Maderatörlere GÖRÜNÜR..İĞERLERİNE GÖRÜNMEZ
     <% end if %>

 

Yukarı Dön Göster aydd's Özellikler Diğer Mesajlarını Ara: aydd
 
greyder
Üye
Üye


Kayıt Tarihi: 22-Mart-2007
Ülke: Türkiye
Gönderilenler: 90
Gönderen: 17-Kasım-2007 Saat 15:21 | Kayıtlı IP Alıntı greyder

sen admin olarak giriş yapıyormusun

 

Yukarı Dön Göster greyder's Özellikler Diğer Mesajlarını Ara: greyder Ziyaret greyder's Ana Sayfa
 
lodos
Yeni Üye
Yeni Üye


Kayıt Tarihi: 26-Aralık-2007
Ülke: Türkiye
Gönderilenler: 16
Gönderen: 26-Aralık-2007 Saat 18:26 | Kayıtlı IP Alıntı lodos

normal kullanıcı 3 oluyor ise
herhangi bir hata yok gibi gözukuyor
Yukarı Dön Göster lodos's Özellikler Diğer Mesajlarını Ara: lodos
 
x-fc
Yeni Üye
Yeni Üye


Kayıt Tarihi: 27-Aralık-2007
Gönderilenler: 4
Gönderen: 27-Aralık-2007 Saat 10:17 | Kayıtlı IP Alıntı x-fc

sql sorgulamanda hata var.

ilk olarak; hangi oturum acmis kullaniciya sorgu yaptiracagini belirtmemissin.

eger belirtmezsen, db ilk gelen kaydi kaale alip hep ayni ekrani getirmeye devam edecektir. eger dogru bir cevap almak istiyorsan oturum acmis olan uyeye gore yetki atmaasi yapmak zorundasin. yetki atamalarini session ile yapacaksan eger, bunu uyenin, sisteme login oldugunda yapmalisin

ornek olarak vermek gerekirse;

login.asp:
<%
Dim iKullaniciAdi, iSifre, rsCtrl
iKullaniciAdi = Request.Form("fKullaniciAdi") 'formdan gelen kullanici adi
iSifre = Request.Form("fSifre") 'formdan gelen kullanici sifresi

'kullanici kayitlarinin bulundugu tabloya baglan
Set rsCtrl = Server.CreateObject ("ADODB.RecordSet" )
rsCtrl.Open("Select * From Uyelierim Where UserName = '" & iKullaniciAdi & "'"),baglan, 1, 3
If (Not rsCtrl.EOF) Then 'eger kullanici kaydi varsa sifre kontrolune gec
     If (rsCtrl("Password") = iSifre) Then 'sifre kontrolu
        Session("U") = iKullaniciAdi
        Session("Y") = rsCtrl("Yetki")
        'baska atanacak sessionlar varsa devam eder.

        response.red irect("default.asp")
     Else
          Response.Write("kullanici sifresi gecersiz")
     End If
Else
Response.Write("bu isimde bir kullanici kaydi yok")
End If
rsCtrl.Close
Set rsCtrl = Nothing
%>

ilgilisayfa.asp:

<%
If (Session("Y") = 1 Then 'eger oturumu acik uyenin yetkisi adminse
    Response.Write("burasi sadece adminlere ozel alandir")

ElseIf (Session("Y") = 2 Then 'eger oturumu acik uyenin yetkisi modsa
    Response.Write("burasi sadece moderatorlere ozel alandir")

else 'eger her ikisinide karsilamiyorsa hata mesaji veya sayfanin diger kisimlari gelsin
    Response.Write("burasi genel kullanim icindir")

End If
%>



Düzenleyen x-fc 27-Aralık-2007 Saat 10:19
Yukarı Dön Göster x-fc's Özellikler Diğer Mesajlarını Ara: x-fc
 

Eğer Bu Konuya Cevap Yazmak İstiyorsanız İlk Önce Giriş
Eğer Kayıtlı Bir Kullanıcı Değilseniz İlk Önce Kayıt Olmalısınız

  Yanıt YazYeni Konu Gönder
Yazıcı Sürümü Yazıcı Sürümü

Forum Atla
Kapalı Foruma Yeni Konu Gönderme
Kapalı Forumdaki Konulara Cevap Yazma
Kapalı Forumda Cevapları Silme
Kapalı Forumdaki Cevapları Düzenleme
Kapalı Forumda Anket Açma
Açık Forumda Anketlerde Oy Kullanma

Powered by Web Wiz Forums version 7.91
Copyright ©2001-2004 Web Wiz Guide

Bu Sayfa 0,0938 Saniyede Yüklendi.