Where子句查询示例，包括C＃中的MS ACCESS数据库连接

Question

与标题相似。 只想要一个Oledb与Where子句查询连接的例子。

Answer 1

Private Function SendQueryToOLE() As DataSet
    Dim rdrDataReader As OleDb.OleDbDataReader
    Dim cmdCommand As OleDb.OleDbCommand
    Dim dtsData As New DataSet
    Dim dtbTable As New DataTable
    Dim i As Integer
    Dim SQLStatement As String
    Dim oleConnection As OleDb.OleDbConnection

        oleConnection.ConnectionString = YourConnectionString

        SQLStatement = "SELECT * FROM Table WHERE Field=1"

        oleConnection.Open()

        cmdCommand = New OleDb.OleDbCommand(SQLStatement, moleConnection)

        rdrDataReader = cmdCommand.ExecuteReader()

        For i = 0 To (rdrDataReader.FieldCount - 1)
            dtbTable.Columns.Add(rdrDataReader.GetName(i), rdrDataReader.GetFieldType(i))
        Next
        dtbTable.BeginLoadData()

        Dim values(rdrDataReader.FieldCount - 1) As Object

        While rdrDataReader.Read
            rdrDataReader.GetValues(values)
            dtbTable.LoadDataRow(values, True)
        End While
        dtbTable.EndLoadData()

        dtsData.Tables.Add(dtbTable)

        moleConnection.Close()

        Return dtsData

End Function