Hello,
I have been using the function below to register activex controls in my app
and it has worked great (VFP9 on XP) ... until Vista.
Now it fails. I don't have Vista. Any ideas on how to get it to work?
Thanks,
Kent
function RockRegisterOCX
* This function registers/unregisters an OCX/ActiveX control
*-- Parameters:
* tcFileName = the name of the file that contains
* the control(s), including the path.
*-- Returns:
* Logical TRUE if successful, FALSE otherwise.
*-- Call sample:
* llRegistered = RegisterLib("c:\windows\system\comctl32.ocx",.T.)
LParameters tcFileName, tlOnOff
Local llSuccess
If File(tcFileName)
If tlOnOff
Declare Integer DllRegisterServer In (tcFileName) As
__DllRegisterServer__
*-- This function returns 0 if successful
Store __DllRegisterServer__() = 0 To llSuccess
Else
Declare Integer DllUnRegisterServer In (tcFileName) As
__DllUnRegisterServer__
*-- This function returns 0 if successful
Store __DllUnRegisterServer__() = 0 To llSuccess
Endif
Else
llSuccess = .F.
Endif
Return llSuccess
endfunc
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
