CodeDom 컴파일러가 DLL을 액세스하는 데 문제가 있습니다.

Question

Public Function GenerateScript(code As String) As IScript 
    Using provider As New VBCodeProvider() 
     Dim parameters As New CompilerParameters() 
     parameters.GenerateInMemory = True 
     parameters.ReferencedAssemblies.Add(Assembly.GetExecutingAssembly().Location) 
     Dim interfaceNamespace As String = GetType(IScript).Namespace 
     Dim codeArray() As String = New String() {"Imports " & interfaceNamespace & Environment.NewLine & code} 
     Dim results As CompilerResults = provider.CompileAssemblyFromSource(parameters, codeArray) 
     Return CType(results.CompiledAssembly.CreateInstance("Script"), IScript) 
    End Using 
End Function 

시간이 지나면 바뀔 수있는 문자열을 실행하려면 위 코드를 사용하고 있습니다. 그러나 이것을 실행할 때 다음 오류가 발생합니다.

System.IO.FileNotFoundException: 'Could not load file or assembly 'file:///C:\Users\zjf\AppData\Local\Temp\ykujgxkp.dll' or one of its dependencies. The system cannot find the file specified.' 

잘 모르겠습니다. 누구든지 제발 도와 주실 수 있습니까?

감사합니다.

Answer 1

당신은 당신이 당신의 응용 프로그램에 dll 파일을 구현해야 할 부분을 놓치고, 코드에 이것을 추가하려고 :

Public Function GenerateScript(code As String) As IScript 
    Using provider As New VBCodeProvider() 
     Dim parameters As New CompilerParameters() 
     parameters.GenerateInMemory = True 
     Parameters.EmbeddedResources.Add("C:\Users\zjf\AppData\Local\Temp\ykujgxkp.dll") 
     Parameters.ReferencedAssemblies.AddRange(New String() {"System.dll", "System.Drawing.dll", "System.Windows.Forms.dll", "System.Management.dll", "C:\Users\zjf\AppData\Local\Temp\ykujgxkp.dll"}) 
     Dim interfaceNamespace As String = GetType(IScript).Namespace 
     Dim codeArray() As String = New String() {"Imports " & interfaceNamespace & Environment.NewLine & code} 
     Dim results As CompilerResults = provider.CompileAssemblyFromSource(parameters, codeArray) 
     Return CType(results.CompiledAssembly.CreateInstance("Script"), IScript) 
    End Using 
End Function 

:

이

Parameters.EmbeddedResources.Add("C:\Users\zjf\AppData\Local\Temp\ykujgxkp.dll") 
Parameters.ReferencedAssemblies.AddRange(New String() {"System.dll", "System.Drawing.dll", "System.Windows.Forms.dll", "System.Management.dll", "C:\Users\zjf\AppData\Local\Temp\ykujgxkp.dll"}) 

그래서 최종 코드는 다음과 같이해야한다