signed

QiShunwang

“诚信为本、客户至上”

vbs之使用Internet Explorer 屏蔽密码

2021/5/14 20:25:45   来源:

复制代码 代码如下:

Set objExplorer = WScript.CreateObject _ 
    ("InternetExplorer.Application", "IE_") 
objExplorer.Navigate "file:///c:\scripts\password.htm"    
objExplorer.Visible = 1              
objExplorer.ToolBar = 0 
objExplorer.StatusBar = 0 
objExplorer.Width=400 
objExplorer.Height = 250  
objExplorer.Left = 0 
objExplorer.Top = 0 
Do While (objExplorer.Document.Body.All.OKClicked.Value = "") 
    Wscript.Sleep 250                  
Loop  
strPassword = objExplorer.Document.Body.All.PasswordBox.Value 
objExplorer.Quit 
Wscript.Sleep 250 
Wscript.Echo strPassword 

您可能感兴趣的文章:
  • javascript屏蔽右键代码
  • jquery禁用右键单击功能屏蔽F5刷新
  • 屏蔽网页右键复制和ctrl+c复制的js代码
  • 屏蔽Flash右键信息的js代码
  • 网页屏蔽(左右键,代码等)的非JS方法
  • 屏蔽端口的vbs脚本
  • vbs屏蔽键盘按键
  • VB使用XMLHTTP实现Post与Get的方法
  • VB读取线程、句柄及写入内存的API代码实例
  • VB实现的倒计时类代码详解
  • VB调用Word拼写检查功能实例
  • VB实现屏蔽文本框右键菜单的复制、粘贴等功能的方法