类中SQL的F＃类型提供程序

超级求喷王

我正在编写要与Azure Worker角色一起使用的F＃。我希望类将连接字符串a作为参数。我创建一个数据库连接
type dbSchema = SqlDataConnection
let db = dbSchema.GetDataContext()
但是dbSchema是一种类型，因此无法将其嵌入到我的类中（另一种类型）。我可以创建两个单独的模块，一个与数据库连接，另一个与我的课程
9 L, c9 u+ h' o+ [6 G8 ymodule DataSource =
3 b9 ]$ I' O0 W: q0 G    []
* o& H8 h9 R$ K0 ^    let connectionString = "Data Source=.\SQLEXPRESS;Initial Catalog=Service;Integrated Security=True"
  E" B7 P& y  n, U. T8 `    type dbSchema = SqlDataConnection
' f- h& B* s+ Q8 L6 d    let db = dbSchema.GetDataContext()
module DealerFactory =
; ]% j  {5 m1 O& k# O* d8 q    type Factory(connectionString) =
        member this.GetList(latitudeLeftTop, longitudeLeftTop, latitudeRightBottom, longitudeRightBottom) =
* w. k* D- V% a        ".."
但是，如何在类的构造函数中使用connectionString创建连接？
% e$ D, E. v/ m% N               
解决方案:
               


9 \4 f6 x* R& @9 ]/ `+ a/ L                SQL数据库的类型提供程序将连接字符串用于两个不同的目的。首先，它需要一个（在编译时）来生成数据库模式。其次，您可以（可选）给它另一个供您在实际运行程序时在运行时使用。
需要在中指定编译时连接字符串作为参数，SqlDataConnection并且可以将运行时连接字符串传递给GetDataContext(...)操作。
因此，您可以使用静态已知的编译时连接字符串来定义类型：
[]
let connectionString = "Data Source=.\SQLEXPRESS;Initial Catalog=Service; ..."
' r" w$ i' k2 h4 vtype dbSchema = SqlDataConnection
而且，当您要创建数据库连接的实例时，可以向其传递另一个连接字符串：
type Factory(connectionString) =
  // Create connection to the DB using (a different)
  // connection string specified at runtime
  let db = dbSchema.GetDataContext(connectionString)
3 ~% d: D; ]0 J* i+ M9 w2 c  member this.GetList( latitudeLeftTop, longitudeLeftTop,
                       latitudeRightBottom, longitudeRightBottom) =
    // Use local 'db' to access the database
. c5 Z- h. i$ K: ]3 A% f    query { for v db.Table do select v }
与您的原始代码（db在模块中具有值）相比，这会db为each创建一个新的实例Factory，但是我想如果Factory将连接字符串作为参数，这是可以预期的。