<!--#include file="../conn/conn.asp"-->
<!--#include file="head.asp"-->

<Br>
<table width="750" align="center" border="0" style="BORDER-RIGHT: #489ae6 1px solid; BORDER-LEFT: #489ae6 1px solid; BORDER-TOP: #489ae6 1px solid; BORDER-BOTTOM: #489ae6 1px solid">
<tr>
<td width="100%" align=center>

<table>
        <tr>
          <td width="80%">&nbsp;&nbsp; 欢迎与<%=Webname%>建立友情链接，我们的网址:<FONT 
face=Arial><a style="color: #0000ff" href="<%=WebUrl%>"><%=WebUrl%></a>，</FONT>站点名称:<font color="#0000FF"><%=Webname%>，</font>链接图片请从右图中选择。我们同时也将您的站点加入我们的友情链接，链接图片大小为88*31像素，联系方式：<Br>
            <FONT face=Arial>EMAIL</FONT>：<FONT 
face=Arial><a style="color: #0000ff" href="mailto:<%=SystemEmail%>"><%=SystemEmail%></a>.</FONT> 
            电话：<FONT color="#0000ff"><%=Systemtel%></font> 传真：<FONT color="#0000ff"><%=hotfax%></font> 
          </td>
          <td width="20%" align="center"> 
            <table>
              <tr>
                <td> <img width="80" height="31" border="0"></td>
</tr>
</table>

</td>
</tr>
</table>

</td>
</tr>
</table>
<Br>
<%
sql="select * from banner where bz=5 order by LinkID"
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write"<div align=center>暂无图片友情链接</div>"
else 
response.Write"<table width='750' height='69' border='0' align='center' style='BORDER-RIGHT: #489ae6 1px solid; BORDER-LEFT: #489ae6 1px solid; BORDER-TOP: #489ae6 1px solid; BORDER-BOTTOM: #489ae6 1px solid'>"
response.Write"<tr>"
do while not rs.eof
response.Write"<td width='100' align='center' style='color: #000000; font-family: 宋体; font-size: 12px; line-height:150%' height='42'>"
response.Write"<a href='"&rs("web")&"' target='_blank'><img border='0' src='picture/"&rs("picurl")&"' width='88' height='31' alt='"&rs("deseriptor")&"'></a></td>"
response.Write"</td>"
a=a+1
if a=7 then
response.Write"</tr>"
a=0
end if
rs.movenext 
loop 
response.write"</table>"
end if
rs.close 
set rs=nothing 
conn.close
set conn=nothing 
%>
<br>
<!--#include file="../inc/end.asp"-->