VB.NET控制台程序获取程序运行路径

最新推荐文章于 2022-04-17 00:21:30 发布

双鱼星星

最新推荐文章于 2022-04-17 00:21:30 发布

阅读量4.7k

点赞数

分类专栏：系统运维

本文链接：https://blog.csdn.net/cashcat2004/article/details/49718141

版权

系统运维专栏收录该内容

78 篇文章 2 订阅

订阅专栏

有个项目以前用VB.net写的，想增加一个写日志功能，以方便定位程序的一些问题，转化的工作又比较多，于是乎考虑还是优化一下吧。

找了几个获取路径的函数，发现都是获取的环境路径，而本程序需要获取的是程序路径，然后增加日志文件操作。

通常网上介绍的几个方法有：

Application.StartupPath
Application.ExecutablePath
Server.MapPath

这3个方法在命令行程序中并不能使用，于是用了几个其他方法，最终发现AppDomain下面是可以使用的，供参考。

Module Module1
    ''' <summary>
    ''' 程序主函数
    ''' </summary>
    Sub Main()
        Dim appDir As String
        'appDir = Application.StartupPath
        'appDir = Application.ExecutablePath
        'appDir = Server.MapPath
        appDir = System.Environment.CurrentDirectory
        appDir = My.Computer.FileSystem.CurrentDirectory
        appDir = System.IO.Path.GetFullPath("C:\test.txt")
        appDir = AppDomain.CurrentDomain.SetupInformation.ApplicationBase
        Console.WriteLine(appDir)


    End Sub


End Module