<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<!--#include file="fuction.asp"-->

<link href="<%=weburl%>css.css" rel="stylesheet" type="text/css">

<style type="text/css">
.bluelink {color:#0066CC}
.STYLE71 {
	font-size: 14px;
	font-weight: bold;
	font-family: "宋体";
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
}
</style>


<DIV id=makewing><%
set rsx=server.createobject("adodb.recordset")
rsx.open "select * from shop_pinpai order by pinpaiorder",conn,1,1
do while not rsx.eof %>
<table width="580" border="0" align="center" cellpadding="0" cellspacing="0" >
  <tr>

    <td width="265" align="center">
	<table width="100%" border="0" cellpadding="2" cellspacing="0">
      <tr>
        <td width="120" height="70" align="center" >		
		<a href=research.asp?action=0&searchkey=<%=trim(rsx("pinpainame"))%> target=_blank>
            <%if rsx("pinlogo")="" then 
	response.write "<div align=center><a href="&weburl&"research.asp?action=0&searchkey="&rsx("pinpainame")&" ><img src="&weburl&"img/nopic.gif width=120 height=60 border=0></a></div>"
	else
    response.write "<img src="&weburl&rsx("pinlogo")&"  width=120 height=60 border=0>"
    end if%></td>
        </tr>
      <tr>
        <td height="25" align="center" ><a href=<%=weburl%>research.asp?action=0&searchkey=<%=rsx("pinpainame")%>><%=rsx("pinpainame")%></td>
      </tr>
    </table>
	
	</td>
		
	<%
	if not rsx.eof then
	rsx.movenext
	end if
	if not rsx.eof then	%>
	
    <td   >&nbsp;&nbsp;&nbsp;</td>
 

    <td width="265" align="center">	
	
	<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="265" align="center"><table width="100%" border="0" cellpadding="2" cellspacing="0">
          <tr>
            <td width="120" height="70" align="center" ><a href=research.asp?action=0&searchkey=<%=trim(rsx("pinpainame"))%> target=_blank>
                  <%if rsx("pinlogo")="" then 
	response.write "<div align=center><a href="&weburl&"research.asp?action=0&searchkey="&rsx("pinpainame")&" ><img src="&weburl&"img/nopic.gif width=120 height=60 border=0></a></div>"
	else
    response.write "<img src="&weburl&rsx("pinlogo")&"  width=120 height=60 border=0>"
    end if%></td>
          </tr>
          <tr>
            <td height="25" align="center" ><a href=<%=weburl%>research.asp?action=0&searchkey=<%=rsx("pinpainame")%>><%=rsx("pinpainame")%></a></td>
          </tr>
        </table></td>
      </tr>
    </table>	
	
	</td>
	<%end if%>
	<%
	if not rsx.eof then
	rsx.movenext
	end if
	if not rsx.eof then	%>
	
    <td   >&nbsp;&nbsp;&nbsp;</td>
 

    <td width="265" align="center">	
	
	<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="265" align="center"><table width="100%" border="0" cellpadding="2" cellspacing="0">
          <tr>
            <td width="120" height="70" align="center" ><a href=research.asp?action=0&searchkey=<%=trim(rsx("pinpainame"))%> target=_blank>
                  <%if rsx("pinlogo")="" then 
	response.write "<div align=center><a href="&weburl&"research.asp?action=0&searchkey="&rsx("pinpainame")&" ><img src="&weburl&"img/nopic.gif width=120 height=60 border=0></a></div>"
	else
    response.write "<img src="&weburl&rsx("pinlogo")&"  width=120 height=60 border=0>"
    end if%></td>
          </tr>
          <tr>
            <td height="25" align="center" ><a href=<%=weburl%>research.asp?action=0&searchkey=<%=rsx("pinpainame")%>><%=rsx("pinpainame")%></a></td>
          </tr>
        </table></td>
      </tr>
    </table>	
	
	</td>
	<%end if%>
	<%
	if not rsx.eof then
	rsx.movenext
	end if
	if not rsx.eof then	%>
	
    <td   >&nbsp;&nbsp;&nbsp;</td>
 

    <td width="265" align="center">	
	
	<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="265" align="center"><table width="100%" border="0" cellpadding="2" cellspacing="0">
          <tr>
            <td width="120" height="70" align="center" ><a href=research.asp?action=0&searchkey=<%=trim(rsx("pinpainame"))%> target=_blank>
                  <%if rsx("pinlogo")="" then 
	response.write "<div align=center><a href="&weburl&"research.asp?action=0&searchkey="&rsx("pinpainame")&" ><img src="&weburl&"img/nopic.gif width=120 height=60 border=0></a></div>"
	else
    response.write "<img src="&weburl&rsx("pinlogo")&"  width=120 height=60 border=0>"
    end if%></td>
          </tr>
          <tr>
            <td height="25" align="center" ><a href=<%=weburl%>research.asp?action=0&searchkey=<%=rsx("pinpainame")%>><%=rsx("pinpainame")%></a></td>
          </tr>
        </table></td>
      </tr>
    </table>	
	
	</td>
	<%end if%>
  </tr>
</table> <%
if not rsx.eof then
rsx.movenext
end if
loop
rsx.close()
%>

<SCRIPT>
marqueesHeight=95;
stopscroll=false;
with(makewing){
    style.width=0;
    style.height=marqueesHeight;
    style.overflowX="visible";
    style.overflowY="hidden";
    noWrap=true;
    onmouseover=new Function("stopscroll=true");
    onmouseout=new Function("stopscroll=false");
  }
  preTop=0; currentTop=marqueesHeight; stoptime=0;
  makewing.innerHTML+=makewing.innerHTML;
  

function init_srolltext(){
  makewing.scrollTop=0;
  setInterval("scrollUp()",1);
}init_srolltext();

function scrollUp(){
  if(stopscroll==true) return;
  currentTop+=1;
  if(currentTop==marqueesHeight+1)
  {
    stoptime+=1;
    currentTop-=1;
    if(stoptime==300) 
    {
      currentTop=0;
      stoptime=0;      
    }
  }
  else {    
    preTop=makewing.scrollTop;
    makewing.scrollTop+=1;
    if(preTop==makewing.scrollTop){
      makewing.scrollTop=marqueesHeight;
      makewing.scrollTop+=1;
      
    }
  }

}
init_srolltext();
</SCRIPT>
</DIV>




	

