منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : اين الخطا في هذا الكود
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
كود :
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
المشكل مازال قائما اخي وهذا ما يظهر عند التشغيل 

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

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

شكرا لك اخي محمود على ردك لكن المشكل لم يحل بعد باتنتظار المزيد من اقترحاتك انت وباقي الاعضاء
باتنتظار المزيد من الاقترحات
الصورة في الاسفل توضح المطلوب اكثر

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 
(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 

كلا الكودين لم يحلا المشكل شكرا لك اخي على مجهمودك الرائع
الصفحات : 1 2