[RESOLVED] RESOLVED Populate ListView

Hi

Please can some one give me an example of how i can populate my ListView with the data from a table in my SQL database?

I have put the columns and headings in place for my ListView but i dont know how to populate it?

My ListView is called lvTasks
Table in my database is called Tasks
and the code for my columns and headers is as follows

Code:

---

    Public Sub CreateListTasks()
        lvTasks.Columns.Add("Task ID", 0, HorizontalAlignment.Left)
        lvTasks.Columns.Add("For Company", 1, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Created On", 2, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Status", 3, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Time Taken", 4, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Cost", 5, HorizontalAlignment.Left)
        lvTasks.AutoResizeColumns(1)
        lvTasks.FullRowSelect = True
        lvTasks.GridLines = True
    End Sub

---

i just want someone to give me and example of how to populate is list view with the data from my table... Anyone Help?

Thanks Roo

vb.net Code:

'assumes myConnection is a valid database connection
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim sSQL As String
        Dim lvwItem As New ListViewItem()
        sSQL = "SELECT field1, field2, field3 FROM tablename "
        sSQL = sSQL & "ORDER BY field1 "
        Dim command As New SqlCommand(sSQL, myConnection)
        Dim reader As SqlDataReader = command.ExecuteReader()
 
        While reader.Read()
            lvwItem = ListView1.Items.Add(reader.GetString(0))
            lvwItem.SubItems.Add(reader.GetString(1))
            lvwItem.SubItems.Add(reader.GetString(2))
        End While
    End Sub

Thanks the reply i have added that but i get an error that says
"Unable to cast object of type 'System.Int32' to type 'System.String'." at the line highlighted:

Code:

---

    Public Sub CreateListTasks()
        lvTasks.Columns.Add("Task ID", 0, HorizontalAlignment.Left)
        lvTasks.Columns.Add("For Company", 1, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Created On", 2, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Status", 3, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Time Taken", 4, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Cost", 5, HorizontalAlignment.Left)
        lvTasks.AutoResizeColumns(1)
        lvTasks.FullRowSelect = True
        lvTasks.GridLines = True

        Dim Connection As SqlConnection = MSDB.GetConnection
        Dim sSQL As String
        Dim lvwItem As New ListViewItem()
        sSQL = "SELECT TaskID, TaskFor, TaskDate, TaskComplete, TaskTime, TaskCost  FROM tasks "
        sSQL = sSQL & "ORDER BY TaskDate "
        Connection.Open()
        Dim command As New SqlCommand(sSQL, Connection)
        Dim reader As SqlDataReader = command.ExecuteReader()

        While reader.Read()
            lvwItem = lvTasks.Items.Add(reader.GetString(0) & "TaskID")
            lvwItem.SubItems.Add(reader.GetString(1) & "TaskFor")
            lvwItem.SubItems.Add(reader.GetString(2) & "TaskDate")
            lvwItem.SubItems.Add(reader.GetString(3) & "TaskComplete")
            lvwItem.SubItems.Add(reader.GetString(4) & "TaskTime")
            lvwItem.SubItems.Add(reader.GetString(5) & "TaskCost")
        End While
        Connection.Close()
    End Sub

---

Sorry ignore my last post its been a long day but im sorted now thanks for your help Hack.