الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

[مخالف]المساعده في كود بحث من القاعده

مغلق
بدأه دمعة الم1 في 2 أكتوبر 2011 · 8 رد · 673 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

ان عندي مشروع عباره عن قاعدة بيانات من جدول واحد

طبعا انا استخدم vb2008 واكسس 2003

استخدمت طريقة الربط بالاكواد

Dim strconn As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=" & Application.StartupPath & "\abdb.mdb"
    Dim conn As New OleDbConnection(strconn)

ارجو مساعدتي في كود يبحث عن ما يتم وضعه في مربع النص الخاص بالبحث

حيث ان الفورم يعرض جميع بيانات الجدول في مربعات نصوص

الله يجزاكم خير

تم تعديل هذه المشاركة بواسطة دمعة الم1 في 2 أكتوبر 2011 في 15:16

#2

السلام عليكم ورحمه الله وبركاته

اختي جربي الكود التالي

Dim conn As New OleDbConnection("ConnectionString")
Dim cmd As New OleDbCommand("Select * From TableName Where ColumnName=?",conn)
cmd.Parameters.AddWithValue("ColumnName",txtSerach.Text)
conn.Open()
Dim dr As OleDbDataReader= cmd.ExecuteReader()
If dr.Read() Then
txtColumn1.Text=dr("Column1")
txtColumn2.Text=dr("Column2")
'Do the same for other columns
End If
conn.Close()

تم تعديل هذه المشاركة بواسطة VB Helper في 2 أكتوبر 2011 في 19:13

.:: Wish to become better and better ::.

#3

اشكرك اخي على المساعده

لكن عندما جربت الكود ظهر مربع خطا عنوانه

OleDb Exceptions was unhandled

Syntax error (missing operator) in query expression 'Well No='S-60''

تم تعديل هذه المشاركة بواسطة دمعة الم1 في 3 أكتوبر 2011 في 01:53

#4

السلام عليكم ورحمه الله وبركاته

اختي جربي الكود التالي

Dim conn As New OleDbConnection("ConnectionString")
Dim cmd As New OleDbCommand("Select * From TableName Where ColumnName='" + txtSerach.Text + "'",conn)
conn.Open()
Dim dr As OleDbDataReader= cmd.ExecuteReader()
If dr.Read() Then
txtColumn1.Text=dr("Column1")
txtColumn2.Text=dr("Column2")
'Do the same for other columns
End If
conn.Close()

.:: Wish to become better and better ::.

#5

اشكرك اخي

لكن طلع لي نفس الخطا

في السطر Dim dr As OleDbDataReader= cmd.ExecuteReader()

#6

السلام عليكم ورحمه الله وبركاته

اختي ممكن تقولي لي ايش نوع الحقل المراد البحث فيه؟

.:: Wish to become better and better ::.

#7

اريد الاستعلام عن بيانات العمود بعنوان Well No

بياناته كالتالي

مثال ABC-234

تم تعديل هذه المشاركة بواسطة دمعة الم1 في 4 أكتوبر 2011 في 15:00

#8

معقوله مافي احد يقدر يساعدني بكود بحث

#9

الأخ الكريم/الأخت الكريمة

السلام عليكم ورحمة الله وبركاته

مرحباً بكم في منتدى الفريق العربي للبرمجة

تأسف إدارة المنتدى لغلق الموضوع وذلك لمخالفته قوانين المشاركات .

قواعد طرح المشاركات

/index.php?showtopic=29343

شاكرين لكم حُسن تعاونكم

{username}

صورة
صورة

حسابي في الفيس بوك
http://goo.gl/XIzwL

حسابي في تويتر
http://goo.gl/6p4e3

 

 
 

هذا الموضوع مغلق.

مواضيع مشابهة