QTP报错：缺少对象“server"

xuanzhuanxuehua · 发表于 2011-5-19 16:44:29

各位高手，小妹初学QTP，遇到以下问题，谁能帮忙解决一下？
我运行以下脚本以删除文件夹时QTP报错：缺少对象”server"。
Dim strDrive, strfoldername,objFSO, objFolder, strPath
strDrive = "G:\"
strfoldername="delete"
strPath= strDrive&strfoldername
Set bjFSO = server.CreateObject("Scripting.FileSystemObject")
On Error Resume Next
objFSO.DeleteFolder(strPath)
当我把倒数第三行的server去掉时就可以正确运行。
为什么这里不能加server呢？