18-06-13, 01:33 PM
السلام عليكم
في البداية.. يجب أن يكون نوع الحقل في قاعدة البيانات هو: Short Date.
ثانياً: الكود التالي مثال لطريقة تخزين تاريخ في قاعدة البيانات على النسق الذي تريده:
قم بوضع العنصر DateTimePicker على الـForm وسمّه dtDate
في البداية.. يجب أن يكون نوع الحقل في قاعدة البيانات هو: Short Date.
ثانياً: الكود التالي مثال لطريقة تخزين تاريخ في قاعدة البيانات على النسق الذي تريده:
قم بوضع العنصر DateTimePicker على الـForm وسمّه dtDate
كود :
Dim SaveHeadSQL As String = "INSERT INTO Table (TheDate) VALUES(@TheDate)"
Dim SaveHeadCMD As New OleDbCommand
If Con.State = ConnectionState.Closed Then
Con.Open()
With SaveHeadCMD
.Connection = Con
.CommandType = CommandType.Text
.CommandText = SaveHeadSQL
.Parameters.AddWithValue("TheDate", [color=#FF0000]dtDate.Value.Date[/color])
.ExecuteNonQuery()
.Dispose()
End With
Con.Close()
Else
With SaveHeadCMD
.Connection = Con
.CommandType = CommandType.Text
.CommandText = SaveHeadSQL
.Parameters.AddWithValue("TheDate", [color=#FF0000]dtDate.Value.Date[/color])
.ExecuteNonQuery()
.Dispose()
End With
Con.Close()
End If
