打印:如何不打印页眉页脚,碰到打印背景图片怎么办?
各位大侠你们好
如何不打印页眉页脚,碰到打印背景图片怎么办?
PS:页眉页脚下面这个方法我已用过,但在IE6下好像不起作用
-----------------------------------------------------
<script language="VBScript">
dim hkey_root,hkey_path,hkey_key
hkey_root="HKEY_CURRENT_USER"
hkey_path="\Software\Microsoft\Internet Explorer\PageSetup"
'//设置网页打印的页眉页脚为空
function pagesetup_null()
on error resume next
Set RegWsh = CreateObject("WScript.Shell")
hkey_key="\header"
RegWsh.RegWrite hkey_root+hkey_path+hkey_key,""
hkey_key="\footer"
RegWsh.RegWrite hkey_root+hkey_path+hkey_key,""
end function
'//设置网页打印的页眉页脚为默认值
function pagesetup_default()
on error resume next
Set RegWsh = CreateObject("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"
end function
</script>
------------------------------------------------------------------------
提示:Set RegWsh = CreateObject("WScript.Shell")这句报错,
我想可能是权限的关系,不知道还有没有其它的方法了,先谢谢了~