[petersza]

Does anyone have code, or know where I can find some, or can explain how to bind a DataGrid to an Array?

Thank you,

p

[thuenb]

Following are the code functions and subs you will need...

Functions to create dataset and rows...

Code:

  Private Function CreateDataSet() As DataSet
        Dim ds As DataSet = New DataSet("Messages")
        ds.Tables.Add(CreateMyTable)
        Return ds
    End Function

    Private Function CreateMyTable() As DataTable
        Dim SearchResults As DataTable = New DataTable("SearchResults")
        SearchResults.Columns.Add(New DataColumn("ItemID", GetType(Integer)))
        SearchResults.Columns.Add(New DataColumn("Name", GetType(String)))
        SearchResults.Columns.Add(New DataColumn("LongDesc", GetType(String)))
        SearchResults.Columns.Add(New DataColumn("ShortDesc", GetType(String)))
        SearchResults.Columns.Add(New DataColumn("Image", GetType(String)))
        Return SearchResults
    End Function

Sub Routine to add row of data to dataset:

Code:

 Dim myDataset As DataSet = CreateDataSet()
'Add a loop here
Do while loop = true
                    Dim dataRow As dataRow = myDataset.Tables("SearchResults").NewRow
                    dataRow("ItemID") = Array(0)
                    dataRow("Name") = Array(1)
                    dataRow("LongDesc") = Array(2)
                    dataRow("ShortDesc") = Array(3)
                    dataRow("Image") = Array(4)
                    myDataset.Tables("SearchResults").Rows.Add(dataRow)
end loop

Then you will want to bind the dataset to the datagrid....

Code:

Dim myDataView As New DataView()
            myDataView.Table = myDataset.Tables("SearchResults")
            MydataGrid.CurrentPageIndex = 0
            MydataGrid.DataSource = myDataView
            MydataGrid.DataBind()

Hope this helps