ok... how do i make bind that with a dataview?...
here are the crazy things I've been trying
Public Class Form1
Private MyDS As DataSet = New DataSet
Private MyTable As DataTable = MyDS.Tables.Add("tblHolidays") 'New
DataTable("tblHolidays")
Private Sub testme()
'Dim dt As New DataTable("tblHolidays")
Dim dcfirstcolumn As New DataColumn("first")
Dim dcsecondcolumn As New DataColumn("second")
dcfirstcolumn.DataType = System.Type.GetType("System.DateTime")
dcsecondcolumn.DataType = System.Type.GetType("System.String")
MyTable.Columns.Add(dcfirstcolumn)
MyTable.Columns.Add(dcsecondcolumn)
Dim dr As DataRow = MyTable.NewRow() '= dt.Rows.Add ' 'dt.rows.newrow
MyTable.Rows.Add(dr)
dr.Item(dcfirstcolumn) = #1/1/2008#
dr.Item(dcsecondcolumn) = "New Years"
dr.AcceptChanges()
'MyTable.Rows(1).Item(0) = #1/1/2009#
' dr.
Me.DataGridView1.DataSource = Me.MyDS.Tables
MyDS.AcceptChanges()
'Me.DataGridView1.DataBindings
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
'With MyDS
' With MyTable
' .Columns.Add("dtmHoliday", Type.GetType("System.DateTime"))
' .Columns.Add("strHoliday", Type.GetType("System.String"))
' .Columns(1).ColumnName = "test"
' .Columns(0).Caption = "test caption"
' End With
' Console.WriteLine("Rows: {0}", .Tables(0).Rows.Count)
' MyTable.Rows.Add()
' Dim strSQL As String = "INSERT INTO tblHolidays (dtmHoliday, strHoliday)
values (#1/1/2009#, 'Testme')"
' Dim selectCMD As SqlClient.SqlCommand = New SqlClient.SqlCommand(strSQL)
' 'selectCMD.ExecuteScalar()
' Console.WriteLine("Rows: {0}", .Tables(0).Rows.Count)
' .AcceptChanges()
Dim DS As New DataSet("MyDataSet")
Dim DT As New DataTable("MyTable")
DT.Columns.Add("Test", GetType(String))
Dim DR As DataRow = DT.NewRow
DR.Item("Test") = "Hello, World"
DT.Rows.Add(DR)
DS.Tables.Add(DT)
DS.AcceptChanges()
Me.DataGridView1.DataSource = DS.Tables
'End With
'testme()
End Sub
End Class
"Steve Gerrard" <my********@comcast.netwrote in message
news:NP******************************@comcast.com. ..
Brian wrote:
>>
"rowe_newsgroups" <ro********@yahoo.comwrote in message
news:ca**********************************@c65g200 0hsa.googlegroups.com...
On Aug 2, 6:43 pm, "Brian" <bsgalla...@community.nospamwrote:
>>I want to create an In Memory dataset. not connected to any
database..
Dim dataSet As New DataSet()
lol...
ok.. a little more info...
I want to create a table with a few columns... and a few rows....
Same principle applies:
Dim DS As New DataSet("MyDataSet")
Dim DT As New DataTable("MyTable")
DT.Columns.Add("Test", GetType(String))
Dim DR As DataRow = DT.NewRow
DR.Item("Test") = "Hello, World"
DT.Rows.Add(DR)
DS.Tables.Add(DT)
DS.AcceptChanges()
' all done