Send a character to active window

[Dasiths]

Hi,

This is what i use to send a character to the active window ...

But it does not work with some software .....

ds2 = active_control_hwnd

chr_a = â

Call PostMessage(ds2, WM_CHAR, Asc(chr_a), 0&)

Does anyone know a better way to send the charcater to the active window .... ?

the programs Outlook Express and Dreamweaver don't get the WM_CHAR command.....

[Dave Sell]

Try using SendKeys()

[Dasiths]

Hi,

I want to send it using sendmessage .....

[ALL]

the reason sertian applications dont recieve characters like
"áéÉÑÔ¾¶×Ü" may be because the application uses a font that doesn't support those characters.

Try using this and tell us if it workes:

Call PostMessage(ds2, WM_CHAR, 41, 0&)

[Dasiths]

Hi,

I used it this way and it worked

Call PostMessage(ds2, WM_CHAR, asc(chr_a), 1)

But can't send the backspace key that way ....

I tried the WM_KEYDOWN and WM_KEYUP messages too...

How can I send the backspace key using sendmessage ....?

Is there another way to send the backspace key using sendmessage...

[vbgamer45]

Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Const WM_CHAR As Long = &H102
Public Const VK_RETURN = &HD 'you must use your key LOOK HERE!

sub SendReturnToNotepad()

dim hWindow as long
hWindow=FindWindow(vbNullString,"Notepad")

SendMessage hWindow, WM_CHAR, VK_RETURN, 0&

end sub


If that doesn't work for you, you can try to get the
Virtual Key for backspace using this api.
Declare Function MapVirtualKey Lib "user32.dll" Alias "MapVirtualKeyA" ( _
ByVal wCode As Long, _
ByVal wMapType As Long) As Long