Call function from C++.dll
Hi, I tried to call a function from C++.dll but without success. Here is my code in VBS: Options Explicit Sub TestCallDll Dim Def_Environment, Def_DLL, activated...
Forum Discussion
Hi Jared and thanks for your answer,
I have modified my code as you suggested:
Options Explicit
Sub TestCallDll
Dim Def_Environment, Def_DLL, activated, lib
Set Def_Environment = DLL.DefineEnvironment(True)
Set Def_DLL = Def_Environment.DefineDLL("MetrinoPlatformWin32")
Call Def_DLL.DefineProc("pft_IsOptionActivated", vt_int, vt_int, vt_int, vt_int, vt_int, vt_byref OR vt_bool, vt_void)
Set lib = Def_Environment.Load("C:\Program Files\Common Files\Gerico\Bin\MetrinoPlatformWin32.dll")
Call lib.pft_IsOptionActivated(0, 0, 0, 15, 1, activated)
End Sub
I still have the same error: Object doesn't support this property or method: 'lib.pft_IsOptionActivated'
I have validated the path to dll was correct and I got confirmation this a non-com dll in C++ by the developer.
Do I miss or misunderstand something else please?
Thanks and Regards,
Aurélien
I have modified my code as you suggested:
Options Explicit
Sub TestCallDll
Dim Def_Environment, Def_DLL, activated, lib
Set Def_Environment = DLL.DefineEnvironment(True)
Set Def_DLL = Def_Environment.DefineDLL("MetrinoPlatformWin32")
Call Def_DLL.DefineProc("pft_IsOptionActivated", vt_int, vt_int, vt_int, vt_int, vt_int, vt_byref OR vt_bool, vt_void)
Set lib = Def_Environment.Load("C:\Program Files\Common Files\Gerico\Bin\MetrinoPlatformWin32.dll")
Call lib.pft_IsOptionActivated(0, 0, 0, 15, 1, activated)
End Sub
I still have the same error: Object doesn't support this property or method: 'lib.pft_IsOptionActivated'
I have validated the path to dll was correct and I got confirmation this a non-com dll in C++ by the developer.
Do I miss or misunderstand something else please?
Thanks and Regards,
Aurélien