+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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 = dtRE: اين الخطا في هذا الكود - 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
كلا الكودين لم يحلا المشكل شكرا لك اخي على مجهمودك الرائع