‘동적 2차원 배열을 생성시킨다.
ReDim arrVals(1,255)
intIndex = 0
‘Request.Form 컬렉션을 통해 loop를 돌린다.
For Each varItem in Request.Form
If Request.Form(varItem).count > 1 then
‘이것은 각 값을 반복적용하는 컬렉션 그 자체이다.
For intLoop = 1 to Request.Form(varItem).count
‘배열에 Control명과 값을 저장한다.
arrVals(0, intIndex) = varItem & “(” & intLoop & “)”
arrVals(1, intIndex) = Request.Form(varItem)(intLoop)
intIndex = intIndex + 1
Next
Else
‘이것은 배열에 저장할 Control이 하나인 경우
arrVals(0, intIndex) = varItem
arrVals(1, intIndex) = Request.Form(varItem)
intIndex = intIndex + 1
End If
Next
Comments
Powered by Facebook Comments