AutoItSetOption("WinTitleMatchMode" , 2) ;匹配标题: 1=开头, 2=子串, 3=完全, 4=高级 , -1 to -4=Nocase
AutoItSetOption("WinDetectHiddenText",0) ;检测隐藏的窗口文本: 0 = 不检测隐藏文本(默认) 1 = 检测隐藏文本
#Include <GuiToolBar.au3>
#include <IE.au3>
#include <Array.au3>
$oIEhwnd = WinGetHandle ("[class:IEFrame]")
if @Error Then
Exit( msgbox(48,0,"不存IE窗口") )
Endif
;//激活IE
WinActivate ( $oIEhwnd )
;////////////////网页可以保存-但在网页内有其他ActiveX时失败/////////////
;/////////// 也就是说execCommand方法行不通/////////////
; $oIE = _IEAttach ($oIEhwnd,"HWND")
; $oIEDoc = _IEDocGetObj ( $oIE )
; $oIEwin = $oIEDoc.ParentWindow
;$oIEwin.alert("ok")
;$oIEDoc.execCommand('SaveAs',true,'true');
;$oIEDoc.execCommand("SaveAs",True, _IEPropertyGet ( $oIE, "title" ) & ".txt" )
;///////////////////////////////////////
;取得Toolbar的HWND
;//$oMenuHwnd = ControlGetHandle($oIEhwnd, Default, "[CLASS:ToolbarWindow32; INSTANCE:4]") ;//IE6
dim $hToolbar = ControlGetHandle( $oIEhwnd,Default,"[CLASS:ToolbarWindow32; INSTANCE:10]") ;//IE8
$oCtlCount = _GUICtrlToolbar_ButtonCount($hToolbar)
for $i=0 to $oCtlCount - 1
$iCommandID = _GUICtrlToolbar_IndexToCommand($hToolbar, $i)
$t = _GUICtrlToolbar_GetButtonText($hToolbar, $iCommandID)
msgbox(48, $i, $iCommandID & @CR& $t )
next
#cs
; 0: 32768 文件(&F) 如何取得 文件菜单 下面 另存为 项的 CommandID进行调用操作
; 1: 32832 编辑(&E)
; 2: 32896 查看(&V)
; 3: 33136 收藏夹(&A)
; 4: 32960 工具(&T)
; 5: 33024 帮助(&H)
#ce
|