- Код: Выделить всё
Using connection As New OleDbConnection(connectionString)
Dim command As New OleDbCommand(queryString, connection)
connection.Open()
Dim reader As OleDbDataReader = command.ExecuteReader()
While reader.Read()
a=(reader(i).ToString())
End While
reader.Close()
End Using
А вот как записывать?