Im newbie in VB.net having problem in update problem. Hope someone can help.
This is my code.
Private Sub updateStatus()
Dim lst As Integer = vcd_id_ListBox.Items.Count
Dim j As Integer = 0
Dim dbCommand As New OleDbCommand
Dim strBoolean, z
strBoolean = "false"
z = CBool(strBoolean)
Do While j <= lst - 1
dbCommand.CommandText = "Update VCDTable Set " _
& "vStatus='" & z & "' " _
& "WHERE VCDID=" & vcd_id_ListBox.Items(j)
dbCommand.Connection = con
dbCommand.Connection.Open()
dbCommand.ExecuteNonQuery()
con.Close()
j += 1
MsgBox("Updated")
Loop
End Sub