用findwindow找到窗口句柄，如何用postmessage选择"确定"？

[merryhoneymoon]

用findwindow找到窗口句柄（如下图），如何用postmessage选择"确定"？不要关闭，要点"确定"啊,

-----------------------
|选择框 |
-----------------------
| ------ ------ |
| |确定| |取消 | |
| ------ ------ |
-----------------------

[gdami]

FindWindowEx frmHwnd, ByVal 0&, "Button", vbnullstring

应该是第1个按钮，这么找就行了。

[merryhoneymoon]

另：postMessage 中的&10 、&12 是什么东东？有没有一个是选择确定的？

[BlueBeer]

发送一个按下回车键的消息试试

[online]

t = FindWindow("#32770", vbNullString)
d = FindWindowEx(t, ByVal 0&, "Button", "确定")

[HtSoft]

用楼上方法试试吧

[gdami]

Private Const BM_CLICK = &HF5 (表示单击消息）

'先用上面的方法找到确定按钮的句柄 d

postmessage d,0,BM_CLICK,0

[gdami]

写错了，不好意思。应该是

postmessage d,BM_CLICK, 0, 0

[merryhoneymoon]

我要选择Outlook Express框框的"发送"按钮，可按钮有的's'有下划线，不成啊~~~~帮帮我~~

http://www.cerholding.com.cn/images/sendmail.jpg

程序如下：
=============
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long

Private Sub Timer1_Timer()'定时器,每1秒检测一次
frmHwnd = FindWindow(vbNullString, "Outlook Express")
If frmHwnd <> 0 Then
FindWindowEx frmHwnd, ByVal 0&, "Button", "发送(&s)"
End If
End Sub
=================

[merryhoneymoon]

to :gdami(糖米)
可是它怎么知道我单击哪一个按钮？

[merryhoneymoon]

我的按钮中有下划线啊，如何找到按钮的句柄？？？