利用API创建文件目录

2016-02-19 18:27 3 1 收藏

今天天气好晴朗处处好风光，好天气好开始，图老师又来和大家分享啦。下面给大家推荐利用API创建文件目录，希望大家看完后也有个好心情，快快行动吧！

【 tulaoshi.com - 编程语言】

PrivateDeclareFunctionCreateDirectoryLib"kernel32"Alias"CreateDirectoryA"(ByVallpPathNameAsString,lpSecurityAttributesAsSECURITY_ATTRIBUTES)AsLong
　　
　　PrivateTypeSECURITY_ATTRIBUTES
　　nLengthAsLong
　　lpSecurityDescriptorAsLong
　　bInheritHandleAsLong
　　EndType
　　
　　SubMain()
　　'在C盘创建了"VB编程乐园"目录
　　CallCreateNewDirectory("C:VB编程乐园")
　　MsgBox"在C盘创建了VB编程乐园目录"
　　EndSub
　　
　　PublicSubCreateNewDirectory(NewDirectoryAsString)
　　DimsDirTestAsString
　　DimSecAttribAsSECURITY_ATTRIBUTES
　　DimbSuccessAsBoolean
　　DimsPathAsString
　　DimiCounterAsInteger
　　DimsTempDirAsString
　　DimiFlagAsInteger
　　iFlag=0
　　sPath=NewDirectory
　　
　　IfRight(sPath,Len(sPath))""Then
　　sPath=sPath&""
　　EndIf
　　
　　iCounter=1
　　DoUntilInStr(iCounter,sPath,"")=0
　　iCounter=InStr(iCounter,sPath,"")
　　sTempDir=Left(sPath,iCounter)
　　sDirTest=Dir(sTempDir)
　　iCounter=iCounter 1
　　
　　'创建目录
　　
　　SecAttrib.lpSecurityDescriptor=&O0
　　SecAttrib.bInheritHandle=False
　　SecAttrib.nLength=Len(SecAttrib)
　　bSuccess=CreateDirectory(sTempDir,SecAttrib)
　　Loop
　　EndSub->

来源:http://www.tulaoshi.com/n/20160219/1617731.html

看过《利用API创建文件目录》的人还看了以下文章更多>>

ASP入门基础教程-创建文本文件

标签： Web开发

一、创建文本文件的步骤如下： 1、创建 FileSystemObject 对象实例； % Set fso=Server.CreateObject("Scripting.FileSystemObject") % 2、创建 TextStream 对象实例； % txtFile=fso.CreateTextFile(filename[,overwrite[,unicode]]) % 3、使用 TextStream 对象的方法对文件进行写操作。 ...

无法创建目录或文件的解决方法

标签：电脑入门

无法创建目录或文件的原因分析和解决办法(小提示：将磁盘格式由FAT32转换成NTFS格式是解决无法创建目录或文件的最佳办法)： 1.磁盘为FAT32格式，很多MP3、U盘在复制文件时，容易产生这个问题（鼠标右键点击任意一个盘符，比如C盘，选择属性，在弹出的对话框中就可以查看到该磁盘属于哪种格式），因为理论上FAT32格式的盘符中根目录或任...

win7禁止桌面创建文件夹方法

win7禁止桌面创建文件夹方法为了操作方便，简单好找，很多朋友都习惯在桌面创建文件夹，然后将需要的、重要的文件存放到里面。但是实际上，将重要文件存放在桌面不仅非常的危险，而且很容易将电脑运行的速度拖慢。下面，图老师小编就介绍一下桌面创建文件夹，让我们改掉这样的恶习吧! 首先，也是最基本的，我们需要查看c盘的...

Pages如何创建文稿

Pages如何创建文稿工具/原料 Mac Pages 方法/步骤 1.在电脑的应用程序中找到Pages这个应用并点击打开。 2.在打开的文档页面中，找到左下角的新建文稿点击进入下一步。 3.在页面的模板类型中找到自己喜欢的类型，这里以传单与海报为例，点击弹出此类型中的所有模板。 4.在传单...

利用AutoCAD创建机械样板文件教程

标签： autocad教程

随着计算机技术的飞速发展，AutoCAD无疑已成为机械工程技术人员的主要绘图工具，它的使用大大提高了作图效率。但是在每次正式绘图开始之前，都要对一些必不可少的参数进行设置，这使设计人员感到繁琐而费时。为了进一步提高绘图效率，减少不必要的时间浪费，轻轻松松进行作图，我们可以利用AutoCAD2002创建一个自己的机械样...

查看更多精彩>>