Q&A

  • 다른컴퓨터의 특정폴더에 있는 특정파일만 삭제하기는 어떻게 해야 하나요?
프로그램이 시작될때 다른 컴퓨터에 있는 폴더중 *.jpg형식을 갖고 있는 파일을 다 지우고 싶은데 어떻게 해야 하나요?
알려 주시면 고맙겠습니다.
2  COMMENTS
  • Profile
    너구리 2004.06.02 00:28
    다른 컴퓨터로 어떻게 접근하실건지요..

    FTP나 네트웍드라이브를 잡아서 할수 있겠죠..

    관련자료는 이곳에도 찾아보시면 많구요..

    그다음 찾아보실것은 파일을 지우는 것인데..

    아래 펑션은 제가 다른 프로그램 쓸때 만들었던거를 수정한겁니다.

    보시다시피 패스와 마스크를 주고 스트링리스트로 파일목록을 반환받는겁니다.

    대충 눈으로 수정한거라 잘될지는 모르겠습니다만 테스트 해보시고 약간만
    수정하시면 될거 같습니다.

    사용예)GetFileList(sWorkPath, '*.jpg', MyStringList);

    꼭 테스트 해보세요~~~

    procedure ThCopyFile.GetFileList(const Path, Mask: string; var StringList1 : TStringList);
    var
      I           : Integer;
      SearchRec   : TSearchRec;
    begin
      try
        I := FindFirst(Path+Mask, 0, SearchRec);
        while I = 0 do
        begin
           StringList1.Add(SearchRec.Name);
           I := FindNext(SearchRec);
        end;
      except
        raise;
      end;
    end;


  • Profile
    1학년 2004.06.02 18:24
    네..많은 도움이 되었습니다. 감사합니다.