log in

الفكرة أنك تستقبل المعلومات المرسلة لك من Form ( أكيد أنك في الـ Form حددت الكائن الذي سيعالج هذه المعلومات ) ،

فمثلاً ستسقبل username و pass ..

استعلم عن طريق SQL ، بجملة استعلام مثل :

select u.* from user u where username = $username and password = $password

إذا كان المستخدم موجود ، خزن معلوماته في كائن اسمه مثلاً session|، وإذا لم يكن موجود .. اعرض له رسالة خطأ ... في Classes اللي رح تستخدمها عشان تتصل بقاعدة البيانات .. فيه method رح تعطيك عدد الصفوف المرتجعة من قاعدة البييانات .. إذا كان عدد الصفوف == صفر ، فهذا يعني لا يوجد شخص مسجّل بهذا الاسم ،

كل مرة تحتاج أن تتأكد أن المستخدم عمل Login ، شيّك على الكائن session ، لتتأكد أن المستخدم موجود أو غير موجود .

انا مش فاهم تقصد اية بكائن وهل تقصد بال method ال bindingcontext

انا عرفت اعملها بطريقة تانية

متشكر جدا ليك

السلام عليكم

أنا أستخدم stored Procedure وهي طريقة سهلة وأجربها منذ زمن ....

 If DataAccess.IsValidUser(TxtUserName.Text, TxtPassword.Text) Then
            Dim m As New FrmMain()
me.hide ()     
            m.Show()
            Me.close()
        Else
            MessageBox.Show("خطأ في اسم المستخدم او كلمة المرور", "الأرشيف الإلكتروني ", MessageBoxButtons.OK, MessageBoxIcon.[Error])
        End If

وهي كلا س الخاص بنا واسمه DataAccess

Public Shared Function IsValidUser(ByVal UserName As String, ByVal Password As String) As Boolean
        Try
            Dim DA As New SqlDataAdapter("IsValidUser", conn)
            DA.SelectCommand.CommandType = CommandType.StoredProcedure
            DA.SelectCommand.Parameters.AddWithValue("@UserName", UserName)
            DA.SelectCommand.Parameters.AddWithValue("@Password", getMd5Hash(Password))
            Dim DT As New DataTable()
            conn.Open()
            DA.Fill(DT)

            Return DT.Rows.Count > 0
        Catch ex As Exception
            conn.Close()
            MsgBox(ex.Message)
        Finally
            conn.Close()
        End Try
    End Function

طبعا هي stored procedure

CREATE PROCEDURE [dbo].[IsValidUser]
(
	@UserName	nvarchar(50),
	@Password	nvarchar(50)
)
as
	select * from users where username=@username and password=@password

مشكور أخي خليل ...

نتمنى عرض الموضوع في صفحة منفصلة