21-02-20, 04:45 PM
(21-02-20, 02:38 PM)العيدروس كتب : السلام عليكم
تتبعت دورة من المنتدي و حاولت حفظ التاريخ بهذه الصيغة و ما وصلت للحل
كيف اخواني احفظ التاريخ هكذا yyyy-MM-dd بدون الوقت بارك الله فيكم
هذا الكود الذي استعملته و اريخ حفظ حقل التاريخ و هو من نوع تاريخ
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
insert_new_row(Me.TextBox1.Text, Me.TextBox2.Text)
End Sub
Public Sub insert_new_row(ByVal id As Int32, ByVal datebirth As Date)
Dim Cmd As New OleDbCommand
With Cmd
Cmd.Connection = Conne
Cmd.CommandType = CommandType.Text
Cmd.CommandText = "insert into table1 ( field_id , field_birth ) values ( @field_id , @field_birth )"
Cmd.Parameters.Clear()
Cmd.Parameters.AddWithValue("@field_id", OleDbType.Integer).Value = id
Cmd.Parameters.AddWithValue("@field_birth", OleDbType.Date).Value = datebirth
End With
Try
If Conne.State = 1 Then Conne.Close()
Conne.Open()
Cmd.ExecuteNonQuery()
Conne.Close()
Catch ex As Exception
Conne_2020.Close()
MsgBox(Err.Description, MsgBoxStyle.Information)
Finally
End Try
End Sub
تنسيق شكل التاريخ داخل قاعدة البيانات الاكسس يخص مبرمجي الاكسس فقط.
اذا كنت تعتقد انك لو نسقته داخل الاكسس ستقرأه بالفيجوال بيسيك بنفس التنسيق، فأنت مخطئ.
اذا كنت مصرا على التنسيق داخل الاكسس فضع التنسيق الذي تريده في خصائص الحل "تنسيق" او "Format"

