<!--#include file="../inc/admin_conn.asp"-->
<!--#include file="../Star.INC"-->
<!--#include file="../md5/md5.asp"-->
<!--#include file="../Function.Asp"-->
<!--#include file="../Style.Asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from ylmv_ads1" 
rs.open sql,conn,1,1
if not rs.eof then
	Application("ads1")=rs("ads1")			
	Application("ads2")=rs("ads2")			
	Application("ads3")=rs("ads3")			
	Application("ads4")=rs("ads4")			
	Application("ads5")=rs("ads5")		
        APPlication("ads6")=rs("ads6")				
	Application("ads7")=rs("ads7")		
        APPlication("ads8")=rs("ads8")				
        APPlication("ads9")=rs("ads9")
        APPlication("ads10")=rs("ads10")
end if
rs.close
set rs=nothing
	ads1=Application("ads1")			      
	ads2=Application("ads2")			             
	ads3=Application("ads3")		               
	ads4=Application("ads4")				
	ads5=Application("ads5")		        
        ads6=Application("ads6")				
	ads7=Application("ads7")		        
        ads8=Application("ads8")                                  
        ads9=Application("ads9")
        ads10=Application("ads10")
%>
<%
if Application("MaxShangpinlist")="" then
 Application.Lock
	Application("MaxSpecialList")="15"
 Application.UnLock
end if
	MaxSpecialList=Application("MaxSpecialList")
%>