如何用scripts获取Mac和Ubntu的路径

mulan_zhi · 发表于 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

谢谢

梦想家 · 发表于 2018-9-12 09:52:00

libingyu135 · 发表于 2018-9-12 10:24:09

qqq911 · 发表于 2018-9-12 10:45:05

条件为真

jingzizx · 发表于 2018-9-12 12:32:09

cclovely · 发表于 2018-9-13 10:07:31

qqq911 · 发表于 2018-9-13 10:47:25

判断条件为真

梦想家 · 发表于 2018-9-13 11:10:05

jingzizx · 发表于 2018-9-13 12:05:18

不了解

赵佳乐SMILE · 发表于 2018-9-16 13:56:26

学习

		自动登录	找回密码
密码			(注-册)加入51Testing

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

站长推荐 /1