Kamis, 21 Juli 2016

[MS_AccessPros] Determine if ocx is registered

 

Hi,


I found this code in internet:


Option Explicit  Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long  Private Declare Function FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As Long     Private Sub Form_Click()     If IsDLLAvailable("TABCTL32.OCX") Then         MsgBox "DLL or OCX passed!"     Else         MsgBox "DLL or OCX Failed!"         ' MsgBox ApiErrorText(Err.LastDllError)         ' for ApiErrorText, see: http://www.mvps.org/vb/index2.html?tips/formatmessage.htm     End If  End Sub    Function IsDLLAvailable(ByVal DllFilename As String) As Boolean     Dim hModule As Long     ' attempt to load the module     hModule = LoadLibrary(DllFilename)     If hModule > 32 Then         FreeLibrary hModule ' decrement the DLL usage counter         IsDLLAvailable = True     End If  End Function


 but does not work !! You have any suggestions?


You can recommend an alternative to MSFlxGrd.ocx?


thank you very much

Domenico

 

__._,_.___

Posted by: domcoz@gmail.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)

Save time and get your email on the go with the Yahoo Mail app
Get the beautifully designed, lighting fast, and easy-to-use Yahoo Mail today. Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.


.

__,_._,___

Tidak ada komentar:

Posting Komentar