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

كود بحث

بدأه thepast في 15 أبريل 2012 · 16 رد · 1,067 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

انا اتسخدم كود البحث هذا عندما اقوم بكتابة رقم الموظف في تكست يفترض يعطيني معلوماته في قريد فيو

con = New OleDbConnection("Provider=MSDAORA.1;Password=ee;User ID=nn;Data Source=qq;Persist Security Info=True")

        Dim cmaa As New OleDbCommand("select sno,taeen_name from taeen where emp_no = " & TextBox2.Text & "", con)

        con.Open()
        cmaa.Parameters.AddWithValue("@emp_no", TextBox2.Text)
        Dim Reader As OleDbDataReader = cmaa.ExecuteReader()
        If Reader.Read() Then
            con.Close()

            GridView1.DataSource = cmaa.ExecuteNonQuery()
            GridView1.DataBind()

        End If

بس المشكلة لما اضع رقم الموظف وقوم بالبحث لا يعطيني شيء

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

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

#2

ارجوووو المساعدة

#3

ارجووووووو المساعدة

#4

ارجووووو المساعدة

#5

أين انتم ياشباب

ارجووووو المساعدة

#6

السلام عليكم

يمكنك إستخدام الخاصية Filter في الـ Binding Source

بالتوفيق

تم تعديل هذه المشاركة بواسطة METEOR في 16 أبريل 2012 في 20:36

Be the change you want to see in the world


#7

تفضل الكود بعد التعديل

Dim Con As New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=qq.mdb;Jet OLEDB:Database Password=ee")
Con.Open()
Dim cmd As New OleDbCommand()
            Dim DS As New DataSet
            Dim dt As New DataTable
            Dim da As New OleDb.OleDbDataAdapter

            cmd.CommandText = "select sno,taeen_name from taeen where emp_no = '" + TextBox2.Text + "'"

            cmd.Connection = Con
            dt = New DataTable
            da.SelectCommand = cmd
da.Fill(DS, "taeen")
            Me.GridView1.DataSource = DS.Tables("taeen")
            Con.Close()

تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 16 أبريل 2012 في 20:45

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#8

السلام عليكم

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

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

ارجووووووو المساعدة

#9

ارجو ارفاق المثال الذي قد جربت عليه الكود لفحصة

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#10

تفضل أخي العزيز

WebApplication5.rar

#11

اين قاعدة البيانات ؟

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#12

لم اضعها

بس كنت اريدك ان تتأكد لي هل الكود صح ام لا انشئ اي جدول صغير وجر عليه

ارجوووووو المعذرة

شكرا وجزاك الله خير الجزاء

#13

تم عمل المطلوب والمثال الان يعمل

post-46243-094485600 1334658650_thumb.jp

WebApplication5_up.rar

المرفقات
17-04-2012 12-27-26 PM.jpg

تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 17 أبريل 2012 في 13:46

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#14

لقد جربتها واشتغلت تمام التمام

شكرا لكل الاخوان جزاكم الله خير الجزاء وجعلها في موازيين حسناتكم

سؤال صغير : كيف استطيع تغيير اسماء الاعمده

وشكر مرة اخرى وجزاكم الله خير

#15

أخي السائل يمكنك تغيير مسميات الاعمدة عن طريق كتابة AS بعد الحقل أثناء كتابة جملة الـــ Select

لتصبح هكذا

select sno as الرقم ,taeen_name as الاسم from taeen where emp_no

مرفق مثالك بعد عمل التعديلات اللازمة عليه

post-46243-13024_thumb.jpg

WebApplication5_up.rar

تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 18 أبريل 2012 في 08:01

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#16

شكرا جزيلا لك يا أخي وجزاك الله خير

#17

شكرا جزيلا

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