تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في اضافة اسم ورقم في ليست فيو لقاعدة SQL Server
#21
[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]
الرد }}}
تم الشكر بواسطة:
#22
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]
الرد }}}
تم الشكر بواسطة:
#23
[COLOR="#800000"]اخي العزيز لا تظهر عندي مشكلة

ما المشكلة التي تظهر عندك؟[/COLOR]
الرد }}}
تم الشكر بواسطة:
#24
[color="#ff0000"]
لكي نختم الموضوع بفضل الله ومن ثم بفضلك اخي العزيز والغالي ..

ممتاز .. لكن تظهرلي مشكلة عند التنقل في اللسته لماذا ؟
وايضا في البحث لا يقوم باضهار فقط الاسماء التي تبدأ بالحرف الذي كتبته في اللسته ؟
هذا الكود يفعل هذا الشئ لكن لقاعدة بيانات اكسس Sad

كود :
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]


الملفات المرفقة
.zip   sql server dosya22.zip (الحجم : 220.89 ك ب / التحميلات : 52)
الرد }}}
تم الشكر بواسطة:
#25
[COLOR="#800000"]يا اخي العزيز انا قلت لك ان تضع الكود في حدث الClick وليس حدث الSelectedIndexChanged

[/COLOR]
الرد }}}
تم الشكر بواسطة:
#26
sajad كتب :[COLOR="#800000"]يا اخي العزيز انا قلت لك ان تضع الكود في حدث الClick وليس حدث الSelectedIndexChanged

[/COLOR]
[COLOR="#FF0000"]
اووو معليش انا عارف اتعبتك معي بس والله اني مضيق عليه الوقت واحاول اخلص هههههه
طيب اخي بقي اخر شئ وشوفه في الرد السابق[/COLOR]
الرد }}}
تم الشكر بواسطة:
#27
[COLOR="#800000"]اخي الكريم لم افهم سؤالك بالضبط؟؟

هل تقصد البحث بجزء من الكلمة؟[/COLOR]
الرد }}}
تم الشكر بواسطة:
#28
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]


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#29
[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]
الرد }}}
تم الشكر بواسطة:
#30
[color="#000080"]
كود ممتاااز جدا ..هذا ما اريده
اولا : اخي انا اسف ان اتعبتك معي بأسئلتي لكني جديد في قواعد sql كنت متعود على اكواد اكسس مع انه لا تختلف كثير بينهم واستفدت منك كثير
ثانيا : الله يجزاك الجنة لك ولوالديك .. آمين[/color]
الرد }}}
تم الشكر بواسطة:



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


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