VBA and DLL
2 отговора
0 прегледа
VBA and DLL
Здравейте! Може да се каже, че блудния син се завръща. Писал съм на VB има няма преди 6 години. В последните години се подвизавам под Linux и C++.
Както и да е! Клиента иска и ние пишем а той иска разни врътки с Еxcel, Access и т.н
Конкретния ми въпрос защо от Аccess 2003 (MS Officce proffessional) извикванията към Win32 не минават. Kонкретно ми трябва ODBC32.dll но дори този пример от MSDN не бачка:
Private Declare Function GetSystemMetrics Lib "User32" (ByVal nIndex As Long) As Long
Public Const SM_CXFRAME = 32
Public Const SM_CYFRAME = 33
Public Property Get ScreenHeight() As Long
' Return screen height in pixels.
ScreenHeight = GetSystemMetrics(SM_CYFRAME)
End Property
Public Property Get ScreenWidth() As Long
' Return screen width in pixels.
ScreenWidth = GetSystemMetrics(SM_CXFRAME)
End Property
Няма RunTime Error или каквото и да е, просто връщаната стойност е или 0 или празен стринг. Ако сменя името на библиотеката Lib "User32" на "1123445" няма никаква промяна в поведението на кода никакви грешки.
Ще бъда много благодарен не добър отговор но ме гложди чувството, че точно с този VBA (MS Office 2003 Proffessional) няма да ме огрее.
Както и да е! Клиента иска и ние пишем а той иска разни врътки с Еxcel, Access и т.н
Конкретния ми въпрос защо от Аccess 2003 (MS Officce proffessional) извикванията към Win32 не минават. Kонкретно ми трябва ODBC32.dll но дори този пример от MSDN не бачка:
Private Declare Function GetSystemMetrics Lib "User32" (ByVal nIndex As Long) As Long
Public Const SM_CXFRAME = 32
Public Const SM_CYFRAME = 33
Public Property Get ScreenHeight() As Long
' Return screen height in pixels.
ScreenHeight = GetSystemMetrics(SM_CYFRAME)
End Property
Public Property Get ScreenWidth() As Long
' Return screen width in pixels.
ScreenWidth = GetSystemMetrics(SM_CXFRAME)
End Property
Няма RunTime Error или каквото и да е, просто връщаната стойност е или 0 или празен стринг. Ако сменя името на библиотеката Lib "User32" на "1123445" няма никаква промяна в поведението на кода никакви грешки.
Ще бъда много благодарен не добър отговор но ме гложди чувството, че точно с този VBA (MS Office 2003 Proffessional) няма да ме огрее.
Редактирано от rival на
Re: VBA and DLL
Току що пробвах примера под VBA (MS Office 2003 Proffessional) и си работи много добре, може би ти нещо бъркаш
Re: VBA and DLL
Проблема се оказа незнам защо в анти-вирусната. Щом изключих real time protection и всичко си тръгна.
Това се случва със Norton and Kaspersky
Това се случва със Norton and Kaspersky