<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn/conn.asp" -->
<!--#include file="conn/function.asp" -->
<%
if LCase(right(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),9))="index.asp" then
D_domain=split(split("http://"&Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),"http://")(1),right(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),10))(0)
else
if LCase(right(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),8))="main.asp" then
D_domain=split(split("http://"&Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),"http://")(1),right(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),9))(0)
else
D_domain=left(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"),len(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL"))-1)
end if
end if
set xmlhttp=server.createobject("Microsoft.XMLHTTP")
xmlhttp.open "get","http://"&D_domain&"/theme/"&C_no&"/config.asp",false
xmlhttp.send
xmlpass=xmlhttp.responsetext
set xmlhttp=nothing
C_config=xmlpass
if split(C_config,"|")(30)="b" then
bg_color="#000000"
else
bg_color="#FFFFFF"
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title><%=C_title%></title>
<meta name="keywords" content="<%=C_keywords%>" />
<meta name="description" content="<%=C_content%>" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="favicon.ico" mce_href="favicon.ico" rel="bookmark" type="image/x-icon" /> 
<link href="favicon.ico" mce_href="favicon.ico" rel="icon" type="image/x-icon" /> 
<link href="favicon.ico" mce_href="favicon.ico" rel="shortcut icon" type="image/x-icon" />
<script type="text/javascript">
 try {
 var urlhash = window.location.hash;
 if (!urlhash.match("fromapp"))
 {
 if ((navigator.userAgent.match(/(iPhone|iPod|Android|ios|iPad)/i)))
 {
 <%if C_mobileon=1 then%>
 window.location="./wap";
 <%else%>
 <%end if%>
 }
 }
 }
 catch(err)
 {
 }
</script> 
<script type="text/javascript" src="js/show.js"></script>
<script type="text/javascript" src="js/swfobject.js"></script>
<script type="text/javascript" src="js/swfaddress.js"></script>
<script type="text/javascript">	
	var flashvars = {
	};
	var params = {
	wmode: "opaque",
	  menu: "true",
	  allowfullscreen: "true",
	  allowscriptaccess: "always",
	  bgcolor: "<%=bg_color%>"
	};
	var attributes = {
	  id: "flash",
	  name: "flash"
	};
	swfobject.embedSWF("http://<%=D_domain%>/theme/<%=C_no%>/swf/main.swf?domain=<%=D_domain%>&vision=<%=split(C_config,"|")(1)%>", "flash", 640, 360, "9.0.0","swf/expressInstall.swf", flashvars, params, attributes);
</script>
<link href="css/lanrenzhijia.css" rel="stylesheet" type="text/css" />
<script src="js/jquery.min.js"></script>
<script src="js/jquery.hhService.js"></script>
<style type="text/css">
html {
    overflow:auto;
}
body {
	background-color:#000000;
	font-family:Arial,Helvetica,sans-serif;
	margin:0;
	padding:0;
	width:100%;
	height:100%;
	font-size:12px;
}
#flash {
	width:100%;
	height:100%;
	min-width:960px;
	min-height:540px;
	position:absolute;
	color:#00ADF1;
	letter-spacing:-5px;
	line-height:37px;
}
a img {
	border:none;
}
a{ font-size:12px; color:#000000; text-decoration:none;}
a:hover {color:#0066ff;}
.link{margin:10px 10px 10px 10px;padding:5px 5px 5px 15px;background-color: #aaaaaa;color:#ffffff; font-size:15px;}
.link2{margin:10px 10px 10px 30px;padding:5px 5px 5px 15px;background-color: #bbbbbb;color:#ffffff; font-size:15px;}
</style>
</head>
<body>
<%
if C_fx=1 then
%>
<div style='left:<%=split(C_config,"|")(26)%>px;POSITION:absolute;bottom:<%=split(C_config,"|")(27)%>px;z-index:100; float:left'>
<%=C_fenxiang%>
</div>
<%
end if
%>
<div style='right:<%=split(C_config,"|")(28)%>px;POSITION:absolute;bottom:<%=split(C_config,"|")(29)%>px;z-index:100'>
<%
if C_member=1 then
%>
<div style=" float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('会员中心','<iframe frameborder=0 src=member/index.asp width=100% height=470></iframe>',800,500);"><img src='image/me.png' alt="会员中心"></a></div>
<%
end if
%>
<%
if C_shop=1 then
%>
<div style=" float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('购物车','<iframe frameborder=0 src=member/member_shop.asp width=100% height=470></iframe>',800,500);"><img src='image/buy.png' alt="购物车"></a></div>
<%
end if
%>
<%
if C_search=1 then
%>
<div style=" float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('搜索','<iframe frameborder=0 src=zj/search.asp width=100% height=470></iframe>',800,500);"><img src='image/search.png' alt="搜索"></a></div>
<%
end if
%>
<%
if C_wb="sina" then
%>
<div style="float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('微博展示','<%=replace(C_swbid,"""","")%>',500,500);"><img src='image/s.png' alt="新浪微博"></a></div>
<%
end if
%>
<%
if C_wb="tecent" then
%>
<div style=" float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('微博展示','<%=replace(C_twbid,"""","")%>',500,500);"><img src='image/t.png' alt="腾讯微博"></a></div>
<%
end if
%>
<%
if C_wb="all" then
%>
<div style=" float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('微博展示','<%=replace(C_swbid,"""","")%>',500,500);"><img src='image/s.png' alt="新浪微博"></a></div>

<div style=" float:right; padding-left:10px;"><a href="javascript:void(0);" onClick="alertWin('微博展示','<%=replace(C_twbid,"""","")%>',500,500);"><img src='image/t.png' alt="腾讯微博"></a></div>
<%
end if
%>
</div>
	<%
if C_qqon=1 then
%>
<div class="scrollsidebar" id="hhService">
	<div class="side_content">
		<div class="side_list">
			<div class="side_title">
				<a title="隐藏" class="close_btn"><span>关闭</span></a></div>
			<div class="side_center">
				<div class="qqserver">
				<%
qq=split(C_qq,"|")
For i = 0 To UBound(qq)
response.Write "<p><a title='点击这里给我发消息' href='http://wpa.qq.com/msgrd?v=3&uin="&qq(i)&"&site=qq&menu=yes' target='_blank'><img src='http://wpa.qq.com/pa?p=1:"&qq(i)&":52'> 客服:"&qq(i)&"</a></p>"
Next
				%>
				</div>
				<div class="msgserver">
					<p><img src="http://qr.liantu.com/api.php?text=http://<%=D_domain%>&w=120&m=0" /></p>
				</div>
			</div>
			<div class="side_bottom">
			</div>
		</div>
	</div>
	<div class="show_btn"><span>在线客服</span></div>
</div>
<%
end if
%>
</div>
	<div id="flash">
<div style="height:1000px;"></div>
<div style="width:1000px; margin:0 auto; margin-top:50px;">
<%
Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select * from menu1 where U_sub=0 order by U_order"
rs.open sql,conn,1,1
if not rs.eof then
Do while Not rs.eof

Set rs1= Server.CreateObject("ADODB.RecordSet")
sql1="select * from menu1 where U_sub="&rs("U_id")&" order by U_order"
rs1.open sql1,conn,1,1
if not rs1.eof then
Do while Not rs1.eof
if  rs1("U_type")<>"link" then
link1=rs1("U_type")&".asp?id="&rs1("U_typeid")&"&from="&from
else
link1=rs1("U_type")&".asp?id="&rs1("U_id")&"&from="&from
end if
submenu= submenu&"<a href='html/"&link1&"'><div class='link2'>┗ <img src='media/"&rs1("U_icon")&"' width='15'> "&rs1("U_title")&"</div></a>"

rs1.movenext
		loop
	end if
set rs1=nothing
if rs("U_type")<>"sub" and rs("U_type")<>"link" then
link=rs("U_type")&".asp?id="&rs("U_typeid")&"&from="&from
else
if rs("U_type")="link" then
link=rs("U_type")&".asp?id="&rs("U_id")&"&from="&from
else
link="#"
end if
end if

response.Write "<a href='html/"&link&"'><div class='link'><img src='media/"&rs("U_icon")&"' width='15'> "&rs("U_title")&"</div></a>"&submenu
submenu=""
rs.movenext
		loop
	end if
set rs=nothing	
%></div>
<div style="width:1000px;margin:0 auto;">
<br><br><br><br><br><br><br><br><br><br><br>
<h3>如果您看到这个页面，说明您的计算机未安装Flash Player，请点击下面的图标安装</h3>
<a href="http://get.adobe.com/cn/flashplayer/" target="_blank"><img src="media/flashplayer.gif"></a> <br>访客统计：<%=C_code%> <h2><a href="http://www.flash-soul.com" title="flash网站模板"><font color="#FFFFFF">Flash网站模板</font></a></h2> 
</div>
</div>
</body>
</html>
