How to Find the Path of a Program Using WordBasic

ID: Q120772

The information in this article applies to:

Microsoft Word for Windows, versions 2.0, 2.0a, 2.0a-CD, 2.0b, 2.0c, 6.0, 6.0a

SUMMARY

This article describes how you can use a WordBasic macro to return the path of a program that is currently running.

MORE INFORMATION

The following macro example identifies the path for Microsoft Excel. You can substitute any valid Windows executable filename, such as WINWORD, MSACCESS, or POWERPNT in place of EXCEL in the following example.

Declare Function GetModuleFileName Lib "Kernel"(hModule As Integer,

lpFilename As String, nSize As Integer) As Integer

Declare Function GetModuleHandle Lib "Kernel"(lpModuleName As String)

As Integer

Sub MAIN

hModule = GetModuleHandle("EXCEL.EXE") Length = GetModuleFileName(hModule, Buffer$, 255) MsgBox "Path and Filename: " + Buffer$

End Sub

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

REFERENCES

"Microsoft Windows Software Development Kit"

Kbcategory: kbusage kbmacro kbhowto KBSubcategory: Additional reference words: winword2 winword 6.0a 6.0, 6.0a SDK word6

Version           : 2.0 2.0a 2.0a-CD 2.0b 2.0c
Platform          : WINDOWS

Last Reviewed: August 5, 1997