19-03-13, 05:35 PM
just.coder كتب :جرب حب حط الكود دا ف حدث موس دبل كليك ف لست فيو
كود :
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(3).Text
Dim upd As Integer = int - 100
ListView1.Items.Item(i).SubItems(3).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(3).Text
If Conn.State = ConnectionState.Closed Then
Conn.Open()
End If
cm.ExecuteNonQuery()
cm.Parameters.Clear()
'//////////
End If
Next
عندي ملاحظة في هذا الكود
PHP كود :
Dim cm As New SqlCommand("update table1 set Rest=@Rest where ID=@ID", Conn)
في كلمة where تجي بعدها الشرط ID=@ID كيف وضعت ID في بارومتر ؟!
أستبدل @ID بـ رقم ID حق الحقل المراد التعديل فيه
يعني مثلا رقم ID موجود في ListView1.Items.Item(i).SubItems(0).Text إي أن حقل ID يعرض في ListView1 في العمود الأول
بالأخير الكود بعد التعديل
من
PHP كود :
Dim cm As New SqlCommand("update table1 set Rest=@Rest where ID=@ID", Conn)
إلى
PHP كود :
Dim cm As New SqlCommand("update table1 set Rest=@Rest where ID=" & ListView1.Items.Item(i).SubItems(0).Text, Conn)
جرب وعطنا خبر
<---------------------------------------------------------------->

