extracting elements from an array and placing them in a table 1

[cm80]

Hi,
I have the following problem with the piece of code below:

What I want is a single columned table as follows
ABC
DEF
GHI
JKL
MNO

but what I am ending up with is output as follows:

Authorisation Levels
ABC
DEF GHI JKL MNO

Here is the code that is causing the problem. if someone could help me out I would appreciate it greatly!!

#################################################

<b>Authorisation Levels</b>
<%

Dim arrFundList, fundList, ptr, Results
fundList = ObjectList(&quot;ORDERASSISTANT&quot;, strFundSource, &quot;FUND&quot;, corpID, &quot;&quot

arrFundList = UBound(fundList)

Response.Write &quot;<table border=1 cellpadding=0 cellspacing=0>&quot;
Redim Results (arrFundList, 1)
For ptr = 0 to arrFundList
Response.Write &quot;<tr>&quot; &_
&quot;<td>&quot; & fundList(ptr) & &quot;</td>&quot; & _
&quot;</tr>&quot; &_
&quot;</table>&quot;
Next
%>

 

[Extentec]

Place your </TABLE> tag outside the loop:

<b>Authorisation Levels</b>
<%

Dim arrFundList, fundList, ptr, Results
fundList = ObjectList(&quot;ORDERASSISTANT&quot;, strFundSource, &quot;FUND&quot;, corpID, &quot;&quot

arrFundList = UBound(fundList)

Response.Write &quot;<table border=1 cellpadding=0 cellspacing=0>&quot;
Redim Results (arrFundList, 1)

For ptr = 0 to arrFundList
Response.Write &quot;<tr><td>&quot; & fundList(ptr) & &quot;</td></tr>&quot;
Next

Response.Write &quot;</table>&quot;
%>

http://www.onti.net