<% dim bb,j,k
dim aa
bb=objrs("trade")
aa=split(bb,"*")
response.Write "<table border=1 class='font-main' align='center'>"
response.Write "<tr>"
j=0
for k=0 to ubound(aa)
j=j+1
response.Write "<td>"
response.Write aa(k)
response.Write "</td>"
if j mod 3 = 0 and j<>ubound(aa)+1 then
response.Write "</tr><tr>"
end if
next
if ubound(aa)+1 mod 2<>0 then
response.Write "<td></td>"
end if
response.Write "</tr>"
response.Write "</table>"
%>