

)CODE: [Copy to clipboard]--int mkpath(char *path)
{
int levelcount = 0;
WHILE(!fileexist(path)) && (STRLEN(path) > 2)
{
BX = STRRCHR(path, '\\');
DSBYTE[BX] = 0;
levelcount++;
}
LOOPNZ(levelcount)
{
BX = path;
BX += STRLEN(BX);
DSBYTE[BX] = '\\';
mkdir(path);
IF(CARRYFLAG) RETURN FALSE;
}
RETURN TRUE;
}

| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
附件 1:readme_chs.txt (2007-4-20 02:15, 3.15 K,下载次数: 54)
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| Quote: | |
|
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |