Which process is using my DLL?

[danielkw]

Hi everyone!

I have a question regarding ActiveX dll:s created in VB. Here is my prototype situation:
I create a public class called Class1 in my DLL project. I compile my DLL.
I start a new project and and a reference to my DLL. In frmMain_Load I write:
Dim x as MyDLL.Class1
set x = new Class1

The last line will initiate Class_Initialize in Class1. I want this procedure to be able to find out exactly which process is creating an instance of this class, i.e. I want the DLL to be able to know which EXE (in this case) initiated it.

ActiveX dlls are in-process servers which probably means that the dll will be able to find out which process it is running in (i.e. the EXE process calling the dll).

What I am trying to achieve is simply that the DLL will check to see if the calling application has permission to use the dll or not.

Hope you all understand my situation here and thanks in advance!

[Darkolord]

Hi, try this to get a file name of process owner:

Private Declare Function GetModuleFileName _
 Lib "kernel32" Alias "GetModuleFileNameA" ( _
 ByVal hModule As Long, _
 ByVal lpFileName As String, _
 ByVal nSize As Long) As Long
 
Private Function GetOwnerFileName() As String
    Dim sFile As String
    Dim nLen As Long
    Const MAX_PATH = 260 As Long
 
    sFile = Space$(MAX_PATH)
    nLen = GetModuleFileName(0, sFile, MAX_PATH)
    GetOwnerFileName = Left$(sFile, nLen)
End Function