转自

 

<%

sub main_center_link()   dim tmp1   tmp1="<script language=javascript src='/xml/links.asp?sort=ftxt'></script>"   response.write vbcrlf&"<table cellspacing=1 cellpadding=4 class=table>" & _                  vbcrlf&"<tr><td class=td><table border=0 cellspacing=0 cellpadding=0 width='100%'><tr><td width='30%' class=ftd> 文字链接</td><td align=right width='70%'><a href=links.asp><font color=white>more>>>"&"</a></td></tr></table></td></tr>" & _                  vbcrlf&"<tr class=bg_td><td align=center>"&tmp1&"</td></tr>" & _                  vbcrlf&"</table>"&ukong end sub %> <% call main_center_link() %>