تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
(سؤال؟)كود اضافة التاريخ في قاعدة البيانات
#1
بسم الله الرحمن الرحيم 
اريد كود اضافة التاريخ في قاعدة البيانات 
انا كتبت هذا الكود ولكن لم يتم الاضافة .. هل يوجد خطأ في الكود ؟
كود :
Private Sub Button15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button15.Click
       ''datt.Text = DateTimePicker1.Text
       If (TextBox2.Text = "" Or TextBox4.Text = "" Or RichTextBox1.Text = "") Then
           MsgBox(" ?↔?اكمل بياناتك")
       Else
           tafel1 = 1
           Try
               con.Open()
               com.Connection = con
               com.CommandText = "insert into sect1 (sect_numb,sect_name,data_sect,tafell,data_tafell,nots) values ( " & TextBox2.Text & ",'" & TextBox4.Text & "', " & DateTimePicker1.Text & " ," & tafel1.ToString & ", " & DateTimePicker2.Text & " ,'" & RichTextBox1.Text & "')"
               ' com.CommandText = "insert into sect1 values(" & TextBox2.Text & ",'" & TextBox4.Text & "','" & DateTimePicker1.ToString & "'," & tafel1 & ",'" & DateTimePicker2.ToString & "','" & RichTextBox1.Text & "')"
               com.ExecuteNonQuery()
               MsgBox("تم التسجيل بنجاح")

               ds.Reset()
               Dim sql4 As String = "select *from sect1 "
               Dim da As New SqlDataAdapter(sql4, con)
               da.Fill(ds, "sect1")
               DataGridView1.DataSource = ds.Tables(0)
           Catch ex As Exception
               MsgBox(ex.Message)
               MsgBox("لم يتم التسجيل")
           Finally
               con.Close()
           End Try
       End If
   End Sub
الرد }}}
تم الشكر بواسطة:
#2
تم التعديل في هذا الجزء
مع بعض الترتيب
جرب الان
كود :
com.Connection = con
               com.CommandType = CommandType.Text
               com.CommandText = "insert into sect1 (sect_numb,sect_name,data_sect,tafell,data_tafell,nots) values ( '" & TextBox2.Text &
                   "','" & TextBox4.Text &
                   "','" & DateTimePicker1.Value &
                   "','" & tafel1.ToString &
                   "','" & DateTimePicker2.Value &
                   "','" & RichTextBox1.Text & "')"
               com.ExecuteNonQuery()
الرد }}}
تم الشكر بواسطة: elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن تعلم لغة جديدة محمد حمد 2023 1 32 25-03-24, 03:14 PM
آخر رد: Taha Okla
  [سؤال] عدم إظهار الصور مع النص فى Listview من قاعدة البيانات alims 2 1,581 27-08-23, 12:22 PM
آخر رد: رضوان الجماعي
  *[- تم الحل -]* ما هو كود اضافة ميزة المفتاح الاساسي لعمود ترقيم تلقائي موجود سعود 2 498 27-05-23, 01:44 AM
آخر رد: سعود
  [نقاش] مشاركة قاعدة بيانات SQL على شبكه داخليه morkoskhalaf 3 3,009 06-01-23, 03:20 AM
آخر رد: عبدالكريم برشدان
  قاعدة بيانات xml djelloul 3 2,799 07-11-22, 10:27 PM
آخر رد: Am7
  تغير التاريخ من ميلادي الى تقويم أم القرى aftfm 0 827 19-08-22, 03:48 AM
آخر رد: aftfm
  سؤال في جملة select top() bassant 1 1,317 24-05-22, 06:52 PM
آخر رد: سعود
  استفسار عن تخزين الوقت في قاعدة البيانات strongriseman 2 1,126 22-04-22, 07:27 PM
آخر رد: strongriseman
  [سؤال] مشكلة فى عرض الصورة من ادخل قاعدة البيانات alims 2 1,264 17-11-21, 10:09 AM
آخر رد: سعود
  استعلام يرجع اسماء الاعمدة و نوع البيانات في جدول معين بسام محمدغانم 0 964 23-10-21, 01:43 AM
آخر رد: بسام محمدغانم

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


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