风行者 发表于 2011-8-16 14:44:23

隐藏IE滚动条

以前经常使用$oIE.document.body.scroll = "no" 来隐藏,但是很多网页都没有效果
现在给出新的方法,源码开放不收费,觉得还可以加分奖励下就满足了{:face (239):}

#include <IE.au3>
$oIE = _IECreateEmbedded()
GUICreate('',800,600)
GUICtrlCreateObj($oIE,0,0,800,600)
_IENavigate($oIE,"http://www.163.com")
_HideScroll($oIE)
GUISetState()

Do
Until GUIGetMsg()=-3

Func _HideScroll($Temp_Object)
        Local $hText = 'var temp_h1 = document.body.clientHeight;'& _
'var temp_h2 = document.documentElement.clientHeight;'& _
'var isXhtml = (temp_h2<=temp_h1&&temp_h2!=0)?true:false;'& _
'var htmlbody = isXhtml?document.documentElement:document.body;'& _
'htmlbody.style.overflow = "hidden";'
$Temp_Object.document.parentwindow.execscript($hText,"javascript")
EndFunc

黑色袜子 发表于 2011-8-16 14:46:09

强。。。牛逼。我一直想要的效果。

ashfinal 发表于 2011-8-30 23:51:46

不错 mark一下

紫色风林 发表于 2011-9-12 05:03:28

顶一下,谢谢楼主

mozha 发表于 2011-9-12 11:14:53

作个记号,下次再来

bbskingfly 发表于 2011-9-29 18:10:18

谢谢楼主真棒!

bbskingfly 发表于 2011-9-29 18:10:24

谢谢楼主真棒!

fangbaiyu 发表于 2011-10-24 14:10:13

谢谢楼主分享了
mark下来

ollydbg 发表于 2012-6-17 11:14:33

谢谢啊 正在找

angelink 发表于 2012-7-1 18:02:30

收藏,不过问一下隐藏有了什么用。

z761003 发表于 2012-7-4 17:49:04

真是好货啊

athland5013 发表于 2012-7-10 11:38:32

有用,衷心的说声谢谢

jixiren001 发表于 2012-7-14 21:40:47

我试了对内嵌的IE没什么效果啊,怪

chenzhouze 发表于 2012-7-15 23:52:21

谢谢,不知道能不能用得上

freedom 发表于 2012-11-25 13:55:52

IE9 下好像不生效?有没有别的兄弟能试下?
页: [1] 2
查看完整版本: 隐藏IE滚动条