*.* 표현하는 방법
피리
2023.04.01
-----------------------------------------------------Sub 복사()Dim Ar, B
Set Ar = CreateObject(Scripting.FileSystemObject) Set B = Ar.GetFile(link.Text & \*.jpg) B.Copy (C:\백업\)End Sub------------------------------------------------------
경로 잡을때는 폴더까지만 잡구요
빨간색처럼 만들면 파일을 찾을 수 없다고 뜨네요.
*.jpg 이렇게 표현해서 폴더 안의 파일을 다 복사하고 싶어요.
무엇을 이용해야 될까요?
-
츠키
filecopy 내장함수나
copyfile api 사용해보세요. -
Sona
Dim oFSO As Object
Dim oFile As Object
Set oFSO = CreateObject(\Scripting.FileSystemObject\)
For Each oFile In oFSO.GetFolder(복사소스경로).Files
If LCase$(oFSO.GetExtensionName(oFile.Path)) = \jpg\ Then
oFile.Copy (\복사대상경로\)
End If
Next oFile
-
빛다
For 문을 이용해보세요.
자세한건.. 저도 모르겠네요..
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2702066 | 지금 비베.exe가 있는 폴더에잇는 파일을 실행시키는 문장 힌트좀 주세요. (1) | 캔서 | 2025-07-19 |
| 2702038 | 이미지 질문 (2) | 영글 | 2025-07-19 |
| 2702008 | 게임관련질문 (2) | 요루 | 2025-07-19 |
| 2701980 | 폴더 여는 방법이 뭔가요? | 가론 | 2025-07-19 |
| 2701893 | 간단한질문인데.. 변수 (2) | 나리 | 2025-07-18 |
| 2701865 | ( " ) 요거 ㅠㅠㅠ | 허우룩 | 2025-07-18 |
| 2701781 | 파일 실행하면 컴퓨터종료하는 프로그램인데 | 퍼리 | 2025-07-17 |
| 2701725 | Shell 문 질문이요 ! 고수님들 부탁드려요 | 유미 | 2025-07-16 |
| 2701671 | txt내용 변경하기좀 질문합니다.. (2) | 봄여우 | 2025-07-16 |
| 2701620 | 비베 폼크기 단위 (1) | UniQue | 2025-07-15 |
| 2701591 | 비베로 웹에있는 파일을 FTP로 다운받지 않고... (1) | 미즈 | 2025-07-15 |
| 2701512 | 딜어떻게 만들어요 ? (1) | 도손 | 2025-07-14 |
| 2701484 | 체크박스(아이콘) 관련.. | 새콤이 | 2025-07-14 |
| 2701454 | 계산기 수식 질문이요 (2) | 슬기 | 2025-07-14 |
| 2701430 | 저희 집 컴퓨터... 셧 다운이... 안 되요... (Windows XP SP3) | 바름 | 2025-07-14 |
| 2701404 | 최소화 닫기 확대 이거 모양어케바꿔요 디자인할수잇는데. | 또야 | 2025-07-13 |
| 2701378 | 아무나 비베.iso 토렌트파일로 올려주심 안대나요? | 중독적 | 2025-07-13 |
| 2701349 | 커맨드박스클릭후 체크 사용? (1) | 지율 | 2025-07-13 |
| 2701319 | 빠른답변좀 해주세용 ㅠㅠ | 마루나 | 2025-07-13 |
| 2701292 | 궁금한게있습니다 . | 아잉 | 2025-07-12 |