منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طلب كود تعديل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته 
اخواني توجد لدي مشكلة لم استطع عمل تعديل علي الباسورد 
اريد اختيار الاسم من الكومبو بوكس طبعا رح يضهر الباسورد الحالي واريد تغير الباسورد بدون عرض gridview
كلمة المرور t1
كلمة المرور الجديدة t2 
والكومبو بوكس c1 
ارجو المساعدة وشكراً لكم 


[صورة مرفقة: do.php?img=836128]
ارسل كلمة المرور الجديدة الى قاعدة البيانات بمعلومية رقم المستخدم او اسمه حسب بنية جدول المستخدمين عندك
هذا موضوع للأخ خضر فيه شرح فيديو لطريقتين ado.net  و linq
شاهد فيديو عملية التحديث update
https://vb4arb.com/vb/thread-15848.html

ولا تنسى مقارنة قيمة الحقلين -كلمة المرور الجديدة وتأكيد كلمة المرور الجديدة
خوي هادا شرح مش vb
ومداير المقارنة الامور تمام مزال قاعدة المشكلة
نبي من غير مانعرض ب القرردفيو ندخل الاسم ويتغير الرقم السري طول
يا خوي شن علاقة القريد فيو؟
انت بتتعامل مع البيانات مش مع مصدرها
يعني سواء كانت البيانات في خلية جريدفيو او تكست بوكس
انت بتاخدها بتحطها في جملة sql وتتم العملية



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

كود :
       Private Sub btnUpdate_Click( sender As Object,  e As EventArgs) Handles btnUpdate.Click
           
           'UPDATE SQL Query, Including Parameters
           'This Query Updates Our Existing Data To Our Entered Values        
           strQuery = "Update StudentInfo Set StudentName = @Name, StudentSurname = @Surname, StudentNumber = @StudentNo Where StudentName = @Search"
   
           'Instantiate Connection Object
           sqlSQLCon = New SqlConnection(strSQLConn)
   
           'Using Structure Simplifies Garbage Collection And Ensures That The Object Will Be Disposed Of Correctly Afterwards    
           Using sqlSQLCon
   
               'Create Command Object, To Make Use Of SQL Query
               Dim sqlSQLCommand As New SqlCommand(strQuery, sqlSQLCon)
   
               'Create Parameters Instead Of Hardcoding Values
               'Name = Whatever txtName Contains
               'Surname = Whatever txtSurname Contains
               'StudentNo = txtStudentNumber Text
               sqlSQLCommand.Parameters.AddWithValue("Name", txtName.Text)
               sqlSQLCommand.Parameters.AddWithValue("Surname", txtSurname.Text)
               sqlSQLCommand.Parameters.AddWithValue("StudentNo", txtStudentNumber.Text)
               sqlSQLCommand.Parameters.AddWithValue("Search", txtSearch.Text)
   
               'Open Connection To The Database
               sqlSQLCon.Open()
   
               'Execute Command As NonQuery As It Doesn't Return Info
               sqlSQLCommand.ExecuteNonQuery()
   
               'Inform User That The Record Has Been Edited
               MessageBox.Show("Updated")
   
           End Using
   
       End Sub
المصدر: http://www.codeguru.com/columns/vb/using...ations.htm

لو عرفت تعدله حسب حاجتك كويس
لو ما عرفت اعطينا كود نعدلو عليه ، وقوللنا شن نوع قاعدة البيانات واكتبلنا بنية الجدول (اسمه واسماء الحقول)
تم الحل .. شكرا

درت تكست مخفي فيه id لما نختار الاسم يجيب id من قاعدة البيانات
وبعدين التعديل ياخد id ويعدل
كنت نعدل فيها بالاسم مامشت امورها
ومنور يخوي