如何在au3里只显示ie设定网站的某一个位置的内容?[已解决]
本帖最后由 mtvtop 于 2011-12-3 00:28 编辑Func _go()
_IENavigate ($oIE,"http://www.qq.com/")
EndFunc
$TabSheet1 = GUICtrlCreateTabItem("网页")
$oIE = _IECreateEmbedded ()
$GUIActiveX = GUICtrlCreateObj($oIE,15,30,1000,600)
如何只显示今日话题部分的内容? #include <GUIConstants.au3>
#include <IE.au3>
GUICreate("Test", 875, 400)
$oIE = _IECreateEmbedded ()
$GUIX = GUICtrlCreateObj($oIE, 0, 20, 875, 250)
_IENavigate ($oIE, "")
GUISetState(@SW_SHOW)
$Url = 'http://www.qq.com/'
$oHTTP = ObjCreate('microsoft.xmlhttp')
$oHTTP.Open('get', $Url, False)
$oHTTP.Send()
$str = BinaryToString($oHTTP.responseBody)
Local $Test = StringRegExp($str, '<!--今日话题-->((?s).+)<!--今日话题 end-->', 3)
_IEDocWriteHTML ($oIE, $Test)
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE ;==>退出事件
Exit
EndSelect
WEnd 回复 2# lynfr8
这个是提取代码!
我想要的不是通过网页提取,就有点想html里的 ifram 这样的。
如果我要提取的部分是flash呢?用这个好像取不出来吧 本帖最后由 lynfr8 于 2011-10-24 22:36 编辑
回复 3# mtvtop #include <GUIConstants.au3>
$Obj = ObjCreate("ShockwaveFlash.ShockwaveFlash.9")
If @error Then Exit
GUICreate("嵌入flash测试by afan", 800, 400)
$control = GUICtrlCreateObj($Obj, 10, 30, 780, 300)
If $control = 0 Then Exit (MsgBox(0, "Error", "Error"))
GUISetState()
$Obj.Movie = "http://flash.weather.com.cn/sk2/shikuang.swf?id=101010100"
$Obj.Play()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
OnExit()
EndSelect
WEnd
Func OnExit()
GUIDelete()
Exit
EndFunc ;==>OnExit
http://www.autoitx.com/thread-9628-1-1.html 本帖最后由 lynfr8 于 2011-10-24 22:48 编辑
回复 3# mtvtop
你不提取源代码你怎么显示?
网页框架不是堆积木你想随便搬哪一块就搬哪一块的
你要做到原来那部分一模一样的话还牵涉到css和js脚本
先去学学网页的基本知识和DOM吧 回复 4# lynfr8
再问一下,我想把状态栏不显示出来要怎么写呢? 回复 6# mtvtop
_IEPropertySet
"statusbar" 指定表示浏览器状态栏是否可见的值.
页:
[1]