Click here to Skip to main content
11,925,307 members (59,396 online)
Rate this:
Please Sign up or sign in to vote.
See more: VB VB.NET
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim i, c As String
            Dim a, b, d As String
            i = ListView1.Items.Count - 1
            While i >= 0
                a = ListView1.Items.Item(i).Text
                b = ListView1.Items.Item(i).SubItems.Item(1).Text
                c = ListView1.Items.Item(i).SubItems.Item(2).Text
                d = ListView1.Items.Item(i).SubItems.Item(2).Text

                Dim QUERY As String
                QUERY = "INSERT INTO sales(id,item name,item description,price,quality,total price)VALUES ('" + a + "','" + b + "','" + c + "')"
            End While
        Catch eEndEdit As System.Exception
        End Try

    End Sub
End Class
Posted 22-Apr-13 10:24am
Edited 22-Apr-13 11:09am
ThePhantomUpvoter 22-Apr-13 15:42pm
This is not a question or a description of a problem.
ryanb31 22-Apr-13 16:33pm
I'm tired and I refuse to guess what you error is. Would you mind telling us?
db7uk 22-Apr-13 17:11pm
The error might help. But looking at the code, are you sure you want a space in "item name" and "item description" and "total price"????? you will need to put [] round it surly. i.e. [total price]
AlluvialDeposit 22-Apr-13 17:20pm
Watch out for sql injections!

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month

Advertise | Privacy | Mobile
Web04 | 2.8.151126.1 | Last Updated 22 Apr 2013
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100