No me refería a eso exactamente, me refería a esto:
Código PHP:
Dim ds As New DataSet
Dim ol As New OleDb.OleDbDataAdapter
Dim cn As New ADODB.Connection
Dim rs2 As New ADODB.Recordset
Private Sub Datos_Ver_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Top = (frm1.Height / 2) + frm1.Top - (Me.Height / 2)
Me.Left = (frm1.Width / 2) + frm1.Left - (Me.Width / 2)
cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & nombrebase & ";Persist Security Info=False") ' note 5323 is the name of dbase
rs2.Open(tablanombre, cn, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
'Aquí buscamos los tipos de las columnas:
dim i as integer = 0
while i < tablanombre.Columns.Count
if tablanombre.Columns(i).DataType = System.Type.GetType("System.DateTime") then
tablanombre.Columns(i).DefaultValue= now()
end if
i+=1
end while
ds.Tables.Add(tablanombre)
ol.Fill(ds.Tables(tablanombre), rs2)
ds.DataSetName = cn.ConnectionString
Me.MSGrid.DataSource = ds.Tables(tablanombre)
cn.Close()
End Sub
Lo que pasa es que no se si te dejará hacer eso, al tener el datatable ya datos.
¿Entiendes lo que te quiero decir???