Board logo

标题: 请教TC2里读2000服务器共享目录列表? [打印本页]

作者: 9zhmke     时间: 2003-7-19 00:00    标题: 请教TC2里读2000服务器共享目录列表?

我以前编制的老程序只能读NT4里的目录
估计和分区大小及2000系统相关,请教在TC2里就不能用findfile语句读2000服务器上共享目录的目录列表了吗?

程序段如下:

chdir(pathname);                                       /*转指定目录*/
done=findfirst("*.*",&ffblk,16);done=findnext(&ffblk);done=findnext(&ffblk);
                                                                                                                /*去掉.和..*/
for(f_end=0;!done
        {                                                                         /*循环取文件名*/
                if (f_end>75)        break;
                if (ffblk.ff_attrib==16)                        /*非目录不要*/
                        {
                        strcpy(menu_dir[++f_end],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[0])
                        {
                        strcpy(temp_dir   ,menu_dir[j]);
                        strcpy(menu_dir[j],menu_dir);
                        strcpy(menu_dir,temp_dir   );
                        strcpy(temp_dir   ,menu_des[j]);
                        strcpy(menu_des[j],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," .";else strcat(menu_des,".";
        strcat(menu_des,menu_dir);   /*将注释改为目录名*/
        }

shift=0;
作者: lemonhall     时间: 2003-7-19 00:00
你估计的没有错误,查查2000的书。
作者: 9zhmke     时间: 2003-7-23 00:00
有其他什么变通的办法使用吗?