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

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

 更新時(shí)間: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

其實(shí)原理都是一樣的。

相關(guān)文章

最新評(píng)論

隆昌县| 聂拉木县| 浮山县| 吉林市| 中卫市| 西乡县| 潮安县| 阿拉尔市| 高要市| 周至县| 祁东县| 西贡区| 娄底市| 改则县| 泗洪县| 和硕县| 哈密市| 丁青县| 望城县| 太仓市| 霍林郭勒市| 龙山县| 辽阳市| 许昌市| 南投县| 临洮县| 凤山县| 宁陵县| 湖北省| 西城区| 弋阳县| 长岭县| 麦盖提县| 万源市| 屏南县| 华阴市| 四子王旗| 潞城市| 平定县| 浑源县| 十堰市|