<% Dim vColIdx, vColItem
For vColIdx = 0 To colCount - 1
Set vColItem = colsArr(vColIdx) %>
<% Next %>
<% Dim vLaneIdx, vLaneItem
For vLaneIdx = 0 To laneCount - 1
Set vLaneItem = lanesArr(vLaneIdx) %>
<% For vColIdx = 0 To colCount - 1
Set vColItem = colsArr(vColIdx) %>
<% Next %>
<% Next %>