按键精灵 移动目录

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