ผมต้องการ INSERT or UPDATE ข้อมูลโดยหากข้อมูลที่ INSERT มีอยู่แล้วจะใช้การ UPDATE หรือยังไม่มี จะเป็นการ INSERT ตามปกติ ต้องทำยังไงครับ

 Dim SQL As String
            For i = 0 To ListView1.Items.Count - 1

             SQL = "INSERT INTO StockFood VALUES ( " & _
             SQ(Trim(ListView1.Items(i).SubItems(1).Text)) & "," & _
            SQ(Trim(ListView1.Items(i).SubItems(4).Text)) & ") ON DUPLICATE KEY UPDATE StockFood_number=StockFood_number+" & ListView1.Items(i).SubItems(4).Text & ""
obj.ExecuteNonQuery(SQL)