Function moveToWorkPath()
//检测文件是否存在 不存在直接退出
inputPath=APKParentPath&"\app\build\outputs\apk"
outPutPath = InputBoxFilePath & "\apk"
If Lib.文件.判断文件夹是否存在(inputPath) Then
Set fso = CreateObject("Scripting.FileSystemObject")
If Plugin.File.IsFileExist(outPutPath) Then
Fso.DeleteFolder outPutPath
End If
//移动文件到新的地址
//True:覆盖,False:不覆盖
Fso.CopyFolder inputPath, outPutPath, True
Delay 3000
TracePrint inputPath
//删除源文件
Call Plugin.File.DeleteFolder(inputPath)
Else
TracePrint "不用复制啦 复制过啦"
End If
End Function
按键精灵 移动目录
猜你喜欢
转载自blog.csdn.net/mp624183768/article/details/127188685
今日推荐
周排行