منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ (/showthread.php?tid=19256)



كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ - refaat130 - 15-02-17

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

اخواني الكرام

لو سمحتم

اريد طريقة عمل اسم مستخدم وكلمة مرور لبرنامج ولكن اريد البرنامج يقرأ اسم المستخدم وكلمة المرور من قاعدة بيانات أكسس

شكرا


RE: كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ - مساعدة - 15-02-17

السلام عليكم

عن طريق Add New Item تجد فيها Login Form جاهزة.
وفيها تضع أكواد التحقق عن طريق استعلام، وهذا يعتمد على طريقتك في التعامل مع قاعدة البيانات.


RE: كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ - refaat130 - 16-02-17

(15-02-17, 06:12 PM)مساعدة كتب : السلام عليكم

عن طريق Add New Item تجد فيها Login Form جاهزة.
وفيها تضع أكواد التحقق عن طريق استعلام، وهذا يعتمد على طريقتك في التعامل مع قاعدة البيانات.

شكرا جزيلاً

ممكن شرح أكتر أو أرسال مثال


RE: كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ - احمد مهران - 16-02-17

اعمل form جديد

وضيف فى textbox 2

و Button1

وضيف ده فى Button1

كود :
       If TextBox1.Text = "demo" And TextBox2.Text = "demo" Then
           Me.Hide()
           Form1.Show()
       Else
           MessageBox.Show("sorry login is werong", "wreong!!!")

       End If

الباس و اليوزر  demo
تقدر تغير برحتك



RE: كيفية عمل أسم مستخدم وكلمة مرور لبرنامج؟ - Crazy_Vb.NeT - 25-02-17

وعليكم السلام ، تفضل الكود التالي يقوم بالمطلوب  :

المتطلبات : 
1 Button 
2 Textbox
كود :
Dim da as New OleDb.OleDbDataAdapter
Dim Dt as New DataTable
Dt.Clear()      
da = New OleDb.OleDbDataAdapter("Select * from اسم الجدول where Username = '" & TextBox1.Text & "' and Password = '" & TextBox2.Text & "'", con)
da.Fill(Dtlogin)
If Dt.Rows.Count > 0 Then
Msgbox(" تم الدخول ")
Me.Hide()