Vbscript 删除以句点开头的文件

我试图创建一个快速脚本，要求用户输入文件名，然后在后台找到关联的OpenOffice锁文件并将其删除。 （涉及的文件名示例：

~lock.Cleaning Checklists.xls

和

清洁检查表.xls

）

通过我对代码的测试并将其回显到屏幕上，它似乎工作得很好，只是它出错了，说它找不到我实际需要的文件。我怀疑问题在于它无法处理以句点开始的文件

有什么办法吗

'This script will ask for a users input, then delete the lock file

Const DeleteReadOnly = True
strFile = InputBox( "Enter the file name that is locked" )
WScript.Echo "You entered: " & strFile

Set joinedFile = CreateObject("Scripting.FileSystemObject")
joinedFile = ".~lock." & strFile & ".xls#"
WScript.Echo joinedFile

Set obj = CreateObject("Scripting.FileSystemObject")
obj.DeleteFile(".~lock." & strFile & ".xls#"), DeleteReadOnly 

它还抱怨如果我尝试使用

joinedFile

，则找不到该文件：

obj.DeleteFile("joinedFile")

---

DeleteFile

可以很好地处理以点开头的文件名。你可能只是找错了目录。将

WScript.Echo CreateObject（“WScript.Shell”）.CurrentDirectory的输出与相关文件的位置进行比较。CurrentDirectory命令会报告文件所在的正确文件夹。我正在尝试从与要删除的文件相同的文件夹中运行此文件。（锁定文件通常隐藏在用户计算机上）然后
obj.DeleteFile joinedFile
（不带双引号）应该可以正常工作。谢谢。最后一个想法奏效了，但只有在意识到我的文件名有一个该死的打字错误之后。。。