[COLOR="#800000"]السلام عليكم
اولا غير خاصية الFullRowSelect للListView الى True
ثم
اكتب هذا الكود في حدث الClick للListView
PHP كود :
Dim l As ListView.SelectedListViewItemCollection
l = ListView1.SelectedItems
TextBox3.Text = l(0).SubItems(1).Text
هذا في حال التعديل حسب الاسم
اما اذا اردت التعديل حسب رقم الموبايل فقط غير هذا السطر PHP كود :
TextBox3.Text = l(0).SubItems(1).Text
الى PHP كود :
TextBox3.Text = l(0).SubItems(2).Text
اما اذا اردت التعديل حسب الID غيره الى PHP كود :
TextBox3.Text = l(0).Text
بالتوفيق ان شاءالله[/COLOR]
sajad كتب :[color="#800000"]السلام عليكم
اولا غير خاصية الfullrowselect للlistview الى true
ثم
اكتب هذا الكود في حدث الclick للlistview
PHP كود :
dim l as listview.selectedlistviewitemcollection
l = listview1.selecteditems
textbox3.text = l(0).subitems(1).text
هذا في حال التعديل حسب الاسم
اما اذا اردت التعديل حسب رقم الموبايل فقط غير هذا السطر PHP كود :
textbox3.text = l(0).subitems(1).text
الى PHP كود :
textbox3.text = l(0).subitems(2).text
اما اذا اردت التعديل حسب الid غيره الى PHP كود :
textbox3.text = l(0).text
بالتوفيق ان شاءالله[/color]
ممتاز .. لكن تظهرلي مشكلة عند التنقل في اللسته لماذا ؟
[/color][/size][/b]
[COLOR="#800000"]اخي العزيز لا تظهر عندي مشكلة
ما المشكلة التي تظهر عندك؟[/COLOR]
[color="#ff0000"]
لكي نختم الموضوع بفضل الله ومن ثم بفضلك اخي العزيز والغالي ..
ممتاز .. لكن تظهرلي مشكلة عند التنقل في اللسته لماذا ؟
وايضا في البحث لا يقوم باضهار فقط الاسماء التي تبدأ بالحرف الذي كتبته في اللسته ؟
هذا الكود يفعل هذا الشئ لكن لقاعدة بيانات اكسس 
كود :
Try
Dim Items() As ListViewItem = (From Row As DataRow In DataSet1.Tables("Table1").Rows _
Where Row("UserName").ToString.StartsWith(TextBox1.Text, StringComparison.OrdinalIgnoreCase) _
Select New ListViewItem(New String() {Row("ID").ToString, Row("UserName").ToString, Row("MobileNumber").ToString})).ToArray
ListView1.Items.Clear()
ListView1.Items.AddRange(Items)
Catch ex As Exception
End Try
المشروع بعد التعديل على الكل انه يستخدم id .. شغل البرنامج وابدأ في التنقل بين المضافين في اللسسته ولاحظ الخطأ
[/color]
[COLOR="#800000"]يا اخي العزيز انا قلت لك ان تضع الكود في حدث الClick وليس حدث الSelectedIndexChanged
[/COLOR]
sajad كتب :[COLOR="#800000"]يا اخي العزيز انا قلت لك ان تضع الكود في حدث الClick وليس حدث الSelectedIndexChanged
[/COLOR]
[COLOR="#FF0000"]
اووو معليش انا عارف اتعبتك معي بس والله اني مضيق عليه الوقت واحاول اخلص هههههه
طيب اخي بقي اخر شئ وشوفه في الرد السابق[/COLOR]
[COLOR="#800000"]اخي الكريم لم افهم سؤالك بالضبط؟؟
هل تقصد البحث بجزء من الكلمة؟[/COLOR]
sajad كتب :[COLOR="#800000"]اخي الكريم لم افهم سؤالك بالضبط؟؟
هل تقصد البحث بجزء من الكلمة؟[/COLOR]
[COLOR="#696969"][b]
اقصد كما نعرف في البحث المعتاد وهو انه عند كتابة كلمه يقوم ببدأ الفهرسة اوتماتيكي في Listview مثلا بحثت بحرف [b][SIZE=5]م يظهر لي في الليست بوكس اوتوماتيكي
محمد
ماجد
مازن
،،، الخ
وايضا اذا اضفت حرف زائد مثل ما يظهر لي
ماجد
مازن
وكهذا ... طبعا الكود السابق يفعل هذا الشئ لكن في قاعدة بيانات اكسس ..
لاحظ الصورة التالية :
http://im34.gulfup.com/5Zcpe.png
[ATTACH=CONFIG]1849[/ATTACH][/b][/COLOR][/SIZE][/b]
[COLOR="#800000"]السلام عليكم
اكتب هذا الكود في حدث الTextChanged للTextbox8
PHP كود :
ListView1.Items.Clear()
Conn.Open()
Dim cmd As New SqlCommand("select * from Table1 where UserName like '" & (TextBox8.Text) & "%'", Conn)
Dim myReader As SqlDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
While (myReader.Read() = True)
Dim item As New ListViewItem()
item.Text = myReader.Item("ID").ToString()
item.SubItems.Add(myReader.Item("UserName").ToString())
item.SubItems.Add(myReader.Item("MobileNumber").ToString())
ListView1.Items.Add(item)
End While
Conn.Close()
الكود مجرب ويعمل حسب الطلب
بالتوفيق ان شاءالله ولا تنسانا من صالح دعواتك لي ولوالدي[/COLOR]
[color="#000080"]
كود ممتاااز جدا ..هذا ما اريده
اولا : اخي انا اسف ان اتعبتك معي بأسئلتي لكني جديد في قواعد sql كنت متعود على اكواد اكسس مع انه لا تختلف كثير بينهم واستفدت منك كثير
ثانيا : الله يجزاك الجنة لك ولوالديك .. آمين[/color]