let imagesFolder = @"Z:\dummy_images"
let connectionStringSetting = new ConnectionStringSettings("rvproject_demo_devEntities", "metadata=res://*/DAL.Demo.DemoDb.csdl|res://*/DAL.Demo.DemoDb.ssdl|res://*/DAL.Demo.DemoDb.msl;provider=System.Data.SqlClient;provider connection string=\"data source=rvdatabase;initial catalog=rvproject_demo_dev;user id=dbadmin;password=R41Ladmin;MultipleActiveResultSets=True;App=EntityFramework\"")
connectionStringSetting.ProviderName <- "System.Data.EntityClient"
ignore(ConfigurationManager.ConnectionStrings.Add(connectionStringSetting))
let dbctx = new rvproject_demo_devEntities()
let runQuery (q:Expr<IQueryable<'T>>) =
match q with
| Application(Lambda(builder, Call(Some builder2, miRun, [Quote body])), queryObj) ->
query.Run(Expr.Cast<Microsoft.FSharp.Linq.QuerySource<'T, IQueryable>>(body))
| _ -> failwith "Wrong argument"
Comments
0 B
|👍
/👎
0 B
|👍
/👎