Question

vbs复制运行目录里的文件夹2里面的test.txt到当前运行目录 应该怎么写

CreateObject("Scripting.FileSystemObject").CopyFolder "2\test.txt","\" 这样写错误，求正确的表达方式。

Answer 1

test = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path
Set fso=CreateObject("Scripting.FileSystemObject")
if fso.fileexists(test&"\2\test.txt") then
fso.copyFile test&"\2\test.txt",test&"\"
end if
——————————
已测试，符合要求

追问

非常感谢 符合要求。再追问个问题。vbs的注释用什么来表达？就是类似标签之类的语句。比如说第十行我不想他执行前面应该加什么呢。html是用 按键精灵好象是用// 不知道vbs用的是什么

Answer 2

CreateObject("Scripting.FileSystemObject").CopyFolder "2\test.txt",".\"
楼上那样写肯定是有问题的

Answer 3

CreateObject("Scripting.FileSystemObject").CopyFolder "\2\test.txt","\"

追问

提示路径没找到 但还是感谢你的热心回答。 期待有正解方案。
你可以自己试一下。建立一个文件夹名为en 把vbs放到en里。 然后在en里建一个文件夹2 在文件夹2里建一个文件test.txt. 然后你再执行下vbs 提示路径错误

追答

CreateObject("Scripting.FileSystemObject").CopyFile "\2\test.txt","\"