当前位置:首页
开发技术指南» 文章正文
    引言:
 

 

    摘要: delphi5访问串口设备用什么控件?能够使用vb中的mscomm吗? ......
    摘要: 请问如何得到当前系统中运行的进程?要求在nt下运行,我试了一下,好像nt不支持createtoolhelp32snapshot函数?请教各位,还有什么好方法吗? ......


怎么搜索指定目录下的所有文件

怎么搜索指定目录下的所有文件!  
  比如,我用TDirectListBox来显示文件夹,用ListView   来显示所有的在此目录下的直接  
  文件,如果有子目录,则子目录下的文件不显示!

NO.1   作者: netsys2

#include   <dir.h>  
   
        struct   ffblk   ffblk;  
        int   done;  
        done   =   findfirst("*.*",&ffblk,0);  
        while   (!done)    
        {  
              //得到的文件名在ffblk.ff_name;  
              done   =   findnext(&ffblk);  
        }  
   
        return   0;  
  }

NO.2   作者: NowCan

看看这个是干什么的。  
   
  int   DelDir(char   *Dir)  
  {  
      WIN32_FIND_DATA   FindFileData;  
      HANDLE   hFind;  
      char   target[MAX_PATH+1];  
   
      printf   ("Target   dir   is   %s\n",   Dir);  
      sprintf(target,"%s\\*.*",Dir);  
      hFind   =   FindFirstFile(target,   &FindFileData);  
      do  
      {    
          if(FindFileData.cFileName[0]!=.)  
          {  
              if((FindFileData.dwFileAttributes   &   FILE_ATTRIBUTE_DIRECTORY)==FILE_ATTRIBUTE_DIRECTORY)  
              {  
                  sprintf(target,"%s\\%s",Dir,FindFileData.cFileName);  
                  DelDir(target);  
              }  
              else  
              {  
                  printf("     Delete   %-60s   -   ",FindFileData.cFileName);  
                  sprintf(target,"%s\\%s",Dir,FindFileData.cFileName);  
                  if(DeleteFile(target))  
                  {  
                      printf("Success!\n");  
                  }  
                  else  
                  {  
                      printf("Fail!   %lu\n",   GetLastError());  
                  }  
              }  
          }  
      }while(FindNextFile(hFind,   &FindFileData));  
      return   1;  
  }


    摘要: 我将一些数据库初始化代码放在一个.sql文件中 。如何通过程序(vb等)让数据库来执行这个.sql文件呢? ......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE