如何用语句 在 C： 或 D： 建立文件夹

[dragoner]

如何用语句 在 C： 或 D： 建立文件夹，

[minilin_11]

可以使用API函数来实现
先声明一个全局函数：
function boolean CreateDirectoryA(ref string pathname,int sa) library "kernel32.dll"
三个参数的意义如下：
一，指定一个模板目录的名字，从中复制默认属性（比如目录中文件的默认压缩方式）。如设为vbNullString，则表示不使用模板
二，新目录的名字
三，这个结构定义了目录的安全特性——如果操作系统支持的话

给你一个例子：
string temp
string snull
setnull(snull)
int n
n = 0
n = pos(path,"\",n + 1) //path为你要建立的路径
do while n>0 //循环一级一级建立
temp = left(path,n - 1)
CreateDirectoryA(temp,snull) //这个API函数可以只用后两个参数
n = pos(path,"\",n + 1)
loop
CreateDirectoryA(path,snull)

[Kanfu]

如果用的pb8那可以用CreateDirectory ( directoryname )建立目录了。
如果是低版本只能用API了。