当前位置：文江博客话题详情

独立可执行文件

发布于 2024-07-16 19:31:32 字数 189 浏览 4 评论 0原文

我正在 VB.NET 中编写一个相对简单的程序。我试图使安装过程对用户来说尽可能简单。

我知道可以使用调试目录中的可执行文件作为独立的可执行文件，但是这种方法有什么缺点吗？例如，如果用户的计算机上没有.NET，则程序将无法运行。

有没有办法发布该程序，使其独立于单个可执行文件中？

感谢帮助。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

盗梦空间 2024-07-23 19:31:32

我认为 ClickOnce 部署可执行文件是实现这一目标的最接近的选择。
这里有一个关于如何执行此操作的很好的教程：ClickOnce 部署

回复收藏 0 原文

坦然微笑 2024-07-23 19:31:32

正如我提到的，Microsoft 提供了 ILMerge，但如果您不想使用第三方应用程序，那么您可以自己编写代码。您的客户端仍然需要 .Net Framework，但它允许您隐藏依赖项。如果您还想包含 .Net dll，则必须在引用设置中将引用设置为“复制本地”。

该程序要求您将 dll 添加为资源。每当您的程序需要该 dll 时，它都会使用程序集解析挂钩按需加载它。如果您有多个 dll，则必须有一个 switch case 或一个列表查找，以根据 ResolveEventArgs.Name 加载正确的 dll。

Module Program
    ''//Entry Point add dependency resolver hook
    Sub Main()
        AddHandler AppDomain.CurrentDomain.AssemblyResolve, _
                   AddressOf AssemblyReslover
    End Sub

    Private Function AssemblyReslover(ByVal sender As Object, _
                                  ByVal e As ResolveEventArgs) _
                                  As Assembly
       ''//ReferenceAssembly
        Dim ra As Assembly
        ra = Assembly.Load(My.Resources.MyDLL)
        Return ra
    End Function

End Module

http://support.microsoft.com/kb/837908

As I mentioned Microsoft offers ILMerge but if you do not want to use a 3rd party application this is how you would code it yourself. Your client will still need the .Net Framework but it will allow you to hide your dependencies. If you want to include .Net dlls as well you must set your references to "copy local" in the references setting.

This program requires that you add your dll as a resource. Whenever your program requires that dll it will load it on demand by use of the assembly resolve hook. If you had multiple dlls you would have to have a switch case or a list look up that loaded the correct dll based upon ResolveEventArgs.Name.

Module Program
    ''//Entry Point add dependency resolver hook
    Sub Main()
        AddHandler AppDomain.CurrentDomain.AssemblyResolve, _
                   AddressOf AssemblyReslover
    End Sub

    Private Function AssemblyReslover(ByVal sender As Object, _
                                  ByVal e As ResolveEventArgs) _
                                  As Assembly
       ''//ReferenceAssembly
        Dim ra As Assembly
        ra = Assembly.Load(My.Resources.MyDLL)
        Return ra
    End Function

End Module

http://support.microsoft.com/kb/837908

回复收藏 0 原文