<!--#include file="set.asp"-->
<%
call yecaosql()
sub top()
if request.cookies(yecao)("MyDiySkin")="" then
yecaoskin=skin
else
yecaoskin=request.cookies(yecao)("MyDiySkin")
end if
YCMS("<html>")
YCMS("<head>")
YCMS("<title>"&webname&"→"&title&"</title>")
YCMS("<meta http-equiv='Content-Type' content='text/html; charset=gb2312'>")
YCMS("<meta http-equiv='imagetoolbar' content='no'>")
YCMS("<META NAME='keywords' CONTENT='"&keywords&"'>")
YCMS("<META NAME='description' CONTENT='"&keywords&"'>")   
YCMS("<META NAME='robots' CONTENT='all'>")
YCMS("<META name='AUTHOR' content='千纸鹤我爱你，bgh_edu@126.com'>")
YCMS("<NOSCRIPT><iframe src='*.asp'></iframe></NOSCRIPT>")
YCMS("<BASE onmouseover=""window.status='您的信息→〖I&nbsp;P地址："&request.servervariables("remote_addr")&"〗→〖操作系统："&strsplit(2)&"〗→〖浏览器："&strsplit(1)&"〗→口号："&status&"';return true"">")
YCMS("<link rel='stylesheet' href='skin/"&yecaoskin&"/css.css' type='text/css'>")
YCMS("<SCRIPT src='img/js.js' language='javascript'></SCRIPT></head>")
YCMS("<body topmargin='0' leftmargin='0'") 
if rightmenu="1" then   
response.write"oncontextmenu=""return false"""
elseif rightmenu="2" then  
response.write"oncontextmenu=""return false"" ondragstart=""return false"" onselectstart=""return false"""
end if
YCMS(">")
YCMS("<span class='topspace'></span>")
YCMS("<table border='0' cellspacing='0' cellpadding='0' align='center'>")
YCMS("<tr><td class='topleft'></td>")
YCMS("<td  class='topcenter' align='center'>")
YCMS("<table border='0' cellspacing='1' cellpadding='0' align='center' class='topshow' width='100%'><tr>")
YCMS("<td height='21' ><font class='menufont'>&nbsp;<img src='img/url.gif' border='0' width='15' height='15' align='absMiddle'>&nbsp;"&webname&"</font></td>")
YCMS("<td width=21 height='21' class='off' onmouseover=""this.className='overoff'"" onmouseout=""this.className='off'"" title='设为主页'   align='center' onClick=""this.style.behavior='url(#default#homepage)';this.sethomepage('"&weburl&"');return false;""></td>")
YCMS("<td width=21 height='21' class='on' onmouseover=""this.className='overon'"" onClick=""window.external.AddFavorite('"&weburl&"', '"&webname&"')"" onmouseout=""this.className='on'"" title=""加入收藏""  align='center'></td>")
YCMS("<td width=21 height='21' class='close' onclick=""window.close();"" onmouseover=""this.className='overclose'"" onmouseout=""this.className='close'"" title='关闭'></td></tr></table>")
YCMS("</td><td class='topright'></td></tr></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center'><tr>")
YCMS("<td class='left'></td><td class=top>")
YCMS("<span style='position:relative'>")
YCMS("<DIV  style='POSITION:absolute;bottom:2px;right:3px;display:none' id='skin'>")
YCMS("<table  border='1' cellspacing='0' cellpadding='0' bordercolor='"&border&"'><tr>")
sql="select * from [YC_skin] order by id asc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if not rs.bof and not rs.eof then
num=1
do while not rs.eof
YCMS("<td  align='center' height='22' onmouseover=""this.className='trover'"" onmouseout=""this.className='tr'"" class='tr' width='65'><a href=error.asp?action=skin&skin="&rs("skinurl")&">"&rs("skinname")&"</a></td>")
num=num+1
rs.movenext
loop
end if
rs.close
set rs=nothing
YCMS("</tr></table></DIV></span>")

YCMS("<OBJECT classid=""clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"" codeBase=""http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0"" width=""100%"" height=""100%"">")
YCMS("<PARAM NAME=""movie"" VALUE=""img/3.swf"">")
YCMS("<PARAM NAME=""quality"" VALUE=""high"">")
YCMS("<PARAM NAME=""wmode"" VALUE=""transparent"">")
YCMS("<embed src=""img/3.swf"" width=""100%"" height=""100%"" quality=""high"" pluginspage=""http://www.macromedia.com/go/getflashplayer""  type=""application/x-shockwave-flash"" wmode=""transparent""></embed></OBJECT>")

YCMS("</td><td class='right'></td></tr></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center'>")
YCMS("<tr><td class='left'></td>")
YCMS("<td height='30' class='width'>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='footmenucss' width='100%'><tr><td>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' width='100%'>")
YCMS("<tr><td width='4'></td>")
sql="select * from [YC_menu] where pass=true and foot=false order by menuid asc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
i=0
do while not rs.eof
if rs("open")=true then
YCMS("<td width='35' align='center' height='30'>")
YCMS("<table><tr><td width='62' height='22' onmouseover=""this.className='overmenu'"" onmouseout=""this.className='menu'"" onclick=""window.open('"&rs("url")&"')"" align='center'><font class='menufont'>"&rs("title")&"</font></td></tr></table></td>")
else
YCMS("<td width=35 align='center' height=30>")
YCMS("<table><tr><td width='62' height='22' onmouseover=""this.className='overmenu'"" onmouseout=""this.className='menu'"" onclick=""self.location='"&rs("url")&"'"" align='center'><font class='menufont'>"&rs("title")&"</font></td></tr></table></td>")
end if
i=i+1
if i>=20 then exit do
rs.movenext
loop
if rs.eof and rs.bof then
Response.Write "<center><font color=red><b>暂时没有数据！</b></font></center>"
end if
rs.close
set rs=nothing
YCMS("<td width='60'  align='center' height='30'>")
YCMS("<table><tr><td width='58' height='22'  onmouseover=""this.className='overmenu'"" onmouseout=""this.className='menu'"" align='center' onclick=""document.all.skin.style.display=(document.all.skin.style.display =='none')?'':'none'""><font class='menufont'>选择风格</font></td></tr></table></td>")
YCMS("</tr></table></td></tr></table></td><td class=right></td></tr></table>")
end sub
vbs=conn.execute("select *from YC")(0)
sub foot()
endtime=timer()
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center'>")
YCMS("<tr><td class='left'></td>")
YCMS("<td align='center' height='30' class='width'>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='footmenucss' width='100%'><tr><td>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center'><tr><td width='4'></td>")
sql="select * from [YC_menu] where pass=true and foot=true order by menuid asc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
i=0
do while not rs.eof
if rs("open")=true then
YCMS("<td width='70'  align='center' height='30'>")
YCMS("<table><tr><td width='65' height='22' onmouseover=""this.className='overmenu'"" onmouseout=""this.className='menu'"" onclick=""window.open('"&rs("url")&"')"" align='center'><font class='menufont'>"&rs("title")&"</font></td></tr></table></td>")
else
YCMS("<td width='70' align='center' height='30'>")
YCMS("<table><tr><td width='65' height='22' onmouseover=""this.className='overmenu'"" onmouseout=""this.className='menu'"" onclick=""self.location='"&rs("url")&"'"" align='center'><font class='menufont'>"&rs("title")&"</font></td></tr></table></td>")
end if
i=i+1
if i>=10 then exit do
rs.movenext
loop
if rs.eof and rs.bof then
YCMS("<center>暂时没有数据！</center>")
end if
rs.close
set rs=nothing
YCMS("<td width='70'  class='menubg' align='center' height='30'>")
YCMS("<table><tr><td width='65' height='22' onmouseover=""this.className='overmenu'"" onmouseout=""this.className='menu'""  onclick=""document.all.skin.style.display=(document.all .skin.style.display =='none')?'':'none'"" align='center'>")
YCMS("<font class='menufont'><script src=tongji.asp></script></font></td></tr></table>")
YCMS("</td></tr></table></td></tr></table></td><td class=right></td></tr></table>")
YCMS("<table border='0'   cellspacing='0' cellpadding='0' align='center' class=bgcolor>")
YCMS("<tr><td class='left'></td><td height='50' align='center' class='width' style='word-break:break-all;table-layout:fixed;line-height:150%;'>")
YCMS("<font class='menufont'>"&copyright&"</font><br>")
YCMS("<a href='http://www.miibeian.gov.cn' target='_blank'><font class='menufont'>豫ICP备05023618号</font></a>")
YCMS("<a href='http://www.qqzzhh.com' target='_blank'><font class='menufont'>WwW.QqZzHh.CoM</font></a>")
YCMS("<script language='javascript' src='http://count20.51yes.com/click.aspx?id=201727421&logo=1'></script>")
YCMS("<BR>")
YCMS("</td><td class=right></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0' align='center'><tr><td  class=footleft></td><td width='740' class=footcenter align='center'></td><td class=footright></td></tr></table><div class=footspace></div></body></html>")
call closedata()
end sub
%>
