<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td bordercolor="#FFFFFF"><div align="center"><marquee direction="left" scrollamount="5" width="760">
IT大青岛真诚欢迎各地区企业与我们联系合作! 电话：0532-82924086 
</marquee></div></td>
</tr>
<tr>
<td bordercolor="#FFFFFF"><font color="#333333">友情链接：</font></td>
</tr>
<tr> 
<td bordercolor="#FFFFFF">
<%set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from shop_links where linkidorder<300 order by linkidorder",conn,1,1
while not rs.EOF%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
<td><%if not rs.eof then%><a href="<%= trim(rs("linkurl")) %>" target="_blank"><font color=#333333><%= trim(rs("linkname")) %>
<%rs.MoveNext
end if%>
</font></a></td>
</tr>
</table>
<%wend
rs.Close
set rs=nothing
%></td>
</tr>
</table>