<a class="first" href="./1">标题1</a>
<a href="./2.html">标题2</a>
<a href="./3.html">标题3</a>
<a href="./4.html">标题4</a>
<a href="./5.html">标题5</a>


上面的输出如何用下面表达式来表达  让第一个定义 class=first

Sql=Sql & " order by IsTop desc,IsCommend desc,Id desc"
Rs.Open Sql,Conn,0,1
Do While Not Rs.Eof
    ID = Rs("ID")
    Title = Rs("Title")
    TitleURL = Rs("TitleURL")
    If TitleURL = "" Then TitleURL = Page_URL(ChannelID,"",ID)
    Response.Write("<a href=""" & TitleURL & """>" & Title & "</a>")        
    Rs.MoveNext
Loop
Rs.Close

Sql=Sql & " order by IsTop desc,IsCommend desc,Id desc"
Rs.Open Sql,Conn,0,1
Dim i
i=0
Do While Not Rs.Eof
    ID = Rs("ID")
    Title = Rs("Title")
    TitleURL = Rs("TitleURL")
    If TitleURL = "" Then TitleURL = Page_URL(ChannelID,"",ID)
    IF i=0 Then
       Response.Write("<a class='first' href=""" & TitleURL & """>" & Title & "</a>")
    Else
       Response.Write("<a href=""" & TitleURL & """>" & Title & "</a>")
    End IF
    i=i+1        
    Rs.MoveNext
Loop
Rs.Close