WEB打印设置解决方案一

onlyforyou鈾

onlyforyou鈾

2016-01-29 19:50

WEB打印设置解决方案一,WEB打印设置解决方案一
以下是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

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/asp/)

               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"  //页数-

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/asp/)

               hkey_key="footer"
               RegWsh.RegWrite hkey_root+hkey_path+hkey_key,"&u&b&d" 
//网址,日期等信息
         end function
  </script

 

展开更多 50%)
分享

猜你喜欢

WEB打印设置解决方案一

ASP
WEB打印设置解决方案一

WEB打印设置解决方案四

ASP
WEB打印设置解决方案四

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

WEB打印设置解决方案三

ASP
WEB打印设置解决方案三

WEB打印设置解决方案二

ASP
WEB打印设置解决方案二

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

WEB打印设置解决方案三(FileSystem组件实现WEB打印)

ASP
WEB打印设置解决方案三(FileSystem组件实现WEB打印)

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

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

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

photoshop教程:将MM调成银发美女

photoshop教程:将MM调成银发美女

实例演练ASP+XML编程

实例演练ASP+XML编程
下拉加载更多内容 ↓