『楼 主』:
请教TC2里读2000服务器共享目录列表?
使用 LLM 解释/回答一下
我以前编制的老程序只能读NT4里的目录
估计和分区大小及2000系统相关,请教在TC2里就不能用findfile语句读2000服务器上共享目录的目录列表了吗?
程序段如下:
chdir(pathname); /*转指定目录*/
done=findfirst("*.*",&ffblk,16);done=findnext(&ffblk);done=findnext(&ffblk);
/*去掉.和..*/
for(f_end=0;!done<img src="images/smilies/face-wink.png" align="absmiddle" border="0">
{ /*循环取文件名*/
if (f_end>75) break;
if (ffblk.ff_attrib==16) /*非目录不要*/
{
strcpy(menu_dir,ffblk.ff_name); /*存目录入menu_dir*/
}
done=findnext(&ffblk);
}
if (f_end<3) {
hprintf("目录中的游戏子目录个数不能少于三个!",4);
getch();closegraph();exit(74);
}
for(i=1;i<f_end;i++)
{
for(j=1;jmenu_dir)
{
strcpy(temp_dir ,menu_dir);
strcpy(menu_dir,menu_dir);
strcpy(menu_dir,temp_dir );
strcpy(temp_dir ,menu_des);
strcpy(menu_des,menu_des);
strcpy(menu_des,temp_dir );
}
}
}
for(i=1;i<f_end+1;i++)
{
itoa(i,menu_des,10);
if(i<10) strcat(menu_des," ."<img src="images/smilies/face-wink.png" align="absmiddle" border="0">;else strcat(menu_des,"."<img src="images/smilies/face-wink.png" align="absmiddle" border="0">;
strcat(menu_des,menu_dir); /*将注释改为目录名*/
}
shift=0;
|