ارجوا المساعده في الكود

طيب خلينا نشوف اللي انتي عملتيه عشان نقولك فين الخطأ.

مشكور اخي system down على اهتمامك بموضوعي انا في الحقيقه طبقك الفكره في ال vb.net بس الاستاذ اصر اني اسويها في ال asp.net وبصراحه ما عندي خلفيه كبيرة في ال asp.net سويت التصميم بس ما عرفت اكتب الكود المطلوب على كل حال مشكور

الكود سيكون متشابه جداً.

نفس الطريقة التي إستخدمتيها مع ال VB.NET Windows Application يمكنك إستخدامها مع ال ASP.NET وسأقوم بكتابة دالة ترجع القيمة True إذا تم التحقق من اسم المستخدم أو كلمة المرور ويرجع خطأ في عدم حدوث ذلك

إذا إفترضنا أنك تعملين مع قاعدة بيانات Access واسمها db وموجودة في ال C وبافتراض أن جدول المستخدمين باسم Users ويحتوي علي الحقلين Username و Password

Imports System.Data.OLEDB
Public Class Authentication
Dim Con As New OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=C:\db.mdb")
Public Function Login(ByVal Username As String, ByVal Password As String) As Boolean
        Dim Cmd As New OleDbCommand("Select Count(*) From Users Where(Username='" & Username & "') AND (Password='" & Password & "')", Con)
        Dim ds As New DataSet
        ds.Tables.Add(0)
        Dim Ad As New OleDbDataAdapter(Cmd)
        Ad.Fill(ds.Tables(0))

        If ds.Tables(0).Rows(0).Item(0) = 1 Then
            Return True
        Else
            Return False
        End If
    End Function

عند مناداة هذه الدالة والتي يجب تمرير اسم المستخدم وكلمة المرور لها تقوم بإرجاع True إذا كانت المعلومات صحيحة وخطأ إذا كا هناك خطأ في كلمة المرور أو إسم المستخدم

طريقة مناداة الدالة :

إذا إفترضنا أن الصفحة التي تحتوي علي تسجيل الدخول تحتوي علي TexBox1 يمثل اسم المستخدم و TextBox2 يمثل كلمة المرور وزر Button1 يمثل الزر الخاص بتسجيل الدخول

اكتبي الشفرة التالية في الحدث Button1_Click

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
if Login(TextBox1.Text,TextBox2.Text) then
  Response.Write("Login Success")
Else
 Response.Write("Invalid Username or Password")
End Sub

اخي Ammar Gaffar مشكور شكر جزيل جدا

وبصراحه جربت الكود وكان مفيد جدا وساعدني في عملي

اشكرك للمساعده واتمنى لك كل التوفيق