تحديد الصلاحيات للمستخدمين

ymas كتب:

السلام عليكم ورحمة الله وبركاته ..

عندي في الحقيقة سؤاليــــن واتمنى ان اجد الاجابة لديكم ..

السؤال الاول ..انا عاملة موقع بــ asp.net 2010

واريد يكون عند دخول الموقع في تحديد اذا كان مسئول او مستخدم عادي ..

بحيث تظهر صفحات خاصة للمسئول و تكون غير الصفحات التي تظهر للمستخدم العادي ..

فكيف احدد او بالاصح ما هو الكود الذي يقوم بالتحديد ان الشخص الداخل للصفحة هو مسئول ام مستخدم عادي...

والسؤال الثاني ..

موقع الويب ..هل استطيع تحويله الى ملف تنفيذي ام لا .؟؟

واذا كان اقدر ما هي الخطوات المتبعة ؟؟

ولكم جزيل الشكر ..

ْ~judy~

-------------------------------

اخي العزيز . تستطيع تحديد المستخدم العادي من المسؤل عن طريق عمل حقل تسميةflag وفي هذه الحقل تسوي قيمتين اذا كان 1 يكون مستخدم عادي واذا كان مسؤل يكون 2 وحسب ماتحب تغير الارقام .. وعند الاستعلام تسوي سكلت .. تروح تشوف هل القيم المدخلة عبر لتكست بوكس حق اليوزر والباس ورود .. هل القيمة 1 ام اثنين وتسوي شرط .. اذا كان واحد تخلية ينتقل لصفحة المستخدم العادي واذا كان 2 ينتقل لصفحة حق الادمن ...

وهذه مثال بسيط بالاستعلام

------------------------------------

  ob.sql = "select us_type from users where us_name=@us_name and us_pass=@us_pass"
        ob.cm = New SqlCommand(ob.sql, ob.con)
        ob.con.Open()
        ob.cm.Parameters.AddWithValue("@us_name", Txt_name.Text)
        ob.cm.Parameters.AddWithValue("@us_pass", Txt_pass.Text)
        ob.read = ob.cm.ExecuteReader
        If ob.read.Read Then
            ob.con.Close()
            ob.read.Close()
            ob.sql = String.Format("select id_us,us_name,image,ud_dept,us_type from users where us_name='{0}' and us_pass='{1}' ", Txt_name.Text, Txt_pass.Text)
            ob.da = New SqlDataAdapter(ob.sql, ob.con)
            ob.ds = New DataSet
            ob.da.Fill(ob.ds)
            Session("us_id") = ob.ds.Tables(0).Rows(0)(0)
            Session("name") = ob.ds.Tables(0).Rows(0)(1)
            Session("image") = ob.ds.Tables(0).Rows(0)(2)
            Session("ud_dept") = ob.ds.Tables(0).Rows(0)(3)
            Session("us_type") = ob.ds.Tables(0).Rows(0)(4)
            If ob.ds.Tables(0).Rows(0)(4) = 1 Then
                Server.Transfer("Default.aspx")
            ElseIf ob.ds.Tables(0).Rows(0)(0) = 2 Then

                Server.Transfer("Default.aspx")
            Else

                Server.Transfer("Default3.aspx")
            End If
        Else
            Label1.Visible = True
        End If
        ob.read.Close()
        ob.con.Close()