Solved

Alternative to SendKeys

Posted on 2002-05-30
4
509 Views
Last Modified: 2012-05-04
I need to control a menu in an external app.

SendKeys "%C" & "H"
or
SendKeys "%C" & "x"

does not always work.

I have the Window Handle, which means I can get the Menu Handle. How can I use PostMessage or SendMessage to do this?

0
Comment
Question by:Neal Hartman
  • 2
4 Comments
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 7045552
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 7045553
0
 
LVL 1

Accepted Solution

by:
Toad224 earned 100 total points
ID: 7046035
I believe you would use SendMessage with WM_CHAR... ie.

    iChar = Asc("A")  ' ansi value
    nRtn = SendMessage(hTxtLabel, WM_CHAR, iChar, 1)


This would be a good site to look at:
http://home.att.net/~geekStuff/wshAvoidingSendkeysPage.htm


You could always use the keybd_event API to do stuff like that...

Public Declare Sub keybd_event Lib "user32" Alias "keybd_event" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)


Good luck.
0
 
LVL 1

Author Comment

by:Neal Hartman
ID: 7046921
You put me in the right direction.
Acually it is:

Dim M1 As Long
Dim M2 As Long
Static sExit As Long
Static sHangUp As Long

    M1 = GetMenu(MainHwnd)
    M2 = GetSubMenu(M1, 0)
    sExit = GetMenuItemID(M2, 12)
    sHangUp = GetMenuItemID(M2, 11)


        PostMessage MainHwnd, WM_COMMAND, sHangUp, 0
        PostMessage MainHwnd, WM_COMMAND, sExit, 0

0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
VB error "Type mismatch" 2 53
Visual Basic Excel Formatting error 4 102
Microsoft Access combo box help 2 44
fso.FolderExists("\\server\HiddenFolder$") 4 64
I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

813 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now