Извлечение строк из представления базы данных MS Access с использованием Vb.Net

Question

Мне удалось получить следующий код ...

            con.ConnectionString = My.Settings.dbConnection
        Dim sqlCmd As System.Data.OleDb.OleDbCommand = New System.Data.OleDb.OleDbCommand()
        con.Open()
        sqlCmd.Connection = con

        Dim schemaTable As DataTable
        schemaTable = con.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Views, Nothing)

Чтобы получить список представлений в моей базе данных Access, но теперь я хочу получить результаты на основе выбранного представления.

Есть ли правильный метод для этого или я должен взять инструкцию SQL из таблицы данных, возвращаемой для каждой строки?

Answer 1

Предположим, у вас есть Query1 (Просмотр) в вашей базе данных Access (файл Database1.accdb).Следующий код выведет каждую строку запроса на консоль (для демонстрационных целей):

    Dim con As OleDbConnection = New OleDbConnection()

    con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Database1.accdb;Persist Security Info=False;"
    Dim sqlCmd As OleDbCommand = New System.Data.OleDb.OleDbCommand()

    sqlCmd.CommandType = CommandType.StoredProcedure
    sqlCmd.CommandText = "Query1"
    sqlCmd.Connection = con

    con.Open()

    Dim reader As OleDbDataReader

    reader = sqlCmd.ExecuteReader()

    If reader.HasRows Then
        While reader.Read()
            Console.WriteLine(reader("Column1")) 'output specific column
        End While
    End If

    Console.ReadLine()

Надеюсь, это поможет