[Classic ASP] 배열

동적배열 선언

Dim cateList : Redim cateList(CInt(Rs(0))-1) '배열선언

하나 이상의 값을 집합처럼 다루고 싶은 경우 앞의 변수의 경우는 개별값을 다룬다면 배열에서는 집합내에서 인덱스번호로 값을 다루는 것이다 0부터 시작하는 인덱스번호로 배열요소의 값에 접근할 수 있다 선언방법 1. 배열명과 배열크기 동시 선언 Dim Arr(2)  Arr(0)=10  Arr(1)=20  Arr(2)=30 Arr은 배열명 2는 배열크기 2. 배열을 선언하고 나서 배열크기 선언 Dim Arr Redim Arr(2) Arr(0)=10  Arr(1)=20  Arr(2)=30 Arr은 배열명 Redim은 재선언 2는 배열크기 3. 배열의 크기를 바꾸고자 할 경우 Dim Arr Redim Arr(2) Arr(0)=10  Arr(1)=20  Arr(2)=30  Redim Preserve Arr(3) Arr(3)=50 Arr은 배열명 Redim은 재선언 2는 배열크기 배열크기 변경-앞의 데이타 그대로 유지 Preserve가 없으면 앞의 데이타 잃어버림 4. 배열요소 개수 : 배열크기 + 1 5. 배열크기 구하기; Ubound(Arr)   6. 배열이름은 값을 가질 수 없고 인덱스번호를 가진 배열요소가 값을 가진다  * 배열을 선언하고 값을 할당하고 사용하는 예제 - 배열요소 값으로 그래프를 그려보기

array.asp

<%  dim visito() redim visito(4) visito(0)=10 visito(1)=50 visito(2)=80  visito(3)=30 visito(4)=20  redim preserve visito(5) '배열크기 재선언, 기존 배열요소값 유지  visito(5)=100 %> <table border=0><tr valign=bottom> <% for i=0 to Ubound(visito) '0부터 배열크기까지%> <td> <table width=10 bgcolor=white><tr><td height=<%=visito(i)%> bgcolor=red></td></tr></table> </td> <% next %> </tr></table>