CLibNl.OleDb 1.0.2

Setting Up Records

Create an F# record as follows:

• Decorate all instance fields with the OleDbColumn attribute
• Add the following static get properties to the record:

Tables           : OleDbTable[]
Links            : OleDbTableLink[]
ConnectionString : OleDbConnectionStringBuilder

Example

type Test =
    {
        [<OleDbColumn("table1", "field", "Field1", "Some field.", null)>]
        Field1    : string
        [<OleDbColumn("table2", "otherField", "Field2", "Some other field.", null)>]
        Field2    : string
    }

    static member Tables 
        with get() =
            [|
                {
                    FullTablePath = "table1"
                    TableAlias = "table1"
                }
                {
                    FullTablePath = "table2"
                    TableAlias = "table2"
                }
            |]


    static member Links
        with get() =
            [|
                {
                    Table1 = "table1"
                    Field1 = "field"
                    Table2 = "table2"
                    Field2 = "otherField"
                }
            |]

Get records as follows:

let records, errors = OleDbQuery<Test>().QueryAndMapToRecord()

To execute the query async:

    let fSuccess(e:OleDbQueryCompletedEventArgs<T>) = 
        if e.HasErrors |> not then
            e.Records.Value
            |> Array.map snd
            |> Array ...
        else
            e.Errors.Value
            |> Array.map snd
            |> Array ...
    let fFail(e:OleDbQueryCompletedEventArgs<T>) = 
        e.FailedToExecuteError.Value ...
    OleDbQueryRunner.ExecuteAsync<T>(Array.empty, fSuccess, fFail)

Updates

Update 1.0.2

• Allowed creation of column using the shortened syntax.

OleDbColumn("Table", "Field")

• Allowed omission of the Links property when only one table is used in query.
• Allowed creation of Access/Excel queries from string path rather than FileInfo.
• Allowed simplified quick queries as follows:

OleDbQuery.Run<Test>()

• Added ability to instantiate record fields with primitive types:

/// Creates a new field of type int with 1 as the default value.
[<OleDbColumn("Field", 1 :> box)>]
F1 : int