for Jflemin - VB and Rumba

How do I declare the API functions in ehlapi.32?
LVL 4
wesleystewartAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

jfleminCommented:
' HLLAPI FUNCTION DECLARATIONS
Private Declare Function WD_AdviseHostUpdate Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal hInstanceMsg As Integer, ByVal Msg As Integer) As Integer
Private Declare Function WD_ConnectPS Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_Convert Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ConvertType As Integer, RowCol As RowCol, ByVal ShortName As String) As Integer
Private Declare Function WD_CopyFieldToString Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Position As Integer, ByVal Buffer As String, ByVal Length As Integer) As Integer
Private Declare Function WD_CopyOIA Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal OIAData As String, ByVal Length As Integer) As Integer
Private Declare Function WD_CopyPS Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Buffer As String, ByVal Length As Integer) As Integer
Private Declare Function WD_CopyPSToString Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Position As Integer, ByVal Buffer As String, ByVal Length As Integer) As Integer
Private Declare Function WD_CopyStringToField Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Position As Integer, ByVal Buffer As String) As Integer
Private Declare Function WD_CopyStringToPS Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Position As Integer, ByVal Buffer As String, ByVal Length As Integer) As Integer
Private Declare Function WD_DeletePS Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_DisconnectPS Lib "EhlApi32.dll" (ByVal hInstance As Integer) As Integer
Private Declare Function WD_DisplayCursor Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Position As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_DisplayPS Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_FindFieldLength Lib "EhlApi32.dll" (ByVal hInstance As Integer, Length As Long, ByVal Position As Integer, ByVal FindData As String) As Integer
Private Declare Function WD_FindFieldPosition Lib "EhlApi32.dll" (ByVal hInstance As Integer, Location As Integer, ByVal Position As Integer, ByVal FindData As String) As Integer
Private Declare Function WD_GetKey Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal GetKeyData As String) As Integer
Private Declare Function WD_GetSessionHWND Lib "EhlApi32.dll" (ByVal hInstance As Integer) As Integer
Private Declare Function WD_Pause Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Length As Integer) As Integer
Private Declare Function WD_PostInterceptStatus Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_QueryCursorLocation Lib "EhlApi32.dll" (ByVal hInstance As Integer, Location As Integer) As Integer
Private Declare Function WD_QueryFieldAttribute Lib "EhlApi32.dll" (ByVal hInstance As Integer, iAttribute As Integer, ByVal Position As Integer) As Integer
Private Declare Function WD_QueryHostUpdate Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_QuerySessionStatus Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal SessionData As String) As Integer
Private Declare Function WD_QuerySystem Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal SystemData As String) As Integer
Private Declare Function WD_ReceiveFile Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal TransferData As String) As Integer
Private Declare Function WD_Release Lib "EhlApi32.dll" (ByVal hInstance As Integer) As Integer
Private Declare Function WD_Reserve Lib "EhlApi32.dll" (ByVal hInstance As Integer) As Integer
Private Declare Function WD_ResetSystem Lib "EhlApi32.dll" (ByVal hInstance As Integer) As Integer
Private Declare Function WD_RunMacro Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Buffer As String) As Integer
Private Declare Function WD_RunProfile Lib "EhlApi32.dll" (ByVal Profile As String, ByVal SW_Value As Integer) As Integer
Private Declare Function WD_SearchField Lib "EhlApi32.dll" (ByVal hInstance As Integer, Location As Integer, ByVal Position As Integer, ByVal Buffer As String) As Integer
Private Declare Function WD_SearchPS Lib "EhlApi32.dll" (ByVal hInstance As Integer, Location As Integer, ByVal Position As Integer, ByVal SearchData As String) As Integer
Private Declare Function WD_SendFile Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal TransferData As String) As Integer

'Private Declare Function WD_Sendkey Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal KeyData As String) As Integer
Private Declare Function WD_Sendkey Lib "Eehllapi.dll" (ByVal hInstance As Integer, ByVal KeyData As String) As Integer

Private Declare Function WD_SetCursor Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal Position As Integer) As Integer
Private Declare Function WD_SetSessionParameters Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal SSPData As Long) As Integer
Private Declare Function WD_ShowSession Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShowWindow As Integer) As Integer
Private Declare Function WD_StartHostNotification Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal NotifyData As String) As Integer
Private Declare Function WD_StartKeystrokeIntercept Lib "EhlApi32.dll" Alias "WD_StartKSIntercept" (ByVal hInstance As Integer, ByVal SKIData As String) As Integer
Private Declare Function WD_StopHostNotification Lib "EhlApi32.dll" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_StopKeystrokeIntercept Lib "EhlApi32.dll" Alias "WD_StopKSIntercept" (ByVal hInstance As Integer, ByVal ShortName As String) As Integer
Private Declare Function WD_Wait Lib "EhlApi32.dll" (ByVal hInstance As Integer) As Integer


I haven't been able to get the SendKey function to work, but everything else seems okay.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
wesleystewartAuthor Commented:
Awesome.

I don't suppose you know where I can find some documentation?

About "ByVal hInstance As Integer".  What kind of values am I putting in there?  Is my Rumba instance numbered?  Is it a 0 or 1?  I can probably figure it out in a few hours, but if you could just get me started . . . .

Thanks for your help.

Wes
0
jfleminCommented:
I cannot find documentation anywhere. Everything that I've done has been by playing around until I get it right. I've even called WallData to buy a technical refrence, but they said that don't sell them. If you buy Rumba, the documentation comes with the product, but our company just buys the liscence to save money.

You can have multiple connections to the same ShortName. I only have need for one instance at a time, so all of my hInstance are 1's in my class module.
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.