本文整理汇总了VB.NET中System.AppDomain.SetShadowCopyFiles方法的典型用法代码示例。如果您正苦于以下问题:VB.NET AppDomain.SetShadowCopyFiles方法的具体用法?VB.NET AppDomain.SetShadowCopyFiles怎么用?VB.NET AppDomain.SetShadowCopyFiles使用的例子?那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类System.AppDomain
的用法示例。
在下文中一共展示了AppDomain.SetShadowCopyFiles方法的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: ADProperties
' 导入命名空间
Imports System.Security.Policy
'for evidence object
Class ADProperties
Shared Sub Main(args() As String)
Dim setup As New AppDomainSetup()
' Shadow copying will not work unless the application has a name.
setup.ApplicationName = "MyApplication"
'Create evidence for the new application domain from evidence of
' current application domain.
Dim adevidence As Evidence = AppDomain.CurrentDomain.Evidence
' Create a new application domain.
Dim domain As AppDomain = AppDomain.CreateDomain("MyDomain", adevidence, setup)
' MyAssembly.dll is located in the Assemblies subdirectory.
domain.AppendPrivatePath("Assemblies")
' MyOtherAssembly.dll and MyThirdAssembly.dll are located in the
' MoreAssemblies subdirectory.
domain.AppendPrivatePath("MoreAssemblies")
' Display the relative search path.
Console.WriteLine("RelativeSearchPath: " & domain.RelativeSearchPath)
' Because Load returns an Assembly object, the assemblies must be
' loaded into the current domain as well. This will fail unless the
' current domain also has these directories in its search path.
AppDomain.CurrentDomain.AppendPrivatePath("Assemblies")
AppDomain.CurrentDomain.AppendPrivatePath("MoreAssemblies")
' Save shadow copies to C:\Cache
domain.SetCachePath("C:\Cache")
' Shadow copy only the assemblies in the Assemblies directory.
domain.SetShadowCopyPath(domain.BaseDirectory + "Assemblies")
' Turn shadow copying on.
domain.SetShadowCopyFiles()
Console.WriteLine("ShadowCopyFiles turned on: " & domain.ShadowCopyFiles)
' This will be copied.
' You must supply a valid fully qualified assembly name here.
domain.Load("Assembly1 text name, Version, Culture, PublicKeyToken")
' This will not be copied.
' You must supply a valid fully qualified assembly name here.
domain.Load("Assembly2 text name, Version, Culture, PublicKeyToken")
' When the shadow copy path is cleared, the CLR will make shadow copies
' of all private assemblies.
domain.ClearShadowCopyPath()
' MoreAssemblies\MyThirdAssembly.dll should be shadow copied this time.
' You must supply a valid fully qualified assembly name here.
domain.Load("Assembly3 text name, Version, Culture, PublicKeyToken")
' Unload the domain.
AppDomain.Unload(domain)
End Sub
End Class