الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفية التحقق من أسم المستخدم وكلمة المرور المخزنة في قاعدة البيانات

بدأه alhadi_tchnosoft في 10 مارس 2009 · 4 رد · 3,672 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

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

أهلاً ومرحباً .. أهلا بمن أتانا بتحية وسلام يريد الترحيب بأحلى الكلام .. يريد أن نعلن له الأنضمام .. إلى كوكبة أعضائنـا الكرام ،،

أخواني الأعضاء الكرام

حبيت أن أقدم لكم شرح بسيط عن

كيفية التحقق من أسم المستخدم وكلمة المرور المخزنة في قاعدة البيانات

وهذه صورة للنموذج الذي سنطبق عليه الشرح

post-161317-1236713231_thumb.jpg

وسنتعامل مع قاعدة بيانات من نوع أكسس ونسمي

هذه القاعدة بإسمMyDataProject

وتحتوي على جدول باسم USERS

والجدول يحتوي على الحقول التالية:

UserName

UserPass

بعد أن نكون القاعدة والجدول 

نقوم بإدخال 

اسم المستخدم والباسوورد

أدخل البيانات التي تريدها

بعد ذلك قم بإنشاء مشروع

جديد في برنامج

Visual.Net 2005

وصمم النموذج كما هو موضح في الصورة أعلاه 

ونكتب الكود التالي فوق منطقة

Public Class

Imports System.Data
  Imports System.Data.OleDb

وهذا لأننا سنتعامل مع قاعدة بيانات من نوع أكسس

وفي زر الأمر دخــول نكتب الكود التالي:

Dim CONN As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\MyDataProject.mdb)"
    Dim DS As New DataSet
    Dim DB As New OleDbDataAdapter
DS.Clear()
Dim Str As String = "SELECT * FROM USERS WHERE UserName='" & TextBox1.Text & "' and UserPass='" & TextBox2.Text & "'"
DB = New OleDbDataAdapter(Str, CONN)
DB.Fill(DS, "USERS")
If DS.Tables("USERS").Rows.Count > 0 Then
DB.Dispose()
CONN.Dispose()
  MessageBox.Show("مبرووووووك لقد تم تسجيل دخولك للبرنامج", " برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading)
CONN.Dispose()
Else
MessageBox.Show("تأكد من إدخال كلمة السر أو اسم المستخدم بشكل صحيح", "برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading)
End If

وفي زر الأمر خروج نكتب الكود التالي:

 	End

انتهى الشرح أرجو أن أكون أفدتكم 

:blush: :blush: :blush:

 

سَلاَمٌ عَلَى الدُّنْيَـا إِذَا لَمْ يَكُنْ بِـهَا

صَدِيقٌ صَدُوقٌ صَادِقُ الوَعْدِ مُنْصِـفَا

#2

أخي الكريم

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

بارك الله بك علي الشرح الاكثر من رائع

لكن حاول تنظيم واعادة تحرير كتابة الكود فبهذا الشكل لا نستيطيع قراءة الكود اعلاه

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#3

أنا آآآآآآآآآآآآآآآسف جداً أخواني لم ألاحظ الكود للاسف وهذا هو الكود

:blush: :blush:

:S :S :S :S :S :S :S :S :S :S


  Dim DS As New DataSet
  Dim DB As New OleDbDataAdapter
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  On Error Resume Next
  DS.Clear()
  Dim Str As String = "SELECT * FROM USERS WHERE UserName='" & TextBox1.Text & "' and UserPass='" & TextBox2.Text & "'"
  DB = New OleDbDataAdapter(Str, CONN)
  DB.Fill(DS, "USERS")
  If DS.Tables("USERS").Rows.Count > 0 Then
  DB.Dispose()
  CONN.Dispose()
  MessageBox.Show("مبرووووووك لقد تم تسجيل دخولك للبرنامج", " برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading)
  CONN.Dispose()
  Else
  MessageBox.Show("تأكد من إدخال كلمة السر أو اسم المستخدم بشكل صحيح", "برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading)
  Me.TextBox1.Focus()
  End If
Dim CONN As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\MyDataProject.mdb")
  

      
      

      
 
سَلاَمٌ عَلَى الدُّنْيَـا إِذَا لَمْ يَكُنْ بِـهَا
صَدِيقٌ صَدُوقٌ صَادِقُ الوَعْدِ مُنْصِـفَا

    

  

    
    

      
#4
        
        

      
this is by using c#.net 2003 and sql 
dont forget to make 2 buttons one for login and another one for exit       
 SqlConnection con;
        SqlCommand cmd;
        SqlDataReader reader;
        DialogResult dr;
        private void button2_Click(object sender, EventArgs e)
        {
            Application.Exit();
        }
        public void  get_connection()
        {
            try
            {
                con = new SqlConnection();
                con.ConnectionString = "database=Ink_manager";
                //“Data Source=(local);Initial Catalog=ashraftest;user id=sa;password=faisal”;
            }
            catch
            {
                dr = MessageBox.Show(" There is no Connection", "Connection Error", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error);
            }
        }
        public void login_to_DB()
        {
            try
            {
                get_connection();
                cmd = new SqlCommand();
                con.Open();
                cmd.Connection = con;
                cmd.CommandText = "select password from users where user_name=@U";
                cmd.Parameters.Add("@U", textBox1.Text);
                reader = cmd.ExecuteReader();
                if (reader.HasRows == false)
                {
                    MessageBox.Show("Please Enter your Username and Password to Login");
                }
                if (reader.Read())
                {
                    if (textBox2.Text == reader["password"].ToString())
                    {
                        //MessageBox .Show ("yes");
                        main mainfrm = new main();
                        this.Hide();
                        mainfrm.ShowDialog();
                    }
                    else
                    {
                        MessageBox.Show("Invalid Username or Password");
                    }
                }
                con.Close();
            }
            catch
            {
                MessageBox.Show("Error");
            }
        }
        private void button1_Click_1(object sender, System.EventArgs e)
        {
            login_to_DB();
        }
        private void button2_Click_1(object sender, System.EventArgs e)
        {
            Application .Exit();
        }
 

      
      

      
If your actions inspire others to dream more, learn more, do more and become more, you are a leader
Best Regards
Feras Abualrub

    

  

    
    

      
#5
        
        

      
مشكور جدا على الموضوع الجميل

      
      

      
    

  

    
    
    
 مواضيع مشابهة





  

    
عدد الزوار حالياً
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

    
—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

    
جارٍ التحقق من المتواجدين…