' Return True if the application is running as an EXE' Return False if the application is running as a DLLFunction RunningAsExe() As Boolean ' get the codebase of the running assembly Dim codeBase As String = Reflection.Assembly.GetExecutingAssembly.CodeBase ' extract the extension Dim ext As String = System.IO.Path.GetExtension(codeBase) ' return True if extension is EXE Return String.Compare(ext, ".exe", True) = 0End Function
Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
























