WEB打印设置解决方案一
2018-09-06 12:50
以下是IE打印设置脚本
<script language=VBScript>
Dim hkey_root,hkey_path,hkey_key
hkey_root = HKEY_CURRENT_USER
hkey_path = SoftwareMicrosoftInternet ExplorerPageSetup //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,wb页，p/P //页数-
hkey_key=footer
RegWsh.RegWrite hkey_root+hkey_path+hkey_key,ubd //网址，日期等信息
end function
</script>
除了以上键值以外还有以下几项，其值有待确认。
duplex
orientation
paper_size
paper_source
printer
注意：上面对页边距的设置为：1，实际设置值为25.4。
下一篇：aspemail组件的应用