一个经过完善设计的经典网上购物系统

源代码在线查看: info_leitop.asp

软件大小: 1846 K
上传用户: philipsx
关键词: 网上购物
下载地址: 免注册下载 普通下载 VIP

相关代码

				
				              
				                
				                    
				                      
				                        				            src="img/xiao/new_line_004.gif" width=4>
				                        
				                        				            src="img/xiao/new_line_005.gif" width=4>
				                      
				                      
				                        
				                        				          align=middle valign="top" 
				          style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 3px; PADDING-TOP: 0px">
				                            
				                              
				                                  
				                                    
				                                    特价商品
				                                  
				                                  
				                                    
				                                  
				                              
				                            
				                            
				                              
				                                  
				                                    						  rs.open "select Top 6 * from shop_product order by tejiaproduct,productid desc ",conn,1,1
						  if rs.eof and rs.bof then
						  response.write "目前还没有特价商品"
						  'response.End
						  else
						  %>
				                                    						if not rs.eof then
						i=1
						do while not rs.eof%>
				                                    
				                                        
				                                          
				                                        
				                                      
				                                        
				                                          
				                                            
				                                                
				                                                  
				                                                    				response.write ""
				else%>
				                                                        
				                                                        
				                                                    
				                                                  
				                                                
				                                            
				                                          
				                                          
				                                            
				                                          
				                                      
				                                    
				                                  
				                                  					    rs.movenext
				         i=i+1
				    	 loop
						rs.close
						end if
						end if 
					%>
				                              
				                            
				                        
				                         
				                      
				                      
				                        				            src="img/xiao/new_line_006.gif" width=4>
				                        
				                        				            src="img/xiao/new_line_007.gif" width=4>
				                      
				                    
				                
				                
				                    
				                      
				                        				            src="img/xiao/new_line_004.gif" width=4>
				                        
				                        				            src="img/xiao/new_line_005.gif" width=4>
				                      
				                      
				                        
				                        				          align=middle valign="top" 
				          style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 3px; PADDING-TOP: 0px">
				                            
				                              
				                              
				                            
				                          
				                            
				                              
				                                						  i=0
						  set rs=server.CreateObject("adodb.recordset")
						  rs.open "select top 6 newsname,adddate,newsid from shop_news order by adddate desc",conn,1,1
						  if rs.eof and rs.bof then
						  response.write "目前还没有商城新闻"
						  else
						  do while not rs.eof
						  i=i+1%>
				                                   
				                                    17 then
						  response.write ""&left(trim(rs("newsname")),16)&"."&""
						  else
						  response.write ""&trim(rs("newsname"))& ""
						  end if
						  if i>=10 then exit do%>
				                              
				                              						  loop
						  end if
						  rs.close
						  set rs=nothing%>
				                          
				                         
				                      
				                      
				                        				            src="img/xiao/new_line_006.gif" width=4>
				                        
				                        				            src="img/xiao/new_line_007.gif" width=4>
				                      
				                    
				                
				                
				                    
				                      
				                      
				                    
				                                    
				                  
				              
				            			

相关资源