تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استفسار عن تخزين الوقت في قاعدة البيانات
#1
السلام عليكم 
وكل عام وانتم بخير  

سؤالي عدي حقلين من نوع تكست يمثلان وقت الحضور والانصراف  
ويظهر الوقت بالطريقة التالية  مثلا   6:13 ص او  4:20 م 
عند الحفظ لقاعدة البيانات تظهر مشكلة وحاولت بكل الطرق بدون فائدة 
استعملت هذا الكود للحفظ  مع العلم استعمل قاعدة بيانات من نوع sqlserver  ونوع الحقل time(7)

Dim CmdInsert As New SqlCommand
        With CmdInsert
            .Connection = Con
            .CommandType = CommandType.Text
            .CommandText = "Insert Into wardya (num , name , time1 , time2 , period , addrate)values( @num ,  @name ,  @time1 ,  @time2 ,  @period ,  @addrate)"
            .Parameters.Clear()
            .Parameters.AddWithValue("@num", SqlDbType.Int).Value = Val(Txtnum.Text)
            .Parameters.AddWithValue("@name", SqlDbType.VarChar).Value = Txtname.Text.Trim
            'Now.ToString("hh:mm tt")
            .Parameters.AddWithValue("@time1", SqlDbType.Date).Value = Format(TextBox3.Text.ToString, "hh:mm tt")
            .Parameters.AddWithValue("@time2", SqlDbType.Date).Value = Format(TextBox4.Text.ToString, "hh:mm tt")
            .Parameters.AddWithValue("@period", SqlDbType.Date).Value = Format(TextBox5.Text.ToString, "hh:mm tt")
            '.Parameters.AddWithValue("@time1", SqlDbType.Date).Value = (TextBox3.Text)
            '.Parameters.AddWithValue("@time2", SqlDbType.Date).Value = (TextBox4.Text)
            '.Parameters.AddWithValue("@period", SqlDbType.Date).Value = (TextBox5.Text)
            .Parameters.AddWithValue("@addrate", SqlDbType.Int).Value = Val(Txtaddrate.Text)
        End With
        Try
            If Con.State = 1 Then Con.Close()
            Con.Open()
            CmdInsert.ExecuteNonQuery()
            Con.Close()
            MsgBox("تم إضافة السجل بنجاح", MsgBoxStyle.Information, "حفظ")
            newnum()

            CmdInsert = Nothing
        Catch ex As Exception
            Con.Close()
            MsgBox(Err.Description, MsgBoxStyle.Information)
        Finally
            If Con.State = ConnectionState.Open Then Con.Close()
        End Try
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته
اخي الكريم
المشكلة اعتقد والله اعلم في تحويل قيم الوقت في مربعات النصوص التي تمثل الوقت صباحا او مساء
يجب تحويل هذه القيم الى الساعة نظام 24 هذا من جانب 
الامر الآخر هو حرفي (م - ص) بالعربي يجب استبدالها بـ (AM - PM)
وبالنسبة للوقت انت اعطيت الباراميتر من نوع تاريخ فقط ويجب استخدام DateTime
قم بالتجربة باستبدال هذه الاسطر الثلاثة   

أذا كانت صباحا ومساء بالعربي في التكست بوكس استخدم هذه السطور
كود :
           .Parameters.AddWithValue("@time1", SqlDbType.DateTime).Value = Convert.ToDateTime(TextBox3.Text.Replace("م", "PM").Replace("ص", "AM")).ToString("HH:mm")
           .Parameters.AddWithValue("@time2", SqlDbType.DateTime).Value = Convert.ToDateTime(TextBox4.Text.Replace("م", "PM").Replace("ص", "AM")).ToString("HH:mm")
           .Parameters.AddWithValue("@period", SqlDbType.DateTime).Value = Convert.ToDateTime(TextBox5.Text.Replace("م", "PM").Replace("ص", "AM")).ToString("HH:mm")
 او هذه اذا كانت AM PM
كود :
           .Parameters.AddWithValue("@time1", SqlDbType.DateTime).Value = Convert.ToDateTime(TextBox3.Text).ToString("HH:mm")
           .Parameters.AddWithValue("@time2", SqlDbType.DateTime).Value = Convert.ToDateTime(TextBox4.Text).ToString("HH:mm")
           .Parameters.AddWithValue("@period", SqlDbType.DateTime).Value = Convert.ToDateTime(TextBox5.Text).ToString("HH:mm")
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة:
#3
اشكرك من كل قلبي
ساجرب
الرد
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار عن استعلام في دالة INSTR غدير الصليحي 0 432 14-12-21, 02:22 PM
آخر رد: غدير الصليحي
  استفسار عن استعلام في اوراكل مهم اليوم معي اختبار لغدا غدير الصليحي 4 531 14-12-21, 12:42 PM
آخر رد: غدير الصليحي
  [سؤال] مشكلة فى عرض الصورة من ادخل قاعدة البيانات alims 2 536 17-11-21, 10:09 AM
آخر رد: سعود
  استعلام يرجع اسماء الاعمدة و نوع البيانات في جدول معين بسام محمدغانم 0 374 23-10-21, 01:43 AM
آخر رد: بسام محمدغانم
  مشكلة ظهور بياانات حقلين في قاعدة بيانات على شكل علامة استفهام bassant 5 682 17-10-21, 02:07 PM
آخر رد: abubasilIraq
  تحويل multiline text الى single line في عمود في قاعدة بيانات sql server bassant 0 446 07-09-21, 04:36 PM
آخر رد: bassant
  الحفظ فى قاعدة البيانات اسلام الكبابى 10 1,267 06-09-21, 06:52 PM
آخر رد: اسلام الكبابى
  [Acces2010] عمل قاعدة بيانات لنظام غيابات الطلبة hassan karim 1 971 31-08-21, 04:47 AM
آخر رد: a7med saba
  [سؤال] كيفية الوصول الى قاعدة بيانات mysql موجودة على الكمبيوتر المحلي xammp عن طريق النت alfaiz678 4 1,141 25-06-21, 09:46 AM
آخر رد: alfaiz678
  طريقة أضافة اكثر من سيرفر على نفس قاعدة البيانات alim54 0 580 20-06-21, 11:20 PM
آخر رد: alim54

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


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