This code works on my developement machine but not on clients machine.
I am getting error - run time error '53' File not found MDicInstallCheck.dll.
What the hell is this![]()
. MDicInstallCheck.dll is developed in VC (It can't be reffered from Project >> References).
My application's exe & MDicInstallCheck.dll are in the same directory.
VB Code:
Private Declare Function MDicInstallCheck Lib "MDicInstallCheck.dll" (ByVal szCmdLine As String) As Boolean Private Sub cmdCancel_Click() Unload Me End Sub Private Sub cmdOK_Click() Dim strCmdLine As String strCmdLine = Chr(34) & "{" & txtKey.Text & "}" & Chr(34) & " " & txtHide.Text If (MDicInstallCheck(strCmdLine)) Then MsgBox "Registration Complete. Activated Installation", vbInformation, "MRecord 2004 PRO Release 3" MsgBox "Thank You for Installing MRecord", vbInformation, "MRecord 2004 PRO Release 3" End Else MsgBox "Invalid Entry, Try Again", vbExclamation, "MRecord Release 3 Setup" End If End Sub Private Sub Form_Unload(Cancel As Integer) Shell (App.Path & "\PV.exe -k -f msiexec.exe") MsgBox "Installation Aborted", vbInformation, "MRecord Professional Setup" End End Sub




. MDicInstallCheck.dll is developed in VC (It can't be reffered from Project >> References).
Reply With Quote