时间:2021-05-22
复制代码 代码如下:
'/*=========================================================================
' * Intro 主要是解决在使用WebBrowser打印时,得先设置IE安全性的问题
' * FileName 添加网站到安全站点.设置安全站点打开ActiveX时提示.去页眉页脚.vbs
' * Author yongfa365
' * Version v1.0
' * Email yongfa365[at]qq.com
' * MadeTime 2009-06-18 23:12:55
' * LastModify 2009-06-18 23:12:55
' *==========================================================================*/
Const HKEY_CURRENT_USER = &H80000001
Set objReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
'添加网站到安全站点
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\yongfa365.com"
objReg.CreateKey HKEY_CURRENT_USER, strKeyPath
objReg.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, "http", 2
'设置安全站点打开ActiveX时提示
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2"
objReg.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, "CurrentLevel", "00000000"
objReg.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, "1201", "00000001"
'取消页眉页脚
strKeyPath = "Software\Microsoft\Internet Explorer\PageSetup\"
objReg.SetStringValue HKEY_CURRENT_USER, strKeyPath, "header", ""
objReg.SetStringValue HKEY_CURRENT_USER, strKeyPath, "footer", ""
msg = "IE安全设置完成"&vbCrLf&vbCrLf
msg = msg & "如果还不能正常打印,你需要关闭所有打开的IE浏览器窗口,然后再登录OA进行打印"&vbCrLf&vbCrLf
msg = msg & "如果还是有问题,您可以联系技术组:柳永法 "
MsgBox msg, vbInformation, "温馨提醒!"
声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。
在操作win10系统时,有用户在打开网站想要登陆一些银行站点时,网页上却出现了提示:无法安全地连接到此页面,这可能是因为该站点使用过期的或不安全的TLS安全设置
全站仪dhd表示站点和所测点的距离与站点和放样点距离的差。还有dHR表示放样水平角差值;dZ表示放点离测站点高差;HR表示水平角等。 全站仪,即全站型电子测距
全站仪dhd表示站点和所测点的距离与站点和放样点距离的差,还有dHR表示放样水平角差值;dZ表示放点离测站点高差;HR表示水平角等。 全站仪,即全站型电子测距
SSL安全证书主要用于发送安全电子邮件、访问安全站点、网上招标与投标、网上签约、网上订购、安全网上公文传送、网上办公、网上缴费、网上缴税以及网上购物等安全的网上
有时候,我们打开浏览器,进入某些网站的时候,总会出现如下提示,而用常规的工具-->INTERNET选项-->安全-->受信任的站点-->站点,来设置,可能也不管