多IE 窗口嵌套特效,大虾来哦
如图效果:左边分别是三个网址,点击一个网址,右边就打开IE窗口显示相应的网站,这种效果咋做最好能附上源码,多谢
我先问一下,不要三个网址,一个你会做么? 算了,就几行代码#include<ie.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$oIE = _IECreateEmbedded()
GUICreate("", 510, 510, -1, -1)
$B1 = GUICtrlCreateButton("百度", 0, 64, 75, 25)
$B2 = GUICtrlCreateButton("论坛", -1, 89, 75, 25)
$B3 = GUICtrlCreateButton("淘宝", -1, 116, 75, 25)
$GUIActiveX = GUICtrlCreateObj($oIE, 100, 0, 400, 500)
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $b1
_IENavigate($oIE, "http://www.baidu.com/")
Case $msg = $b2
_IENavigate($oIE, "http://www.autoitx.com/")
Case $msg = $b3
_IENavigate($oIE, "http://www.taobao.com/")
EndSelect
WEnd 呵呵,看到代码发现自己想复杂了 算了,就几行代码
tryhi 发表于 2011-6-4 01:55 http://autoitx.com/images/common/back.gif
看来这家伙拿了源码走人了。。。吭都没吭一声。。。。 看来这家伙拿了源码走人了。。。吭都没吭一声。。。。
131738 发表于 2011-6-4 14:51 http://www.autoitx.com/images/common/back.gif
哎……估计是,这家伙今天有登录过,就是没吭声,过两天拿他来扣钱
俺们小菜一个,高手别见笑哇
本帖最后由 d12990 于 2011-6-5 10:59 编辑tryhi 多谢了
我不会走的,放心呐{ :face (125):} tryhi 多谢了
我不会走的,放心呐{ :face (125):}
d12990 发表于 2011-6-5 10:56 http://www.autoitx.com/images/common/back.gif
如果解决的话把标题改一下,不然AFAN版会生气的{:face (303):} 今天一直在测试代码,楼上的源码不错,只是我后来想把网址放在下面显示,看上去会美观些,左右布局改为上下布局
搞了半天也改不了那种效果,楼上大哥能不能帮我下...拜谢
窗口样式:
IE窗口
网址1 网址2 网址3 这个不错啊,学习 这样也能加钱啊 这样也能加钱啊 无聊的帖子。我来灌水哈。 来看看,好东西 上下布局的.稍微修改的LS的#include<ie.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$oIE = _IECreateEmbedded()
GUICreate("专用", -1, -1, -1, -1, $WS_SIZEBOX)
$B1 = GUICtrlCreateButton("百度", 0, 0, 75, 25)
$B2 = GUICtrlCreateButton("论坛", 100, 0, 75, 25)
$B3 = GUICtrlCreateButton("淘宝", 200, 0, 75, 25)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 30, 400, 500)
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $b1
_IENavigate($oIE, "http://www.baidu.com/")
Case $msg = $b2
;$oIE = _IECreate("http://www.autoitx.com/logging.php?action=login")
_IENavigate($oIE, "http://www.autoitx.com/logging.php?action=login")
Case $msg = $b3
_IENavigate($oIE, "http://www.taobao.com/")
EndSelect
WEnd