32-Bit GetModuleUsage Workaround

I have found a solution to the problem of GetModuleUsage not workingin 32-bit VB4. The TaskID returned by Shell can be used by AppActivatelike this:

         TaskID = Shell("DOSAPP.EXE", _                vbNormalFocus)        On Error GoTo finished        While True                DoEvents                AppActivate TaskID        Wendfinished:        On Error GoTo 0
Share the Post:
Share on facebook
Share on twitter
Share on linkedin


Recent Articles: