手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>网络编程>Asp编程>列表

WEB打印设置解决方案一(通过修改注册表改变IE打印设置)

来源:互联网 作者:west263.com 时间:2008-02-23
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!
以下是IE打印设置脚本
<script language="VBScript">
Dim hkey_root,hkey_path,hkey_key

hkey_root = "HKEY_CURRENT_USER"
hkey_path = "\Software\Microsoft\Internet Explorer\PageSetup" //IE打印设置的注册表地址

//设置修改函数
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,"" //页脚

hkey_key="\margin_left"
RegWsh.RegWrite hkey_root hkey_path hkey_key,"1" //键值设定--左边边界

hkey_key="\margin_top"
RegWsh.RegWrite hkey_root hkey_path hkey_key,"1" //键值设定--上边边界

hkey_key="\margin_right"
RegWsh.RegWrite hkey_root hkey_path hkey_key,"1" //键值设定--右边边界

hkey_key="\margin_bottom"
RegWsh.RegWrite hkey_root hkey_path hkey_key,"1" //键值设定--下边边界
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>

除了以上键值以外还有以下几项,其值有待确认。
duplex
orientation
paper_size
paper_source
printer

注意:上面对页边距的设置为:1,实际设置值为25.4。

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!