当前位置:首页>软件中心>软件设置>自动输入账号密码 vbs

自动输入账号密码 vbs

介绍

    Dim username,password,IE,dom,form,Shell

    username = "账号"

    password = "密码"

    Set IE =CreateObject("InternetExplorer.Application")

    IE.Navigate "登录地址"

    IE.Top = 0

    IE.Left = 0

    IE.FullScreen = True

    W = IE.Width

    H = IE.Height

    IE.FullScreen = False

    IE.Width = W

    IE.Height = H

    IE.Visible = True

    Do while IE.ReadyState<> 4 or IE.busy

    wscript.sleep 2000

    loop

    ie.Document.getElementById("username").value = username 

    ie.Document.getElementById("password").value = password

    IE.document.getElementById("login-sub").click