开发学院网页设计 JavaScript JavaScript打印页面去除页眉页脚 VBScriptWEB打印... 阅读

JavaScript打印页面去除页眉页脚 VBScriptWEB打印,去页眉和页脚

　2008-09-05 19:59:03　来源：WEB开发网　　　

核心提示：//注册表路径var hkey_root,hkey_path,hkey_key;hkey_root="HKEY_CURRENT_USER";hkey_path="\Software\Microsoft\Internet Explorer\PageSetup\"; //设置页眉页

//注册表路径
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_key1="header";
　　　　 hkey_key2="footer";
　　　　 RegWsh.RegWrite(hkey_root+hkey_path+hkey_key1,"");
　　　　 RegWsh.RegWrite(hkey_root+hkey_path+hkey_key2,"");
　　 }catch(e)...{}　
}

//设置页眉页脚为默认值　
function PageSetup_Default()　
...{　
　 try...{　
　　　 var RegWsh = new ActiveXObject("WScript.Shell") ;　
　　　　 hkey_key1="header";　
　　　　 hkey_key2="footer";　
　　　　 RegWsh.RegWrite(hkey_root+hkey_path+hkey_key1,"&w&b页码，&p/&P");　
　　　　 RegWsh.RegWrite(hkey_root+hkey_path+hkey_key2,"&u&b&d");　
　　 }catch(e)...{}　
}　

function PRintReport()...{
　　 PageSetup_Null();//设置页眉页脚为空
　　 window.print();//打印页面
　　 PageSetup_Default();//设置页眉页脚为默认值
}

1. IE浏览器. 文件->页面设置.
把页脚去掉就行了.

2.用代码.
//有提示的..
<HEAD>
<TITLE> New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="YC">
<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>
</HEAD>