[سعود]

سامى ابوسريع كتب :نعم اخى فى ملفات الجهاز فقط

انا سالتك ونت طلبت ايضاح بمثال وعملت المثال.

[سامى ابوسريع]

سعود كتب :طيب اصدار الاكسس عندك كم؟ 2007 او اقدم؟؟؟

انا مش عندى اكسس اخى
انا بعمل على فيجوال بيسك 2010

[سامى ابوسريع]

سعود كتب :انا سالتك ونت طلبت ايضاح بمثال وعملت المثال.

وايه المشكلة فى كدة؟؟
انا برد على الاخ اللى سال فقط

[سعود]

سامى ابوسريع كتب :وايه المشكلة فى كدة؟؟
انا برد على الاخ اللى سال فقط

يا اخي الله يرضى عليك
من ردك على السائل اتضح لي ان المثال اللي انا سويت ليس المطلوب ابدا .. لان المثال اللي انا سويت للبحث بقاعدة البيانات بينما المطلوب البحث داخل ملفات الجهاز .هذا المقصود

[سامى ابوسريع]

جزاك الله كل خير اخى وانا لا اقصد والله
انا فقط برد على كلامك..........
طب حضرتك عرفت اننى اريد البحث داخل الجهازليس قاعدة البيانات
ممكن تعملى مثال سريعا اذا تكرمت

[3booody]

انتظر لحظه اخي ان شاء الله اكمل طلبك

[سامى ابوسريع]

3booody كتب :انتظر لحظه اخي ان شاء الله اكمل طلبك

الله يكرمك اخى
فى انتظارك

[3booody]

[COLOR="#800000"]اعتذر عن تأخري وبسبب انقطاع الكهرباء والله يعين اهل العراق على الكهرباء
تفضل طلبك اخي لكن المشكله انه يبحث داخل مسار معين مثلآ القرص c
من مجال الاسماء استدعي[/COLOR]
Imports System.IO
واكتب الكود في حدث TextBox1_TextChanged واضف ليست بوكس

كود :

For Each IO As String In Directory.GetDirectories("C:\")
            Dim i As Integer = IO.Split("\").Count - 1
            If InStr(IO.Split("\")(i), TextBox1.Text) Then
                ListBox1.Items.Add(IO.Split("\")(i))
            End If
        Next

[سامى ابوسريع]

3booody كتب :[COLOR="#800000"]اعتذر عن تأخري وبسبب انقطاع الكهرباء والله يعين اهل العراق على الكهرباء
تفضل طلبك اخي لكن المشكله انه يبحث داخل مسار معين مثلآ القرص c
من مجال الاسماء استدعي[/COLOR]
Imports System.IO
واكتب الكود في حدث TextBox1_TextChanged واضف ليست بوكس

كود :

For Each IO As String In Directory.GetDirectories("C:\")
            Dim i As Integer = IO.Split("\").Count - 1
            If InStr(IO.Split("\")(i), TextBox1.Text) Then
                ListBox1.Items.Add(IO.Split("\")(i))
            End If
        Next

معذرة اخى مش فاهم والله معلش اصل انا بتعلم من الامثلة
اعتذر لك وجزاك الله خيرا

[3booody]

[COLOR="#800000"]تفضل البرنامج بالمرفقات
[/COLOR]