使用qtp做一个登陆VBS脚本

superwang001

使用qtp做一个登陆VBS脚本：

test：
login “name”,"123"

VBS：
Function login(user,password)
   ret = OpenWeb("http://186.sgamer.com")
   If ret <>0 Then
           ReportResult 1,"login","path is not exist!"
           login =false
           Exit function
   End If
   If isnull(user) then
                ReportResult 1,"login","user is not null!"
                login =false
                Exit function
        End if
        If   isnull(password) Then
                ReportResult 1,"login","password is not null!"
                login =false
                Exit function
        End If

Browser("用户登录").Page("用户登录").WebEdit("WebEdit").Set user
Browser("用户登录").Page("用户登录").WebEdit("WebEdit_2").Set password
Browser("用户登录").Page("用户登录").WebArea("登陆").Click

parker_007

isabel_liu

學習了,請問一下樓主；如果登錄界面前需要進行AD驗證，可以怎么解除.

小羊拉拉

3Q

superwang001

对于AD验证的问题，要去到服务器返回信息，这个需要研究一下，我也正在研究这个问题