<table cellspacing = "0" cellpadding = "3" class = "horiz">
<tr>
<th width = "20%">Acronym</th>
<th width = "50%">Meaning</th>
<th width = "30%">Source</th>
</tr>
<%
mainletter = ""
While (NOT con.EOF)
letter = Left(con("acronym")
If mainletter <> letter Then
%>
<tr>
<td colspan = "3" ><h2><a name="<%=letter%>"><%=letter%></a></h2></td>
</tr>
<%
mainletter = Left(con("acronym"),1)
End If
<tr>
<td><%=con("acronym")%></td>
<td><%=con("meaning")%></td>
<td><%=con("source")%></td>
</tr>
<%
con.MoveNext()
Wend
%>
</table>
沒有留言:
張貼留言