- 浏览: 13931 次
最新评论
vbs脚本:CreateFolder
- 博客分类:
- 技术杂绘
vbs脚本:CreateFolder
2010年08月09日
Rem : =========== 创建文件夹 Rem : =========== 不能有同名的文件或文件夹 Rem : =========== 父文件夹必须存在 Sub CreateFolder( folder ) Dim f f = Trim( folder ) IfRight(f,1) = "\" Then f = Left(f,Len(f) -1 )If fso.fileexists(f) = True Or fso.folderexists(f) = True ThenErr.Raise vbObjectError+128, "CreateFolder", f & " already exists" If fso.folderexists(fso.GetParentFolderName(f)) = False ThenErr.Raise vbObjectError+128, "CreateFolder", fso.GetParentFolderName(f) & " does not exists" Dim errMsg OnError Resume NextRem ====== code begin fso.CreateFolder f Rem ====== code endIfErr.Number 0 Then errMsg = Err.Description OnError Goto 0 Err.Raise vbObjectError+128, "CreateFolder", errMsg & vbNewLine & _ " folder:" & vbTab & folderExitSubEndIfEndSub
发表评论
-
vbs脚本:ExplorerSel
2012-01-20 10:01 630vbs脚本:ExplorerSel 2010年08月09日 ... -
PowerDesigner设置MYSQL主键自动增长的方法
2012-01-20 10:01 838PowerDesigner设置MYSQL主键自动增长的方法 ... -
轻量级自动化测试框架解析
2012-01-20 10:01 862轻量级自动化测试框架解析 2010年06月22日 因为工 ... -
基于探测的Script (Event)SCOM 收集规则
2012-01-20 10:01 597基于探测的Script (Event)SC ... -
VC编译器配置及编译选项
2012-01-19 15:02 721VC编译器配置及编译选 ... -
WinCE驱动开发问题精华集锦
2012-01-19 15:02 550WinCE驱动开发问题精华 ... -
WinCE驱动开发问题精华集锦(一)
2012-01-19 15:02 553WinCE驱动开发问题精华 ... -
用MFC实现DLL文件注册
2012-01-19 15:02 819用MFC实现DLL文件注册 2010年08月05日 ... -
delphi中opengl程序设计
2012-01-17 04:47 515delphi中opengl程序设计 2011年06月07日 ... -
OpenGL编程设置
2012-01-17 04:47 822OpenGL编程设置 13小时前 一.环境配置 由 ... -
Opengl:显示中文改进版
2012-01-17 04:47 1095Opengl:显示中文改进版 2010年07月09日 由 ... -
转载:OpenGL显示文字
2012-01-17 04:47 700转载:OpenGL显示文字 2010年07月03日 本课 ... -
Android游戏开发(一)
2012-01-17 04:47 741Android游戏开发(一) 2011年03月08日 原 ... -
Vbs脚本应用――打造个性化QQ
2012-01-16 03:39 612Vbs脚本应用――打造个性化QQ 2009年07月16日 ... -
Iisweb.vbs:IIS 网站管理脚本详解(二)
2012-01-16 03:39 790Iisweb.vbs:IIS 网站管理脚本详解(二) 200 ... -
vbs脚本恶搞
2012-01-16 03:39 721vbs脚本恶搞 2009年08月07 ... -
把我最钟爱的脚本语言--vbs 的教程分享给大家--1
2012-01-16 03:39 705把我最钟爱的脚本语言- ... -
使用DevCom和VBS脚本一键开关双网卡
2012-01-16 03:39 1241使用DevCom和VBS脚本一键开关双网卡 2009年10月 ...
相关推荐
先检查是否已经存在该目录了,如果存在,则不做任何处理,如果不存在则创建...‘页面名称: CreateFolder.asp ‘页面功能: 生成n层目录的文件夹 ‘使用方法: 调用CheckFolder()函数,例如: CheckFolder(path) ‘传入参数:
UpLoadImg+CreateFolder
主要介绍了VBS递归创建多级目录文件夹的方法,主要使用的是vbs fso的GetParentFolderName与CreateFolder函数,需要的朋友可以参考下
function createFolder ( ) { OnedriveApp . init ( PropertiesService . getScriptProperties ( ) ) . creatFolder ( "SampleFolder" ) ;}function uploadFile ( ) { var id = DriveApp . getFilesByName ...
EXE文件,可以快速建立多层级文件夹,对于运维人员建立更新包中的目录很有帮助,减少自己手动创建目录导致的错误。
gatsby-source-dropbox 用于从Dropbox帐户获取数据的源插件。 如果要使用包含图像的Markdown文件,则还需要安装 安装 npm install --save gatsby-source-dropbox 如何使用 配置插件 ... createFolder
oFso.CreateFolder FilePath End If Response.Write "<script language='javascript'>alert('新建文件夹或文本文件成功!');window.close();</script>" End Sub '编辑文件 Sub Edit(ByVal Fname) If Not Is...
(1)、CreateFolder.py(创建文件夹--九校联盟) (2)、InternetConnect.py(网络连接) (3)、GetDictionaryData.py(获取相关词典数据) (4)、GetPlanInfo.py(获取招生计划数据) (5)、GetScoreInfo.py(获取录取分数数据) (6...
function createFolder($path) { if (!file_exists($path)) { createFolder(dirname($path)); mkdir($path, 0777); } } createFolder(“2007/3/4”);//在当前目录下创建2007/3/4的目录结构. 您可能感兴趣的...
createfile,getfilename,createfolder,getfoldername,fileexists,opentextfile,copyfile,copyfolder,movefile,folderexists,movefolder,deletefile,deletefolder
(1)、CreateFolder.py(创建文件夹--九校联盟) (2)、InternetConnect.py(网络连接) (3)、GetDictionaryData.py(获取相关词典数据) (4)、GetPlanInfo.py(获取招生计划数据) (5)、GetScoreInfo.py(获取录取分数数据) (6...
<% ‘创建多级目录,可以创建不存在的根...Dim objFSO, PhCreateFolder, CreateFolderArray, CreateFolder Dim i, ii, CreateFolderSub, PhCreateFolderSub, BlInfo BlInfo = False CreateFolder
1.CreateFolder在指定的位置创建一个文件夹 2.DeleteFolder把一个文件夹从指定的位置删除 3.CurrentDirectory返回当前的驱动器和目录 4.Currentdrive返回当前的驱动器 5.Change...
VB磁盘碎片整理-分类整理磁盘文件,这个源码中有很多FSO技巧,比如创建ManageFile文件夹、创建FSO对象,使用FSO对象的CreateFolder方法创建文件夹,创建ManageFile文件夹,根据系统的当前日期创建文件夹,创建当前...
开罗大学计算机与信息学院高级操作系统 (2009-2010) 作业 2 – 3CS 虚拟文件系统概述声明:假设...100 KB 预请求: 路径已存在此路径下尚未创建同名文件存在足够空间 CreateFolder root/folder1 该命令用于在“root”路
CreateFolder 方法; CreateTextFile 方法; Delete 方法; DeleteFile 方法; DeleteFolder 方法; DriveExists 方法; Exists 方法; FileExists 方法; FolderExists 方法; GetAbsolutePathName 方法; ...
$ client -> createFolder ( $ path ); //list a folder $ client -> listFolder ( $ path ); //get a temporary link $ client -> getTemporaryLink ( $ path ); 支持我们 我们投入了大量资源来创建。 您可以通过...
createFolder(nameFolder); 删除功能 删除一些文件 mkdir.deleteFiles('/my/folder/',['file.png', 'file2.png', 'file3.png'] ); 删除文件夹中的所有文件 mkdir.deleteFiles('/my/folder/'); 重命名一些文件 您...
CreateFolder App.Path & "\TEMP" '调过函数创建临时文件夹 EnableMenu '调用过程设置各菜单的可用状态 sngTime = 0 '设置录制时长为0(不限时长) strFileBMP = App.Path & "\TEMP\TMP.BMP" '保存的图片文件名 ...
易语言文件对象应用源码,文件对象应用,createfile,getfilename,createfolder,getfoldername,fileexists,opentextfile,copyfile,copyfolder,movefile,folderexists,movefolder,deletefile,deletefolder