VBScript无法创建文件夹

时间:2017-12-11 12:35:28

标签: vbscript qtp hp-uft uft14

我有一个完美适用于计算机的简单脚本。该脚本使用VBScript编写,并使用UFT(统一功能测试)运行。

Option Explicit
Dim objFSO, objFolder, strDirectory

strDirectory = "Path" 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder(strDirectory)

但是,当我尝试在另一台计算机上运行此代码时,它无法正常工作。我将路径更改为与新计算机对应的另一条路径。当我尝试在不使用变量strDirectory的情况下运行代码时出现意外:

Option Explicit
Dim objFSO, objFolder, strDirectory

strDirectory = "Path" 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("path")

在新电脑上工作正常。

有谁知道为什么会这样?脚本如何在计算机中工作而在另一台计算机中不工作?而且,当不使用strDirectory变量存储路径时,脚本如何在这台新计算机中工作?

1 个答案:

答案 0 :(得分:-1)

尝试使用整个路径运行:

Option Explicit
Dim objFSO, objFolder, strDirectory

strDirectory = "Path" 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("C:\\path")