منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] التاريخ في data grid view - نسخة قابلة للطباعة

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

التاريخ في data grid view - fatat - 16-09-13

عندي data grid view في داخله مجموعة خلايا من ضمنها تاريخ
عندما احضر المعلومات من القاعدة ياتي التاريخ على شكل text box in data grid view
ولكن عندما اريد ان اعدل على البيانات يرفض ذلك ويعطيني خطا في جملة التعديل الجملة كالتالي
cmd.CommandText = "UPDATE patient_info SET  name='" & DataGridView1.Rows(gridrow).Cells("P_name").Value & "', adress ='" & DataGridView1.Rows(gridrow).Cells("adress").Value & "',job ='" & DataGridView1.Rows(gridrow).Cells("job").Value & "', age =" & DataGridView1.Rows(gridrow).Cells("age").Value & ",gender=" & DataGridView1.Rows(gridrow).Cells("gender").Value & ", date='" & DataGridView1.Rows(gridrow).Cells("date_treat").Value & "',phone=" & DataGridView1.Rows(gridrow).Cells("tel").Value & ",jawwal=" & DataGridView1.Rows(gridrow).Cells("jawwal").Value & ", email='" & DataGridView1.Rows(gridrow).Cells("email").Value & "'" & " WHERE  id = " & CType(DataGridView1.Rows(gridrow).Cells("id").Value, Integer)
اتوقع ان الخطا في التاريخ حيث انني مخزنه في القاعدة من نوع تاريخ ياريت حد يوضحلي الخطا والحل

RE: التاريخ في data grid view - تركي قرمزلي - 16-09-13

السلام عليكم و رحمة الله و بركاته
جربي التعديل التالي على جملة Update  


cmd.CommandText = "UPDATE patient_info SET  name='" & DataGridView1.Rows(gridrow).Cells("P_name").Value & "', adress ='" & DataGridView1.Rows(gridrow).Cells("adress").Value & "',job ='" & DataGridView1.Rows(gridrow).Cells("job").Value & "', age =" & DataGridView1.Rows(gridrow).Cells("age").Value & ",gender=" & DataGridView1.Rows(gridrow).Cells("gender").Value & ", date='# & DataGridView1.Rows(gridrow).Cells("date_treat").Value & "'#,phone=" & DataGridView1.Rows(gridrow).Cells("tel").Value & ",jawwal=" & DataGridView1.Rows(gridrow).Cells("jawwal").Value & ", email='" & DataGridView1.Rows(gridrow).Cells("email").Value & "'" & " WHERE  id = " & CType(DataGridView1.Rows(gridrow).Cells("id").Value, Integer)


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

RE: التاريخ في data grid view - fatat - 16-09-13

شكرا لك ولكن نفس الخطا بقي

RE: التاريخ في data grid view - تركي قرمزلي - 16-09-13

السلام عليكم و رحمة الله و بركاته
يمكنك إرفاق مشروعك ، و سنحاول المساعدة إن شاء الله تعالى
السلام عليكم و رحمة الله و بركاته


RE: التاريخ في data grid view - العزابي - 16-09-13

اعطيك طريقة بسيطة استخدمها بجميع برامجي وهي . اولا جعل القاعدة حقل نص

ثانيا وضع الكود التالي 

كود :
'وضع التاريخ في خلية القردفيو
    Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        Try
            ' التحقق من أن المستخدم ضغط علي الخلية المطلوب إضافة تاريخ بها وهي الخلية رقم 3 كمثال
            If e.ColumnIndex = 4 Then
                '  Me.DataGridView1.Rows(e.RowIndex).Cells(4).Value = Now.ToString("yyyy/MM/dd")
                Me.DataGridView1.Rows(e.RowIndex).Cells(4).Value = DateAndTime.Now.ToString("yyyy/MM/dd")
                ' Me.DataGridView1.Rows(e.RowIndex).Cells(4).Value = Now.ToShortDateString
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message, "أعد الإدخال", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub

وغير مايلزم ..

الميزة الموجوده بها أنه عند الضغط على الحقل يندرج التاريخ تلقائي في الحقل وتستطيع التعديل كمان



تحياتي

RE: التاريخ في data grid view - hoda299 - 06-09-16

السلام عليكم اقوم بعمل برنامج خاص بشئون الطلبة ويتم تسجيل الغياب للطلاب وقمت باستدعاء الطلاب حسب الصف والفصل بداتا جريد فيو والمفروض ان كل يوم غياب يتم تسجيله بالداتا جريد فيوولكن يظهر الخطا التالى عند التسجيل (SqlDateTime overflow. Must be between 1/1/1753 12:00:00 AM and 12/31/9999 11:59:59 PM.)