51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3067|回复: 9
打印 上一主题 下一主题

[原创] 如何用scripts获取Mac和Ubntu的路径

[复制链接]
  • TA的每日心情

    2015-11-23 12:13
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]测试小兵

    跳转到指定楼层
    1#
    发表于 2018-9-10 10:56:06 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
    写了一下的scripts,但是在Mac和Unbntu上运行时,还是走得  if fso.FileExists("C:\Button.bmp") then 这个分支, 大侠帮看看:
    Dim fso, windowsDirName, linuxDirName
    windowsDirName = "C:"
    linuxDirName = "/tmp"

    Set fso = CreateObject("Scripting.FileSystemObject")
    If (fso.FolderExists(windowsDirName)) Then


       
        if fso.FileExists("C:\Button.bmp") then
            Set file = fso.GetFile("C:\Button.bmp")
            file.Delete
            End If
        Browser("index").Page("Buttons").WebButton("Push me!").CaptureBitmap "C:\Button.bmp"
        if fso.FileExists("C:\Button.bmp") then
            Set file = fso.GetFile("C:\Button.bmp")
            file.Delete
            Reporter.ReportEvent micPass, "Button.CaptureBitmap", "The method passed"
        else
            Reporter.ReportEvent micFail, "Button.CaptureBitmap", "The method failed"
        end if   
    ElseIf (fso.FolderExists(linuxDirName)) Then


       
        Browser("index").Page("Buttons").WebButton("Push me!").CaptureBitmap "/tmp/Button.bmp"
        if fso.FileExists("/tmp/Button.bmp") then
            Set file = fso.GetFile("/tmp/Button.bmp")
            file.Delete
            Reporter.ReportEvent micPass, "Button.CaptureBitmap", "The method passed"
        else
            Reporter.ReportEvent micFail, "Button.CaptureBitmap", "The method failed"
        end if
    else

       
       
        Browser("index").Page("Buttons").WebButton("Push me!").CaptureBitmap "/usr/Button.bmp"
        if fso.FileExists("/usr/Button.bmp") then
            Set file = fso.GetFile("/usr/Button.bmp")
            file.Delete
            Reporter.ReportEvent micPass, "Button.CaptureBitmap", "The method passed"
        else
            Reporter.ReportEvent micFail, "Button.CaptureBitmap", "The method failed"
        end if
    End If

    谢谢


    分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
    收藏收藏1
    回复

    使用道具 举报

  • TA的每日心情
    慵懒
    昨天 10:15
  • 签到天数: 1521 天

    连续签到: 5 天

    [LV.Master]测试大本营

    7#
    发表于 2018-9-13 10:47:25 | 只看该作者
    判断条件为真
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-23 11:17 , Processed in 0.088819 second(s), 23 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表