会员
众包
新闻
博问
闪存
赞助商
HarmonyOS
Chat2DB
所有博客
当前博客
我的博客
我的园子
账号设置
会员中心
简洁模式
...
退出登录
注册
登录
ET
爬行的E.T
打印网页时怎么去掉页眉页脚
<
HTML
><
HEAD
>
<
script
language
="JavaScript"
>
var
hkey_root,hkey_path,hkey_key
hkey_root
=
"
HKEY_CURRENT_USER
"
hkey_path
=
"
\\Software\\Microsoft\\Internet Explorer\\PageSetup\\
"
//
设置网页打印的页眉页脚为空
function
pagesetup_null()
{
try
{
var
RegWsh
=
new
ActiveXObject(
"
WScript.Shell
"
)
hkey_key
=
"
header
"
RegWsh.RegWrite(hkey_root
+
hkey_path
+
hkey_key,
""
)
hkey_key
=
"
footer
"
RegWsh.RegWrite(hkey_root
+
hkey_path
+
hkey_key,
""
)
}
catch
(e)
{}
}
//
设置网页打印的页眉页脚为默认值
function
pagesetup_default()
{
try
{
var
RegWsh
=
new
ActiveXObject(
"
WScript.Shell
"
)
hkey_key
=
"
header
"
RegWsh.RegWrite(hkey_root
+
hkey_path
+
hkey_key,
"
&w&b页码,&p/&P
"
)
hkey_key
=
"
footer
"
RegWsh.RegWrite(hkey_root
+
hkey_path
+
hkey_key,
"
&u&b&d
"
)
}
catch
(e)
{}
}
</
script
>
</
HEAD
>
<
BODY
><
br
/><
br
/><
br
/><
br
/><
br
/><
br
/><
p
align
=center>
<input type
="button"
value
="清空页码"
onclick
=pagesetup_null()>
<input type
="button"
value
="恢复页码"
onclick
=pagesetup_default()><br/>
</p
></
BODY
></
HTML
>
posted on
2005-03-30 22:36
爬行的E.T
阅读(
2414
) 评论(
0
)
收藏
举报
刷新页面
返回顶部
导航
博客园
首页
新随笔
联系
订阅
管理
公告