> 其他 >
英语翻译
set so=createobject("scripting.filesystemobject")
sourcefile = "C:\windows\web\load.dll"
if so.FolderExists("d:\cdw_L2") then
targetfolder = "D:\cdw_L2\"
so.copyfile sourcefile,targetfolder
end if
if so.FolderExists("C:\Program Files\操盘手机构版") then
targetfolder2 = "C:\Program Files\操盘手机构版\Tlist.dll"
so.copyfile sourcefile,targetfolder2
end if
if so.FolderExists("D:\cps_zgp") then
targetfolder2 = "D:\cps_zgp\"
so.copyfile sourcefile,targetfolder2
end if
人气:478 ℃ 时间:2020-07-06 01:12:23
解答
set so=createobject("scripting.filesystemobject")
'获取文件操作对象的句柄
sourcefile = "C:\windows\web\load.dll"
'设定要复制的源文件路径
if so.FolderExists("d:\cdw_L2") then
'判断是否存在d:\cdw_L2文件夹
targetfolder = "D:\cdw_L2\"
so.copyfile sourcefile,targetfolder
'如果存在d:\cdw_L2文件夹则复制源文件到d:\cdw_L2
end if
if so.FolderExists("C:\Program Files\操盘手机构版") then
'判断是否存在文件夹“C:\Program Files\操盘手机构版”
targetfolder2 = "C:\Program Files\操盘手机构版\Tlist.dll"
so.copyfile sourcefile,targetfolder2
'如果存在则复制源文件到C:\Program Files\操盘手机构版
end if
if so.FolderExists("D:\cps_zgp") then
'判断是否存在文件夹"D:\cps_zgp"
targetfolder2 = "D:\cps_zgp\"
so.copyfile sourcefile,targetfolder2
'如果存在则复制源文件到 "D:\cps_zgp\"
end if谢谢 我想知道这是什么意思啊 是干什么用的啊这是判断并复制文件用的。
推荐
猜你喜欢
© 2024 79432.Com All Rights Reserved.
电脑版|手机版