I wanted to use the API-call SendMessageByString to pass a string from my VB
Application to a textbox in an HTML-Form.
But the only thing I can do is to change the text of the window.
What am I doing wrong? Can someone help me, please?

I got the window-handle (hwnd) and then use the SendMessageByString in this
context to pass "Test" to the textbox:

SendMessageByString(hWnd, WM_SETTEXT, 0, "Test")

May it be possible that I rather should use SendMessage instead?
Have you got an answer?

Thanks a lot!
Best wishes,
Eric

Matt

GetWindow( hWndCombo, GW_CHILD )

AS for the list box part, it belongs to the parent and not the combo so
you need to do a little more work :-

Detect WM_PARENTNOTIFY
Check LoWord( wParam ) = WM_CREATE
Cast lParam to hWnd to get hWndChild
Init a buffer string, say sClassName, to length 32
Call GetClassNameA(hWndChild, sClassName, 32)
Check sClassName = 'ComboLBox'
if so the list box handle = hWndChild

I'm not strictly speaking a VB programmer, so I can't give you a VB
example. Sorry!

Mark

Thanks a lot for your help.
Your idea is great, 'cause I want to get this hwnd of the only existing
textbox (editbox) in that window...
But somehow, I can't get the hwnd...GetWindow returns some hwnd... but none
of it works...hmmm... :-((
Do you know the classname of textboxes (editboxes)?

Many thanks and best wishes,
Eric

Thanks so much for your help! That's exactly what I need!
I was trying to loop through the controls in the window, but I was not able
to get any hwnd - always a 0 (probably 'cause I don't know the classname for
textboxes in FindWindowEx...).
There is only one textbox (editbox) in that window and I like to get it's
hwnd. Do you know, how to get this?

I would be very thankful, if you got an answer and could help me!

Many thanks and best wishes,
Eric

If you need to send a msg to it, just use the API prototype
SendDlgItemMessage( Combo1.hWnd, 1001, msg, wParam, lParam )

Have Fun!

--------------------------------------

Private Declare Function GetDlgItem Lib "user32" (ByVal hDlg As Long, ByVal
nIDDlgItem As Long) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As
Any) As Long

Private Const WM_SETTEXT = &HC

Private Sub Command1_Click()
    Dim hWndChild As Long

    hWndChild = GetDlgItem(Combo1.hwnd, 1001)

    Call SendMessage(hWndChild, WM_SETTEXT, 0, ByVal "Hello There")
End Sub

So many thanks again!
Your idea was nearly the solution but it only works, if I know or can
retrieve the handle of the Combo...
As my textboxes (e.g. on an HTML-form in the IE5) are not necessarily a part
of a combo and are not part of a (known) VB-Form it is not possible to use
the Combo.hwnd.
So, where do I get the handle of the textbox in any window from?

Thanks so much for your time and help!
Best wishes,
Eric