JS网页打印处理

最新推荐文章于 2024-08-26 17:42:05 发布

转载最新推荐文章于 2024-08-26 17:42:05 发布 · 511 阅读

文章标签：

#function #path #vbscript #generator #button #input

C# 同时被 2 个专栏收录

6 篇文章

订阅专栏

Other

3 篇文章

订阅专栏

3、ASP页面打印时如何去掉页面底部的路径和顶端的页码编号
（1）ie的文件-〉页面设置-〉讲里面的页眉和页脚里面的东西都去掉，打印就不出来了。
（2）<HTML>
<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>

<BODY>
<br/>
<br/>
<br/>
<br/>
<br/>
<br/><p align=center>
<input type="button" ＆#118alue="清空页码" ＆#111nclick=pagesetup_null()> <input type="button" ＆#118alue="恢复页吗" ＆#111nclick=pagesetup_default()><br/>

</p>
</BODY>
</HTML>