2007년 3월 25일 일요일

For Each In

For Each 변수이름 In 컬렉션
이벤트
Next

주목해야 할건, 컬렉션과, 변수이름이다.

예제1) ServerVariables 값을 모두 출력하기

For Each svName In request.servervariables

response.write svName & " : " & request.servervariables(svName)
Next

예제2) FSO를 활용하여, 해당 파일이 있는 폴더의 모든 파일 리스트 구하기

Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(Server.Mappath("."))
Set files = folder.Files

For Each file in Files
Response.Write file.Name & "
"
Next

Set files = Nothing
Set folder = Nothing
Set fso = Nothing

예제1) 예제2)에 있는 svName 이나, file 대신 다른 변수명을 써도 된다는 사실을 꼭 알아야 할것이다. 예제2)에 나왔던, FSO는 추후에 다시 공부하자