на счет удобных учебников в сети не знаю, т.к. люблю печатные варианты компьютерной литературы...
а вот по поводу примера, это пожалуйста:
- Код: Выделить всё
Dim dinamicDB As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "файл базы данных")
Dim DBAdapter As New OleDbDataAdapter()
DBAdapter.SelectCommand = New OleDbCommand("SELECT * FROM Таблица", dinamicDB)
Dim CommandBuilder As OleDbCommandBuilder = New OleDbCommandBuilder(DBAdapter)
dinamicDB.Open()
Dim DS As DataSet = New DataSet()
DBAdapter.Fill(DS, "Таблица")
Dim dr As DataRow = DS.Tables("Таблица").NewRow()
dr("Поле") = "значение поля"
DS.Tables(0).Rows.Add(dr)
DBAdapter.Update(DS, "Таблица")
dinamicDB.Close()
это что касаеться добавить строку...
а чтобы читать строки просто надо использовать класс DataSet, предварительно заполнив его нужными таблицами...
- Код: Выделить всё
Dim dinamicDB As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "файл базы данных")
Dim DBAdapter As New OleDbDataAdapter()
DBAdapter.SelectCommand = New OleDbCommand("SELECT * FROM Таблица", dinamicDB)
dinamicDB.Open()
Dim DS As DataSet = New DataSet()
DBAdapter.Fill(DS, "Таблица")
Dim dr As DataRow
dr = ds.Tables("Таблица").Rows(i)
' ну и вообще посмотри, чего можно добиться от ds.Tables("Таблица").Rows.xxx
dinamicDB.Close()
вроде вот так вот...
по крайней мере у меня такой вариант работает...