السلام عليكم ورحمة الله وبركاته
أخواني الكرام
احاول أن أقوم بتغييرات على الكود لدي لكي يقوم بالدخول على حسب درجة الموظف للصفحة التي تناسبه
وتوضيحاً لكلامي اذا قام احد موظفي مرتبه B فسوم يتم تحويلهم الى الصفحة الخاصة بجميع الموظفين العاديين
واذا قام موظف من مرتبة A بتسجيل دخوله الى الصفحة الخاصة بالمدراء
حاولت وجربت وقمت ببعض التجارب ولكن بائت بالفشل
واليكم الكود الخاص بي
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim connection As New OleDbConnection
Dim cmd As New OleDbCommand
cmd.Connection = connection
Try
connection.ConnectionString = ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data/db1.mdb"))
connection.Open()
cmd.CommandText = ("select * from employee where emp_no =@p1 and emp_Password=@p2")
cmd.Parameters.Clear()
cmd.Parameters.AddWithValue("@p1", Txtempno.Text.Trim())
cmd.Parameters.AddWithValue("@p2", Txtpassword.Text.Trim())
Dim dr As Data.OleDb.OleDbDataReader = cmd.ExecuteReader
dr.Read()
If dr.HasRows Then
Session("emp_no") = Trim(dr("emp_no"))
Session("emp_name") = Trim(dr.Item("emp_name"))
Response.Redirect("ProbSum.aspx")
Else
Label1.Text = "تأكد من اسم المستخدم وكلمة المرور"
End If
dr.Close()
connection.Close()
Catch ex As Exception
Label1.Text = ex.Message
End Try