最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

vbs 復(fù)制指定文件到指定目錄下

 更新時間:2019年09月28日 15:47:04   投稿:mdxy-dxy  
這篇文章主要介紹了vbs 復(fù)制指定文件到指定目錄下,需要的朋友可以參考下

復(fù)制指定文件到指定目錄下

核心代碼

Set fso=CreateObject("Scripting.filesystemobject")
Function CopyFileToPath()
SrcPATH = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path
DstPATH = "C:\Program Files\AEBELL_DebugTool\DebugTool\dll\FigClient\"
fso.CopyFile SrcPATH&"\"&"FigClient.exe",DstPATH,True
End Function

' 'Call CopyFileToPath()

代碼二

sourcefilepath="c:\names\names.nsf"
desfilepath="d:\name_backup\Name"&""&Year(date)&-Month(date)&-Day(date)&" "&Hour(time)&-Minute(time)&"\"
Set fso=CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(desfilepath) Then
fso.CreateFolder desfilepath
fso.copyfile sourcefilepath,desfilepath
End If

其實原理都是一樣的。

相關(guān)文章

最新評論

攀枝花市| 玉溪市| 利川市| 信阳市| 漠河县| 泸溪县| 凤凰县| 青岛市| 长沙市| 迭部县| 新沂市| 南丰县| 星座| 淳化县| 宿迁市| 沈阳市| 四子王旗| 施甸县| 华阴市| 怀远县| 波密县| 内丘县| 龙里县| 和林格尔县| 淄博市| 伊金霍洛旗| 余干县| 苗栗县| 江山市| 扎兰屯市| 建平县| 常德市| 岱山县| 田林县| 黑河市| 云阳县| 昆山市| 衡阳县| 三亚市| 远安县| 涞水县|