欢迎来到福编程网,本站提供各种互联网专业知识!

控制打印时页眉角的代码

发布时间:2007-02-08 作者: 来源:转载
复制代码代码如下:varhkey_root,hkey_path,hkey_keyhkey_root="HKEY_CURRENT_USER"hkey_path="\\Software\\Microsoft\\InternetExplorer\\PageSetup\\"//设置网页打印的页眉页脚为空functionpagesetup_null(){try{varRegWsh=newActiveXObject(
复制代码 代码如下:

varhkey_root,hkey_path,hkey_key
hkey_root="HKEY_CURRENT_USER"
hkey_path="SoftwareMicrosoftInternetExplorerPageSetup"
//设置网页打印的页眉页脚为空
functionpagesetup_null()
{
try{
varRegWsh=newActiveXObject("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){alert(e.name+""+e.message)}
}
//设置网页打印的页眉页脚为默认值
functionpagesetup_default()
{
try{
varRegWsh=newActiveXObject("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){alert(e.name+""+e.message)}
}





相关推荐