网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vbs如何实现复制指定文件到指定目录下-创新互联

这篇文章将为大家详细讲解有关vbs如何实现复制指定文件到指定目录下,小编觉得挺实用的,因此分享给大家做个参考,希望大家阅读完这篇文章后可以有所收获。

成都创新互联公司基于分布式IDC数据中心构建的平台为众多户提供服务器托管 四川大带宽租用 成都机柜租用 成都服务器租用。

复制指定文件到指定目录下

核心代码

Set fso=CreateObject("Scripting.filesystemobject")Function CopyFileToPath()SrcPATH = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.PathDstPATH = "C:\Program Files\AEBELL_DebugTool\DebugTool\dll\FigClient\"fso.CopyFile SrcPATH&"\"&"FigClient.exe",DstPATH,TrueEnd 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) Thenfso.CreateFolder desfilepathfso.copyfile sourcefilepath,desfilepathEnd If

其实原理都是一样的。

关于“vbs如何实现复制指定文件到指定目录下”这篇文章就分享到这里了,希望以上内容可以对大家有一定的帮助,使各位可以学到更多知识,如果觉得文章不错,请把它分享出去让更多的人看到。


文章名称:vbs如何实现复制指定文件到指定目录下-创新互联
网站网址:http://bjjierui.cn/article/geojs.html

其他资讯