Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Finding the path to the WinFax Pro Send COM object
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00783788
Message ID:
00783971
Views:
11
>I am not that familiar with automation, and was hoping someone could answer a question I have. I am instantiating a WinFax Pro Send object that may use one of the WinFax Pro cover pages when I create a fax. I need to know where WinFax Pro is installed, so that I can find the cover page. Cover pages are located in a sub-folder named Cover. Is there anyway I can get the full path to where the WinFax Pro Send object is instantiated from?

Chris,

Try
? GetServerName(...)
RETURN

FUNCTION GetServerName
LPARAMETER tcServerName
LOCAL loReg, laCLSIDValList[1], laServerNameValList[1], lcServerName
loReg = NewObject("Registry", HOME() + "FFC\Registry")
lcServerName = Null
WITH loReg
  IF .OpenKey(tcServerName + "\CLSID") = 0
    .EnumKeyValues(@laCLSIDValList)
    IF .OpenKey("CLSID\" + laCLSIDValList[1,2] + "\LocalServer32") = 0
      .EnumKeyValues(@laServerNameValList)
      lcServerName = laServerNameValList[2]
    ENDIF 
  ENDIF
ENDWITH
RETURN lcServerName 
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform