تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عمل كود لاسم المستخدم وكلمه المرور وتغير كلمه المرور فيجوال بيسك وربطها بقاعدة sql
#1
السلام عليكم ....
لدي فورم لاسم المستخدم وكلمه المرور 
وفورم اخري لتغيير اسم المستخدم وكلمه المرور 
ولدي تلاتة مستخدمين احد منهم ادمن يسمح له بتغير الاسم وكلمه المرور  والأخرين مستخدمين ولايمكن لهم تغير 
اريد معرفة كيفية ربط بقاعدة البيانات 
وفي مشكلة في  ConnectionString.
 da.Fill(ds)  
-----------------------------------------------------------
 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        'هذه جملة فتح الاتصال مع قاعد البيانات 


        Dim cn As New SqlConnection("Data Source=USER-MSI;Initial Catalog=DBArsfa;Integrated Security=True")
        Try
            cn.Open()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
 End Sub
-------------------------------------------------------------------------------------------------------------------------------------------------------
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
 If TextBox1.Text = "" Then
            MessageBox.Show("ادخل اسم المستخدم")
            Return
        End If
        If TextBox2.Text = Nothing Then
            MessageBox.Show("ادخل الرقم السري ")
            Return
        End If
        ' Dim cn As New SqlConnection
        dt = New DataTable
        Dim ds As New DataSet
        ' da = New SqlDataAdapter
        Dim cn As New SqlConnection
        da = New SqlDataAdapter(" Select * User Where User_name= N'" & TextBox1.Text & "'And pasword = N'" & TextBox2.Text & "'", cn)

        da.Fill(ds)
  'اذا كان عدد صفوف اكبر من الصفر
        If ds.Tables(0).Rows.Count <> 0 Then
            cn.Open()
            Form9.Show()
        ElseIf ds.Tables(0).Rows.Count <> 1 Then

            Form3.Show()
        ElseIf ds.Tables(0).Rows.Count <> 2 Then

            Form2.Show()
        Else

        
    MessageBox.Show("login filed ")
 cn.Close()
        End If
 End Sub

ارجو مساعدة لان ماعرفت اربط بقاعدة البيانات وتلخبطت عندي المفهوم
الرد
تم الشكر بواسطة:
#2
وعليكم السلام...
يرجى الاطلاع على المرفقات, سيوفر الكثير + إعطاء أفكار.


الملفات المرفقة
.zip   المستوصف.zip (الحجم : 813.61 ك ب / التحميلات : 29)
 الذي يدعي ان لغته هي افضل لغة برمجة، فاعلم انه مستخدم وليس مبرمج.
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Photo [VB.NET] مشكلة عند ربط اكسس به دوال اجرائية بالفيجوال بيسك هيثم_هيثم 3 212 21-11-20, 12:44 PM
آخر رد: Anas Mahmoud
  ما الفرق بين لغة Java و الفيجوال بيسك؟ Hazem1 1 78 20-11-20, 11:54 PM
آخر رد: اسامه الهرماوي
  كود تعديل البيانات فيجوال بيسك وقاعدة بيانات sql server برحوت 0 133 08-11-20, 12:17 AM
آخر رد: برحوت
  هل استطيع الاتصال بقاعدة بيانات Access موجودة على سيرفر خارجي mohamedgadain61 4 212 05-11-20, 05:24 PM
آخر رد: kiki
  [VB.NET] برنامج اقساط على الفجوال بيسك 2010 وقاعده بيانات سيكوال سيرفر 2008 shawky ahmed 2 384 31-10-20, 06:03 PM
آخر رد: kebboud
  [VB.NET] هل هناك مشغلات تعمل علي فيجوال بيسك غير vlc & media player` ميدو الفنان 6 276 30-10-20, 07:01 PM
آخر رد: ميدو الفنان
  تحميل اي فيجوال بيسك على الجوال Aroosealba7r 0 153 21-10-20, 01:48 PM
آخر رد: Aroosealba7r
  [سؤال] عند تشغيل برنامج في ريسورس فيجوال بسك بظهر خطا jam3h 0 181 17-10-20, 11:35 PM
آخر رد: jam3h
  [سؤال] ممكن كود فيجوال بيسك عند تشغيل ملف دفعي bat عند انتهاء من الامر jam3h 0 171 17-10-20, 04:37 PM
آخر رد: jam3h
  [سؤال] ممكن كود فيجوال بيسك نقل ملف وحذف ملف واستبدال ملف والكتابه على ملف jam3h 1 239 14-10-20, 07:17 PM
آخر رد: abdou

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم