VB Script open secure web page programmatically

Question

I'm writing a VB Script code, as part of cimplicity object. The code basically need to open IE with a specific URL and autologin to the webpage. The login is a "windows security" popup window. Can i log in to it pragmatically? enter image description here

Here is a part of my code:

On Error GoTo ERR_TRP
Dim IE
Dim UID As CimObjectVariable
Dim PWD As CimObjectVariable
Dim URL As CimObjectVariable

Dim sUID As String
Dim sPWD As String
Dim sURL As String

Set UID = CimGetScriptOwner().GetVariable("USER")
Set PWD = CimGetScriptOwner().GetVariable("PWD")
Set URL = CimGetScriptOwner().GetVariable("IP")
sUID = UID.Value
sPWD = PWD.Value
sURL = URL.Value
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = 1 
IE.navigate sURL
Sleep(1000)

Err_Trp:
    x = MSGBOX ("Cannot open the camera Please check User-Password-IP", 0 , "Eror")

Dim ... As won't work in VBS, all variables in VBS has Variant type. Just use Dim without As. Could you share the URL which gives you such popup window (or any similar)? — omegastripes
– omegastripes, Commented Mar 16, 2015 at 23:59

Pupa Rebbe · Accepted Answer · 2015-03-18 03:25:46Z

1

as omegastripes wrote, you can't declare variable data-types in VBS, however to send the username/password to the popup login window after navigating to the page use this code:

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Windows Security"
WshShell.SendKeys "YourUserID"
WScript.Sleep 100
WshShell.SendKeys "{TAB}" 
WScript.Sleep(100)
WshShell.SendKeys "YourPassword"
WScript.Sleep 100
WshShell.SendKeys "{TAB}"
WScript.Sleep 100
WshShell.SendKeys "{TAB}"
WScript.Sleep 100
WshShell.SendKeys "{ENTER}"

answered Mar 18, 2015 at 3:25

Pupa Rebbe

5282 silver badges14 bronze badges

Sign up to request clarification or add additional context in comments.

3 Comments

Alexander Over a year ago

Just one question, how can i bring the IE page on top of my application?

Pupa Rebbe Over a year ago

WshShell.AppActivate IE.Name

Alexander Over a year ago

Thanks a lot. Another question: can i ask "if the windows security is activated then perform the login"? Because not for all of the URLs there is a log in

Collectives™ on Stack Overflow

VB Script open secure web page programmatically

1 Answer 1

3 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

3 Comments

Your Answer

Sign up or log in

Post as a guest

Related