以下是IE打印设置脚本
<script Language="VBScript">
Уменьшить hkey_root,hkey_path,hkey_key
hkey_root = "HKEY_CURRENT_USER"
hkey_path = "SoftwareMicrosoftInternet ExplorerPageSetup
"
функция pagesetup_null()
При ошибке возобновить следующий
набор 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" //键值设定--下边边界
конечная функция
//恢复默认设置
функция 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>
除了以上键值以外还有以下几项, 其值有待确认。
дуплекс
ориентация
размер_бумаги
paper_source
Тип принтера: 1, 25.4
.