+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مشـلكة التاريخ (/showthread.php?tid=13429)
الصفحات:
1
2
مشـلكة التاريخ - adel27 - 04-10-15
السـلام عليكم ورحمة الله وبركاته
عندي مجموعه من التكست بكس خاص بقيم ومن ضمن هذه التكست بكس 2 تكست بكس مخصصها لتاريخ
وضعت كود إذا في حال إذا لم يدخل أي قيمه إلا في تكست بكس الأسم فقط فأحفظ البيانات
طبعاً يعطيني خطأ إذا ما حفظت التاريخ فقط يعني الكود ماشي تمام مع بقية التكست بكسماعاد تكستين التاريخ ما قبلها يعطيني خطأ فشـل في تحويل DATA TIME إلى STRING ..؟
بالاضافه إلى التاريخ كيف أخليها هجري في قاعدة البيانات
RE: مشـلكة التاريخ - مهموم - 04-10-15
السلام عليكم ورحمة الله
اخي عادل
استخدم أداة DateTimePicker فهي أفضل من TextBox لتلافي الأخطاء
RE: مشـلكة التاريخ - hassan - 04-10-15
نفس كلام اخوي مهموم
RE: مشـلكة التاريخ - adel27 - 04-10-15
أشكركم على المرور
طيب السؤال الكود لما أكتبه في جمله أنسيرت أو أبديت أو ديليت
DateTimePicker.value
ro
DateTimePicker.text
مع العلم أني لما أستخدم هذه الأداه يظهر التاريخ بالعربي ولكن إذا تم تسجيل القيمه وحفظت في الأسكيول سيرفر قاعدة البيانات ألاقيها ميلادي ..؟
RE: مشـلكة التاريخ - مهموم - 04-10-15
السلام عليكم ورحمة الله
استخدم للتاريخ مع الوقت DateTimePicker1.Value وللتاريخ فقط DateTimePicker1.Value.Date
لكن استخدمها مع Parameters وليس مباشرة في ال Query
التاريخ في قاعدة البيانات يحغظ بالميلادي ويجب أن يكون نوع العمود Date أو DateTime.
أما ظهور التاريخ بالشكل العربي فهذا بناء على الإعدادات الإقليمية لنظام التشغيل لديك.
والأداة DateTimePicker مهمتها التحويل بما يتوافق مع الإعدادت الاقليمية لنظام التشغيل.
RE: مشـلكة التاريخ - adel27 - 04-10-15
عليكم السـلام ورحمة الله
منور أخوي مهموم وأسأل الله أن يفرج همك
التاريخ عندي هجري في الجهاز
ولكن إذا سمحت توضح لي برمتر وكوريري ..؟
لأني مدري وش هي
RE: مشـلكة التاريخ - مهموم - 05-10-15
السلام عليكم ورحمة الله
جزاك الله خير أخي عادل
ال Query هو نص الأمر CommandText الذي تكتب فيه مثل Insert أو Select أو Update او Delete ألخ..
ال Parameters يستخدم لإضافة المعلمات إلى CommandText وهي أأمن من حيث وضع البيانات في ال Query
وهذا مثال:
PHP كود :
Try
Dim query As String = "Insert Into [table]([colName], [colDate]) Values(@name, @date)"
Dim commandInsert As New SqlCommand(query, sqlConnection)
commandInsert.Parameters.AddWithValue("@name", TextBox1.Text)
commandInsert.Parameters.AddWithValue("@date", DateTimePicker1.Value.Date)
If sqlConnection.State <> ConnectionState.Open Then sqlConnection.Open()
Dim ret As Integer = commandInsert.ExecuteNonQuery
sqlConnection.Close()
If ret > 0 Then MessageBox.Show("تم الحفظ")
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
RE: مشـلكة التاريخ - adel27 - 05-10-15
ألف شكر يا غالي أشكرك من أعماق قلبي
RE: مشـلكة التاريخ - adel27 - 05-10-15
لو كنت أبي أسوي كلير بعد عملية الحفظ
TEXTBOX1.CLER
التاريخ كيف أسوي له كلير أو أعادة ضبط
RE: مشـلكة التاريخ - مهموم - 05-10-15
السلام عليكم ورحمة الله
أخي عادل أسأل الله أن يحفظ لك قلبك من كل سوء
إعادة ضبط التاريخ تكون بإعادته لتاريخ اليوم الحالي بالأمر
PHP كود :
DateTimePicker1.ResetText()
وللتأكد من ضبط التاريخ تأكد من أن التاريخ ليس تاريخ اليوم مثل
PHP كود :
If DateTimePicker1.Value.Date <> Today.Date Then
MessageBox.Show("يجب ضبط التاريخ")
Return
End If
وإذا كان تاريخ ميلاد مثلا فيستحسن فحص السنة أن تكون قبل 15 سنة على سبيل المثال
PHP كود :
If DateTimePicker1.Value.Date.Year > (Today.Date.Year - 15) Then
MessageBox.Show("يجب ضبط تاريخ الميلاد")
Return
End If