我在尝试使用我的类型提供程序时遇到“无法加载文件或程序集......系统找不到指定的文件”错误。
该错误出现在构建消费应用程序时,但在构建之前并未在 Visual Studio 中显示为“红色波浪”。
我在下面复制了我的 TP,但问题发生在Database.listDbs
调用内部,我强烈怀疑问题不是下面的代码,而是我如何打包依赖项。
我调用了 Microsoft.Azure.DocumentDB 包,该包又依赖于 Newtonsoft.Json。这是找不到的 Newtonsoft.Json 包。我正在使用 Paket 来管理依赖项并进行重定向。
完整代码(包括所有 paket 文件)在 github 上:https ://github.com/stewart-r/AzureDocumentDbTypeProvider/tree/dependency-issue
我发现这个问题看起来非常相似,但解决方案没有任何区别。
我的TP代码如下:
namespace ProviderImplementation
open ProviderImplementation.ProvidedTypes
open Microsoft.FSharp.Core.CompilerServices
open System.Reflection
open System
open Config
open Database
[<TypeProvider>]
type public DocumentDbTypeProvider(config: TypeProviderConfig) as this =
inherit TypeProviderForNamespaces()
let thisAssembly = Assembly.GetExecutingAssembly()
let docDbType = ProvidedTypeDefinition(thisAssembly,namespaceName,"DocumentDbTypeProvider", baseType = Some typeof<obj>)
let initFn (typeName : string) (args : obj []) =
let acProvidedType = ProvidedTypeDefinition(thisAssembly, namespaceName, typeName, baseType = Some typeof<obj>)
acProvidedType.AddMember(ProvidedConstructor(parameters = [], InvokeCode = (fun args -> <@@ null @@>)))
let getDbProperties () =
Database.listDbs (args.[0] :?> string) (args.[1]:?> string)
|> List.map(fun d -> new ProvidedProperty(d.Name, typeof<string>, IsStatic = true, GetterCode = (fun _ -> <@@ "Test db name" @@>)))
acProvidedType.AddMembers(getDbProperties())
acProvidedType
let parameters =
[ ProvidedStaticParameter("accountEndPointUri", typeof<string>, String.Empty)
ProvidedStaticParameter("accountKey", typeof<string>, String.Empty)]
do
docDbType.DefineStaticParameters(parameters,initFn)
this.AddNamespace(namespaceName,[docDbType])
[<TypeProviderAssembly>]
do ()