تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] قاعدة البيانات اكسس
#1
السلام عليكم ورحمة الله

ممكن مساعدة من الاخوة في كيفية الاتصال بقاعدة بيانات اكسس

فقد انشئت قاعدة تحتوي على حقلين الاسم و الباسورد

وضعت 2 تكست وزر لادخال

اريد كود كيفية الاتصال بقاعدة البيانات وادخال المعلومات التي ستوضع في تكست 1 و 2 في الحقلين

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

ولكم جزيل الشكر
الرد
تم الشكر بواسطة:
#2
هدا الكود لا يعمل اتصال موجود و لكن لا يضيف القيم في الحقول هل هناك شئ ناقص

كود :
Dim Cnn As New OleDb.OleDbConnection()
        Dim cmdadd As New OleDbCommand

        Cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\othman.mdb"
        Cnn.Open()
        MsgBox("Connection established!")

        cmdadd.CommandText = "INSERT INTO Authors (Name, Password) VALUES (" &
            TextBox1.Text & ", '" & TextBox2.Text & "');"

        Cnn.Close()
الرد
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته

يعنى حضرتك عايز نافذة تكتب فيها الاسم وكلمة السر للدخول للبرنامج صح الكلام
الرد
تم الشكر بواسطة:
#4
ده كود اسم المستخدم ali وكلمة السر 123456

Private Sub Command2_Click()
If Text1.Text = "ALI" And Text2.Text = "123456" Then
Form1.Hide
Form2.Show
Text1.Text = ""
Text2.Text = ""
Else
MsgBox "password worng", vbOKOnly + vbCritical, "worng"
End If
End Sub
الرد
تم الشكر بواسطة:
#5
بعد التسجيل بالاسم والباسورد بتدخل على الفورم رقم 2
الرد
تم الشكر بواسطة:
#6
(17-05-14, 06:38 PM)king2512010 كتب : السلام عليكم ورحمة الله وبركاته

يعنى حضرتك عايز نافذة تكتب فيها الاسم وكلمة السر للدخول للبرنامج صح الكلام

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


اريد القيم التي اضع في تكست بوكس 1 و 2 تدخل لقاعدة البيانات

يعني حقل الاول تكتب فيه قيمة تكست الاول

وثاني قيمة التكست الثاني

وهكدا عندما اريد اضافة من جديد يفعل نفس الشئ ويكتب تحت ما كتب سابقا
الرد
تم الشكر بواسطة:
#7
لا يا اخي الامر ليس كما وضعت فدالك سهل

انا اريد ادخال البيانات الى قاعدة البيانات
الرد
تم الشكر بواسطة:
#8
السلام عليكم

استبدل الكود بهذا الكود:

PHP كود :
Dim Cnn As New OleDb.OleDbConnection()

        Cnn.ConnectionString "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\othman.mdb"
      
        MsgBox
("Connection established!")

Dim cmd as new OleDBCommand("INSERT INTO Authors (Name, Password) VALUES (" &
            TextBox1.Text ", '" TextBox2.Text "');",Cnn)

Cnn.Open()        

cmd
.ExcuteNoneQuery()

        Cnn.Close() 

تحياتي
الرد
تم الشكر بواسطة: king2512010
#9
(17-05-14, 06:49 PM)Sajad كتب : السلام عليكم

استبدل الكود بهذا الكود:

PHP كود :
Dim Cnn As New OleDb.OleDbConnection()

        Cnn.ConnectionString "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\othman.mdb"
      
        MsgBox
("Connection established!")

Dim cmd as new OleDBCommand("INSERT INTO Authors (Name, Password) VALUES (" &
            TextBox1.Text ", '" TextBox2.Text "');",Cnn)

Cnn.Open()        

cmd
.ExcuteNoneQuery()

        Cnn.Close() 

تحياتي


لم ينجح الكود اخي هنا يعطي خطا

cmd.ExecuteNonQuery()
الرد
تم الشكر بواسطة:
#10
لو ممكن كود vb.net
الرد
تم الشكر بواسطة:



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


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