File or Item Extraction Loop

Keywords:	 File or Item Extraction loop FileExist ItemExtract count

---

DirChange("C:\someplace")
List = FileItemize("*.EXE")	      ; get file list
FileCount=ItemCount( List, @TAB)	     ; @TAB for file list delimiter
for FileIndex = 1 to FileCount
	 ThisFile= ItemExtract( FileIndex, List, @TAB)
	 Message(FileCount, ThisFile)	 ;for debugging
	 FileDelete(thisfile)
next

---

Article ID:   W13235

Filename:   File or Item Extraction Loop.txt