تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
التاريخ المدخل الى قاعدة البيانات
#1
ازاى اخلى التاريخ ائلى داخل على الداتا بيس يبقا يوم وشهر وسنة بس مش عايز الساعة علشان بيظهر عندى كدا
25/11/2013 7.38 انا مش عايز الساعة ديه
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

في البداية.. يجب أن يكون نوع الحقل في قاعدة البيانات هو: 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
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#3
حيث أن Con هو كائن الاتصال بقاعدة البيانات وهو بالشكل التالي (كمثال):
قم بإنشاء Module وسمّها functions واكتب فيها:
كود :
Imports System.Data.OleDb

Module functions
    Public Con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Application.StartupPath & "\DATABASENAME.mdb")
End Module
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#4
أو بإمكانك جلب التاريخ المسجل بالكمبيوتر مباشرة عن طريق تعديل الكود السابق إلى:
كود :
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]Now.Date[/color])

                .ExecuteNonQuery()
                .Dispose()
            End With
            Con.Close()
        Else
            With SaveHeadCMD
                .Connection = Con
                .CommandType = CommandType.Text
                .CommandText = SaveHeadSQL

                .Parameters.AddWithValue("TheDate", [color=#FF0000]Now.Date[/color])

                .ExecuteNonQuery()
                .Dispose()
            End With
            Con.Close()
        End If
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#5
وهذا مثال على طريقة تخزين التاريخ لعيونك: انظر للمرفقات
[ATTACH]3041[/ATTACH]


الملفات المرفقة
.zip   saveDate.zip (الحجم : 85.04 ك ب / التحميلات : 32)
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#6
الف شكر للاستاذ ابو بكر على المجهود وسرعة الر
الرد }}}}
تم الشكر بواسطة:
#7
الشكر لله..
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#8
انظر للمثال المرفق وتجد به الطريقة كاملة بإذن الله.
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#9
قمت على عجل بتصميم برنامج بسيط للعمليات الأربعة على قاعدة البيانات وهي الاضافة والتعديل والبحث والحذف.

انظر للمرفقات، أتمنى لك التوفيق.

[ATTACH]3044[/ATTACH]


الملفات المرفقة
.zip   saveDate.zip (الحجم : 110.41 ك ب / التحميلات : 25)
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  البحث في قاعدة بيانات اكسس hatem555 6 135 22-05-17, 02:53 AM
آخر رد: hatem555
  باستخراج من قاعدة البيانات بشرط listbox items rabeh.ram 0 72 19-05-17, 01:56 PM
آخر رد: rabeh.ram
  منع تعديل التاريخ والوقت ريم النهاري 7 149 18-05-17, 09:28 AM
آخر رد: ريم النهاري
  استيراد البيانات من الاكسيل salah mansour 1 55 18-05-17, 06:28 AM
آخر رد: khaled12345
  [SQL] التاريخ في البرنامج العواد الصغير 7 189 14-05-17, 06:17 PM
آخر رد: العواد الصغير
  قاعدة البيانات تاكل التحديثات rabeh.ram 7 130 14-05-17, 11:01 AM
آخر رد: rabeh.ram
  [سؤال] كيفية حفظ صورة بصيغة pdf الى قاعدة البيانات مصطفى_ظيمة 17 279 13-05-17, 01:06 PM
آخر رد: مصطفى_ظيمة
  مساعده في قاعدة بيانات بالفيجوال a_abdullah 9 284 11-05-17, 11:54 AM
آخر رد: khaled12345
  [سؤال] ممكن طريقة اضافة سنوات في التاريخ Abdulaziz Hazazi 2 89 06-05-17, 09:59 PM
آخر رد: أسامة السالمي
  عند استدعاء تقرير يطلب مني كلمة السر لقاعدة البيانات samawi 3 109 05-05-17, 10:24 PM
آخر رد: samawi

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


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