<TABLE id=tb border=1>
<TR><TD>field1</TD><TD>field2</TD><TD>field3</TD></TR>
<TR><TD>1</TD><TD>2</TD><TD>3</TD></TR>
<TR><TD>1</TD><TD>2</TD><TD>3</TD></TR>
<TR><TD>1</TD><TD>2</TD><TD>3</TD></TR>
</TABLE>
<SCRIPT LANGUAGE=vbscript>
sub aaa(x)
for i=0 to tb.rows.length-1
for j=0 to tb.rows(i).cells.length-1
if x=j then
tb.rows(i).cells(j).style.display="block"
else
tb.rows(i).cells(j).style.display="none"
end if
next
next
end sub