MacD Level: Big Cheese
 Registered: 06-01-2004 Posts: 19
|
Re: Typed Dataset
Hi papa.
What you need to use is the Commandbuilder, DataAdapter and of course the Query Statement that will make the dataset typed to the schema that you desire.
See the below example:
1. CONNECTING TO A DATABASE USING ODBC
Dim conString as String = "<CONECTION STRING VALUE>"
Dim myDS as DataSet
Dim myDA As OdbcDataAdapter
Dim ODBCCB As OdbcCommandBuilder
Dim ObdcConnection1 As New OdbcConnection(conString)
myDs = New DataSet
ObdCConnection1.Open
myDA = New OdbcDataAdapter("SELECT * FROM <TABLENAME>", ObdCConnection1)
SqlCB = New OdbcCommandBuilder(myDA)
myDA.FillSchema(myDS, "<TABLE NAME>")
.
.
.
.
.
ObdcConnection1.Close
2. CONNECTING TO AN SQL DATABASE CODE
Dim conString as String = "<CONECTION STRING VALUE>"
Dim myDS as DataSet
Dim myDA As SQLDataAdapter
Dim SqlCB As SQLCommandBuilder
Dim sqlConnection1 As New sqlConnection(conString)
myDs = New DataSet
sqlConnection1.Open
myDA = New sqlDataAdapter("SELECT * FROM <TABLENAME>", sqlConnection1)
SqlCB = New SqlCommandBuilder(myDA)
myDA.FillSchema(myDS, "<TABLE NAME>")
.
.
.
.
.
sqlConnection1.Close
3. CONNECTING TO A DATABASE USING OLEDB
Dim conString as String = "<CONECTION STRING VALUE>"
Dim myDS as DataSet
Dim myDA As OLEDbDataAdapter
Dim OLEDbCB As OLEDbCommandBuilder
Dim OLEDbConnection1 As New OLEDbConnection(conString)
myDs = New DataSet
OLEDbConnection1.Open
myDA = New OLEDbDataAdapter("SELECT * FROM <TABLENAME>", OLEDbConnection1)
OLEDbCB = New OLEDbCommandBuilder(myDA)
myDA.FillSchema(myDS, "<TABLE NAME>")
.
.
.
.
.
OLEDbConnection1.Close
I hope this will assist you.
Bye papa,
|