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

لدي مشكلة في الكود التالي ، بعد أن اعمل إعادة بحث مرة أخرى ، او إذا كان الاسم المراد البحث عنه غير موجود تخرج لي الخطأ التالي في الصورة

الكود كامل للتعديل عليه


كود :
Conn.Open()
       Dim dataad As New OleDbDataAdapter("SELECT * FROM HadiData where f2 LIKE  '" & TextBox1.Text & "%'", Conn)
       DataSet1.Clear()
       dataad.Fill(DataSet1, "HadiData")
       Conn.Close()
       DataGridView1.DataSource = DataSet1
       DataGridView1.DataMember = "HadiData"
       If Trim(TextBox1.Text) = "" Then
           Conn.Open()
           Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
           DataSet1.Clear()
           DataAdapter1.Fill(DataSet1, "HadiData")
           Conn.Close()
       End If
       dataad = New OleDb.OleDbDataAdapter("select * from Photo where idcard=" & TextBox6.Text & " ", Conn)
       DataSet1 = New DataSet
       dataad.Fill(DataSet1)

       If DataSet1.Tables(0).Rows.Count <> 0 Then
           PictureBox1.DataBindings.Clear() : PictureBox3.DataBindings.Add("Image", DataSet1.Tables(0), "idphoto", True)
       End If
       If TextBox3.Text = "" Then
           MsgBox("       لايـوجد نتائج لعملية بحثك ")
           TextBox1.Focus()
       End If


اللهم ارحم من أسس هذا المنتدى (اباليث) و أجعل كل علم نافع تعلمناه في هذا المنتدى أجر له و صدقة تنفعه في قبره
الرد }}}
تم الشكر بواسطة:
#2
لو وضعت مشروعك لحصلت على طريقة سهلة ومفهومة
الرد }}}
تم الشكر بواسطة: سعود
#3
المشروع شبه خاص و لا أستطيع ان احذف البيانات و التعديلات على الفورم

المشكلة واضحة في الكود ، ارجوا من الاخوان الافاضل مراجعة الكود
اللهم ارحم من أسس هذا المنتدى (اباليث) و أجعل كل علم نافع تعلمناه في هذا المنتدى أجر له و صدقة تنفعه في قبره
الرد }}}
تم الشكر بواسطة:
#4
تأكد من جميلة الأستعلام الثانيه        " ' &   & ' "

أكتبها كذا 
الحاجه الأخرى قبل أستخدام Dateset 
حاول تكتب السطر هذا DS=new DateSet
الرد }}}
تم الشكر بواسطة:
#5
(08-09-17, 06:32 AM)Amjad كتب : اخ طلال ارجو المساعدة..
صمم مشروعا واحفظهً باسم "سلسلة"
احفظ النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة "
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.
اضف زر اوامر بعنوان سلسلة وبالنقر عليه يتم حساب مجموع عدد حدود من السلسلة يتم ادخالها عن طريق لوحة المفاتيح .
(!7/S=x+(x³/3!)+(x^5/5!)+(x^7
ضروري ولك الشكر

صمم مشروعا واحفظهً باسم "سلسلة"
احفظ النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة " 
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.


هاذي بسويها لك الباقي معرف والله
الرد }}}
تم الشكر بواسطة:
#6
هلا يابو وسم ،، اعتقد والله العالم اسم الحقل غير موجود في الجدول .

تاكد او راسلني ونشوفه سوا اذا حبيت .
الرد }}}
تم الشكر بواسطة:
#7
[quote pid='105305' dateline='1504839023']
صمم مشروعا واحفظهً باسم "سلسلة"
احفظ النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة " 
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.
هاذي بسويها لك الباقي معرف والله
[/quote]
اخ طلال مو مشكلة زكاتك اكتبلي الكود

ابو وسم لو تكرمت..
ضروري لو سمحتم 
السؤال..
صمم مشروعا واحفظهً باسم "سلسلة"
النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة " 
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.
اضف زر اوامر بعنوان سلسلة وبالنقر عليه يتم حساب مجموع عدد حدود من السلسلة يتم ادخالها عن طريق لوحة المفاتيح .
(!S=x+(x³/3!)+(x^5/5!)+(x^7/7

شرح السلسلة..
مجموع(x قوة 2n+1 )/ (2n+1) ) 
حدود المجموع من n=1 الى n=7
الرد }}}
تم الشكر بواسطة:
#8
(07-09-17, 09:28 AM)أبووسم كتب : المشروع شبه خاص و لا أستطيع ان احذف البيانات و التعديلات على الفورم

ليس بالضروري تضع نفس المشروع
اعمل مشروع جديد شبيه بالفكرة

مثل ما ذكر أحد الأخوة نريد نعرف كيف شغلك في المشروع عشان نعرف طريقتك ويتم توجيهك للطريقة الصحيحة لا أكثر
الرد }}}
تم الشكر بواسطة: أبووسم
#9
ابو وسم...لو تكرمت تشوفلي سؤالي ضروري

او الاخت علا..
ولكم جزيل الشكر...
عندي امتحان بالجامعة
الرد }}}
تم الشكر بواسطة:
#10
شكرا للجميع و سوف اعمل مشروع مشابه له
اللهم ارحم من أسس هذا المنتدى (اباليث) و أجعل كل علم نافع تعلمناه في هذا المنتدى أجر له و صدقة تنفعه في قبره
الرد }}}
تم الشكر بواسطة:



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


يقوم بقرائة الموضوع: