以下是 IE 打印设置脚本
<脚本语言=“VBScript”>
暗淡 hkey_root，hkey_path，hkey_key
hkey_root =“HKEY_CURRENT_USER”
hkey_path = "SoftwareMicrosoftInternet ExplorerPageSetup" //IE打印设置的北极地址
//设置修改函数
函数 pagesetup_null()
出错时恢复下一步
设置 RegWsh = CreateObject("WScript.Shell")
hkey_key="标题"
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" //键值设置--下边界边界
结束函数
//恢复默认设置
函数 pagesetup_default()
出错时继续下一步
设置 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" //网址，日期等信息
结束函数
</script>
除以上键值以外还有以下几项，其值有待确认。
复式
方向
纸张大小
论文来源
打印机
注意：上面对页边距的设置为：1，实际设置值为25.4。