bottphoto.asp

简单整站程序

<div align="center">
	<table border="0" cellpadding="0" style="border-collapse: collapse" width="900" height="124" id="table3">
		<tr>
			<td width="40" height="124" background=<%=photojpgl%>></td>
			<td>
			<table border="0" cellpadding="0" style="border-collapse: collapse" width="820" id="table4" height="124">
				<tr>
					<td height="16" background=<%=photojpgt%>></td>
				</tr>
				<tr>
					<td height="90"bgcolor="#FFFFFF">
								<div id=demo style="OVERFLOW: hidden; WIDTH: 819px; COLOR: #ffffff">
                                    <table cellspacing=0 cellpadding=0 align=left border=0 id="table19">
                                    <tbody>
                                      <tr>
                                       <td id=demo1 align=middle > 
									     <table  align=center id="table20">
                                         <tbody>
                                          <tr>
                                           <td>
											<table id=table21 style="BORDER-COLLAPSE: collapse" cellspacing=0  border=0 width="819" align=center  >
                                            <tbody>
                                            <tr>	
											   <%
                                               set rs=server.createobject("adodb.recordset")
                                               rs.Open "select ProductName,smallPic,productid from Product where jyflag=1 order by ChangeDate desc" ,conn,1,1
                                               i=1
                                               do while not rs.eof
                                                  ProductName=rs("ProductName")
                                                  if len(ProductName)>7 then ProductName=left(ProductName,7) &"..."											
											   %>			
                                                        <td>
														<table cellspacing=0 cellpadding=0 border=0 id="table22" width="105">
                                                            <tbody>
                                                              <tr>
                                                                <td align=middle><span id=_ctl8_newsGrid__ctl0_Label1 title=<%=rs("ProductName")%>><a title=<%=rs("ProductName")%> href="showinfo.asp?id=<%=rs("productid")%>&name=---"  target=_blank>
                                                                <span style="font-size: 10pt"><img height=55 src=<%="UpLoadFile\" &rs("smallPic")%> width=90 onload="javascript:if(this.width>screen.width-333)this.width=screen.width-333" border=0></span></a></span>
                                                                </td>
                                                                <td align=middle width=1></td>
                                                              </tr>
                                                              
                                                              <tr>
                                                                <td align=middle>
                                                                <span style="font-size: 9pt"><%=ProductName%></span></td>
                                                                <td></td>
                                                              </tr>                  
                                                            </tbody>
                                                        </table>
                                                        </td>
                                             <%
                                               i=i+1
                                               if i>photonum then exit do
                                               rs.movenext
                                             loop
                                             ConnClose()
                                             %>
                                            </tr>
                                            </tbody>
                                            </table>
                                            </td>
                                            <td id=demo2 valign=top width="0"></td>
                                         </tr>
                                        </tbody>
                                        </table>
                                     </TD>
                                     </TR>
                                     </TBODY>
                                     </TABLE>
                                </div>

                                  <SCRIPT language=JavaScript>
									var speed=50;
									demo2.innerHTML=demo1.innerHTML;	//克隆demo1为demo2

									function Marquee(){
										if(demo2.offsetWidth  <= demo.scrollLeft){	//当滚动至demo1与demo2交界时
											demo.scrollLeft = demo.scrollLeft - demo1.offsetWidth;		//demoa跳到最顶端
										}
										else{
											demo.scrollLeft++;
										}
									}

									var MyMar=setInterval(Marquee,speed);	//设置定时器

									demo.onmouseover=function() {clearInterval(MyMar);}//鼠标移上时清除定时器达到滚动停止的目的
									demo.onmouseout=function() {MyMar=setInterval(Marquee,speed);}//鼠标移开时重设定时器
				                  </SCRIPT>					
					</td>
				</tr>
				<tr>
					<td height="16" background=<%=photojpgb%>></td>
				</tr>
			</table>
			</td>
			<td width="40" height="124" background=<%=photojpgr%>></td>
		</tr>
	</table>
</div>