19-03-13, 06:49 PM
Easy 4ever كتب :الكود كله أحس ان تركيبه خطأ :confused:
أولا
أنت عدلت إللي قلته لك
وعدلت إيضا هذا الكود
PHP كود :
cm.Parameters.AddWithValue("@Rest", SqlDbType.VarChar).Value = ListView1.Items.Item(i).SubItems(6).Text
خليته ياخذ القيمة من العمود السابع ؟ والعمود السابع خاص بالـ ID حسب فهمي لهذا الكود
PHP كود :
Dim cm As New SqlCommand("update table1 set Rest=@Rest where ID=" & ListView1.Items.Item(i).SubItems(6).Text, Conn)
ثانيا
ما المقصود من هذا الكود
PHP كود :
Dim upd As Integer = int - (TextBox92.Text)
ياليت يتم شرح سطر سطر لهذا الكود وما الغرض منه
حتى أتمكن من إفادتك لأني الأن أشوف الكود كله داخل في بعض ومتضارب في القيم
اخي غلط في كتابت الكود في المشاركة بل هو كذا
ياخذ ال ID من العامود الاول 0 وطبعا ما انحلت المشكلة
ثانيا ما اقصده بالكود
هو ان يخصم الرقم الموجود في TextBox92.Text من الليست فيو مثلا في SubItems(6)
كود :
On Error Resume Next
For i As Integer = 0 To ListView1.Items.Count - 1
If ListView1.Items.Item(i).Selected = True Then
Dim int As Integer = ListView1.Items.Item(i).SubItems(6).Text
Dim upd As Integer = int - (TextBox92.Text)
ListView1.Items.Item(i).SubItems(6).Text = upd
'\\\\\\\\\\
Dim cm As New SqlCommand("update table1 set Rest=@Rest where ID=@ID", Conn)
cm.Parameters.AddWithValue("@Rest", SqlDbType.VarChar).Value = ListView1.Items.Item(i).SubItems(0).Text
If Conn.State = ConnectionState.Closed Then
Conn.Open()
End If
cm.ExecuteNonQuery()
cm.Parameters.Clear()
'//////////
End If
Nextثانيا ما اقصده بالكود
كود :
Dim upd As Integer = int - (TextBox92.Text)هو ان يخصم الرقم الموجود في TextBox92.Text من الليست فيو مثلا في SubItems(6)

