superwang001 发表于 2011-7-5 16:15:52

使用qtp做一个登陆VBS脚本

使用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 发表于 2011-7-5 17:33:41

:handshake

isabel_liu 发表于 2011-7-6 12:01:26

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

小羊拉拉 发表于 2011-7-6 15:32:40

:)3Q

superwang001 发表于 2011-7-7 10:03:10

对于AD验证的问题,要去到服务器返回信息,这个需要研究一下,我也正在研究这个问题
页: [1]
查看完整版本: 使用qtp做一个登陆VBS脚本