منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اين الخطا في هذا الكود - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=20297)

الصفحات: 1 2


اين الخطا في هذا الكود - rabeh.ram - 08-05-17

كود :
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
           Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='DateTimePicker1.Value.Date'", con)
           Dim dt As New DataTable
           da.Fill(dt)
           DataGridView1.DataSource = dt
 المشكل عندي بعد الشرط WHERE  والتعامل مع DateTimePicker


RE: اين الخطا في هذا الكود - rabeh.ram - 08-05-17

المشكل مازال قائما اخي وهذا ما يظهر عند التشغيل 




RE: اين الخطا في هذا الكود - mansoor - 08-05-17

هل تستعلم بواسطة هو بروسيديور Procedure؟
الصورة التي وضعتها مقصوصة بشكل غير مفيد


RE: اين الخطا في هذا الكود - rabeh.ram - 08-05-17

(08-05-17, 11:49 PM)mansoor كتب : هل تستعلم بواسطة هو بروسيديور Procedure؟
الصورة التي وضعتها مقصوصة بشكل غير مفيد

انا استعمل استعلام عادي على حقل من نوع تاريخ و التاريخ المستعلم عنه يكون اكبر من التاريخ المحدد على DateTimePicker1 كما هو مبين في الكود الذي وضعته سالفا


RE: اين الخطا في هذا الكود - محمود بكرى - 09-05-17

اخي الغالي المشكلة هى قد تكون فى امرين
او لا وضح التاريخ بين علامتي ##
ثانيا : قد تكون فى تنسيق التاريخ حيث يختلف باختلاف تنسيق الويندوز وذلك حسب اعتقادي


RE: اين الخطا في هذا الكود - rabeh.ram - 09-05-17

(09-05-17, 01:24 AM)محمود بكرى كتب : اخي الغالي المشكلة هى قد تكون فى امرين
او لا وضح التاريخ بين علامتي ##
ثانيا : قد تكون فى تنسيق التاريخ حيث يختلف باختلاف تنسيق الويندوز وذلك حسب اعتقادي

شكرا لك اخي محمود على ردك لكن المشكل لم يحل بعد باتنتظار المزيد من اقترحاتك انت وباقي الاعضاء


RE: اين الخطا في هذا الكود - rabeh.ram - 09-05-17

باتنتظار المزيد من الاقترحات


RE: اين الخطا في هذا الكود - rabeh.ram - 09-05-17

الصورة في الاسفل توضح المطلوب اكثر




RE: اين الخطا في هذا الكود - جميل علي - 09-05-17

PHP كود :
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
 
       Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='" DateTimePicker1.Value.Date "'"con)
 
       Dim dt As New DataTable
        da
.Fill(dt)
 
       DataGridView1.DataSource dt 
شوف كذا

أو
PHP كود :
  Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
 
       Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='" DateTimePicker1.Value "'"con)
 
       Dim dt As New DataTable
        da
.Fill(dt)
 
       DataGridView1.DataSource dt 



RE: اين الخطا في هذا الكود - rabeh.ram - 09-05-17

(09-05-17, 12:35 PM)جميل علي كتب :
PHP كود :
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
 
       Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='" DateTimePicker1.Value.Date "'"con)
 
       Dim dt As New DataTable
        da
.Fill(dt)
 
       DataGridView1.DataSource dt 
شوف كذا

أو
PHP كود :
  Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
 
       Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='" DateTimePicker1.Value "'"con)
 
       Dim dt As New DataTable
        da
.Fill(dt)
 
       DataGridView1.DataSource dt 

كلا الكودين لم يحلا المشكل شكرا لك اخي على مجهمودك الرائع