- Beranda
- Komunitas
- Tech
- Programmer Forum
update datatabase dari listview
TS
adzin9810
update datatabase dari listview
permisi mastah, ini cara update data dari listview ini gimana ya? saya cari2 di google enggak ketemu2
ini rencananya ketika di klik batal maka stok sebelum itu akan mengupdate data obat di database
ini kode yang saya gunakan tapi masih muncul
InvalidArgument=Value of '2' is not valid for 'index'.
Parameter name: index
ini rencananya ketika di klik batal maka stok sebelum itu akan mengupdate data obat di database
ini kode yang saya gunakan tapi masih muncul
InvalidArgument=Value of '2' is not valid for 'index'.
Parameter name: index
Code:
Dim i As Integer
i = 1
Do While (i < 3)
If i = 1 Then
With ListView1
cmd = New MySqlCommand("update dataobat set KodeObat = '" & .Items(1).SubItems(5).Text & "',NamaObat='" & .Items(1).SubItems(6).Text & "',JumlahObat='" & .Items(1).SubItems(9).Text & "' where KodeObat = '" & .Items(1).SubItems(5).Text & "'", dbconn)
Try
cmd.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End With
ElseIf i = 2 Then
With ListView1
input = New MySqlCommand("update dataobat set KodeObat = '" & .Items(2).SubItems(5).Text & "',NamaObat='" & .Items(2).SubItems(6).Text & "',JumlahObat='" & .Items(2).SubItems(9).Text & "' where KodeObat = '" & .Items(2).SubItems(5).Text & "'", dbconn)
Try
input.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End With
End If
i += 1
Loop
nona212 memberi reputasi
1
577
5
Guest
Tulis komentar menarik atau mention replykgpt untuk ngobrol seru
Urutan
Terbaru
Terlama
Guest
Tulis komentar menarik atau mention replykgpt untuk ngobrol seru
Komunitas Pilihan