1 | <% else |
2 | sx = sx & "<font color=" & thfgcol & ">" & typelist("cname") & "</font></a>" |
3 | %> |
4 | <th align="left" valign="middle" nowrap width="90%" bgcolor="<% = trbgcol %>"> |
5 | <% = sx%> |
6 | <% end if %> |
7 | </th></tr> |
8 | < tr align="left" valign="middle"> |
9 | <% |
10 | typelist.MoveNext ` loop through the records until it reaches EOF |
11 | Loop |
12 | %> |
13 | </tr></table> |
14 | <% |
15 | end if 'end of outer if |
16 | OBJdbConnection.close ` close the connection at the end |
17 | %> |
18 | </body> |
19 | </html> |