Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

Alternative to SendKeys

Posted on 2002-05-30
4
Medium Priority
?
555 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 1

Accepted Solution

by:
Toad224 earned 300 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

Tech or Treat!

Submit an article about your scariest tech experience—and the solution—and you’ll be automatically entered to win one of 4 fantastic tech gadgets.

Question has a verified solution.

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

Background What I'm presenting in this article is the result of 2 conditions in my work area: We have a SQL Server production environment but no development or test environment; andWe have an MS Access front end using tables in SQL Server but we a…
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
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…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
Suggested Courses

610 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