<!--#include file="Inc/syscode.asp"-->
<!--#include file="Include/Bs_SysDown.asp"-->
<!--#include file="Include/Bs_StrLeft.asp"-->
<!--#include file="Inc/Top.asp" -->
<%
'请勿改动下面这三行代码
ShowSmallClassType=ShowSmallClassType_Default
MaxPerPage=MaxPerPage_Default
strFileName="Bs_download.asp?Bs_BigClassName=" & Bs_BigClassName & "&Bs_SmallClassName=" & Bs_SmallClassName 
%>
<!-- #include file="Inc/Head.asp" -->
<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" bgcolor="#C0C0C0">
	  <p align="center"><img src="images/rjfl.jpg" width="200" height="28"></td>
  </tr>
  <tr>
    <td valign="top">
	<div align="center">
		<table border="0" width="95%" id="table1">
			<tr>
				<td bgcolor="#FFFFF7"><% Call Show_DownSmallClass_Tree() %></td>
			</tr>
		</table>
	</div>
	</td>
  </tr>
  <tr>
    <td valign="top">　</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="766" border="0" cellPadding="0" cellSpacing="0">
     
		<TR> 
			<td width="766" align="center"><table width="680" border="0" cellspacing="0" cellpadding="0" height="15">
          <tr>
            <td width="12">　</td>
            <td width="668">　</td>
          </tr>
        </table></td>
		</TR>
		<TR> 
			<TD> 
				<TABLE cellPadding=0 cellSpacing=0 align='center' class='M_Center_Title'>


<!-- 下载中心 -->
		<TR>
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 class='MC_Pt_Title'>
					<TR>
						<TD class='MC_Pt_TD1'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
						<TD class='MC_Pt_TD2'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
						<TD class='MC_Pt_TD3'><SPAN class=Glow>
<% call ShowClass_DownGuide() %>
&nbsp;</SPAN></TD>
						<TD class='MC_Pt_TD4'><div align="right">
<% call ShowDownTotal() %>
&nbsp;</div></TD>
						<TD class='MC_Pt_TD5'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
					</TR>
				</TABLE>
			</TD>
		</TR>
		<TR> 
		  <TD>
				<TABLE width="500" cellPadding=0 cellSpacing=0 class='MC_DoNr_Title'>
					<tr> 
						<td align='center' valign=top style="line-height: 150%"><span style="line-height: 150%">
			    <% '=================================================
'过程名：ShowDown
'=================================================
TitleLen=32
	if TitleLen<0 or TitleLen>200 then
		TitleLen=50
	end if
    if currentpage<1 then
	   	currentpage=1
    end if
	if (currentpage-1)*MaxPerPage>totalput then
		if (totalPut mod MaxPerPage)=0 then
	   		currentpage= totalPut \ MaxPerPage
		else
		   	currentpage= totalPut \ MaxPerPage + 1
		end if
   	end if
	if currentPage=1 then
        sql_Down="select top " & MaxPerPage	
	else
		sql_Down="select "
	end if

	sql_Down=sql_Down & " Bs_DownID,Bs_BigClassName,Bs_SmallClassName,Bs_level,Bs_Title,Bs_UpDateTime,Bs_FileSize,Bs_Language,Bs_LicenceType,Bs_System,Bs_Hits,Bs_DownloadUrl,Bs_Content from Bs_Download where Bs_Passed=True"
	
	if Bs_BigClassName<>"" then
		sql_Down=sql_Down & " and Bs_BigClassName='" & Bs_BigClassName & "' "
		if Bs_SmallClassName<>"" then
			sql_Down=sql_Down & " and Bs_SmallClassName='" & Bs_SmallClassName & "' "
		end if
	end if
	sql_Down=sql_Down & " order by Bs_sn,Bs_DownID desc"
	Set rs_Down= Server.CreateObject("ADODB.Recordset")
	rs_Down.open sql_Down,conn,1,1

	if rs_Down.bof and  rs_Down.eof then
		response.Write("<br><li>没有任何下载</li>")
	else
		if currentPage=1 then
			call DownContent(TitleLen)
		else
			if (currentPage-1)*MaxPerPage<totalPut then
         	   	rs_Down.move  (currentPage-1)*MaxPerPage
         		dim bookmark
           		bookmark=rs_Down.bookmark
            	call DownContent(TitleLen)
        	else
	        	currentPage=1
           		call DownContent(TitleLen)
	    	end if
		end if
	end if
	'rs_Down.close
	'set rs_Down=nothing


sub DownContent(intTitleLen)
   	dim i,lb,strTemp
    i=0
	do while not rs_Down.eof

		lb=""
		lb=lb & "<table width=98% border=0 cellSpacing=1 cellpadding=3 bgColor=#b8b8b8>"
			lb=lb & "<tr><td width=60% height=22 bgColor=#ddffd0>"
			lb=lb & "<a href=Bs_DownloadShow.asp?Bs_DownID=" & rs_Down("Bs_DownID") & ">&nbsp;<b>" & rs_Down("Bs_Title") & "</b></a>"
			lb=lb & "</td>"
			lb=lb & "<td bgColor=#ddffd0 align=right>"
			lb=lb & "<a href=Bs_Download.asp?Bs_BigClassName=" & rs_Down("Bs_BigClassName") & ">" & rs_Down("Bs_BigClassName") & "</a> | "
			lb=lb & "<a href=Bs_Download.asp?Bs_BigClassName=" & rs_Down("Bs_BigClassName") & "&Bs_SmallClassName=" & rs_Down("Bs_SmallClassName") & ">"
			lb=lb & rs_Down("Bs_SmallClassName") & ""
			lb=lb & "</a>&nbsp;</td></tr>"

			lb=lb & "<tr><td height=22 bgColor=#ffffff>&nbsp"
			lb=lb & "<FONT COLOR=#0000FF>整理日期：</FONT>" & FormatDateTime(rs_Down("Bs_UpDateTime"),2) & "&nbsp;&nbsp;"
			lb=lb & "<FONT COLOR=#0000FF>文件大小：</FONT>" & rs_Down("Bs_FileSize") & "</td>"
			lb=lb & "<td height=22 bgColor=#ffffff>"
			lb=lb & "<table width=100% border=0 cellpadding=0 cellspacing=0 bgColor=#ffffff><tr>"
			lb=lb & "<td width=40% height=22>&nbsp"
			
			lb=lb & "<a href=Bs_DownloadShow.asp?Bs_DownID=" & rs_Down("Bs_DownID") & "><FONT COLOR=#0000FF>下载页面</FONT></a>&nbsp;"
			lb=lb & "</td><td align=center>"
			lb=lb & "人气：" & rs_Down("Bs_Hits") & ""
			lb=lb & "</td></tr></table>"
			lb=lb & "</td></tr>"

			lb=lb & "<tr><td height=22 bgColor=#f5f5f5 colspan=2><FONT COLOR=#FF0000>·</FONT>"
			if rs_Down("Bs_Content")<>"" then
				strTemp=replace(rs_Down("Bs_Content"),"<br>","")
				strTemp=replace(strTemp,"<BR>","")
				strTemp=replace(strTemp,"<b>","")
				strTemp=replace(strTemp,"<","")
				strTemp=replace(strTemp,">","")
				strTemp=replace(strTemp,"&nbsp;","")
				strTemp=replace(strTemp,"　","")
				strTemp=replace(strTemp," ","")
				lb=lb&""& gotTopic(strTemp,160)&""
				else
				lb=lb&"-"
			end if
			lb=lb & "</td></tr>"

			lb=lb & "<tr><td width=60% height=22 bgColor=#ffffff colspan=2>&nbsp;"
			lb=lb & "<FONT COLOR=#0000FF>软件语言：</FONT>" & rs_Down("Bs_Language") & "&nbsp;&nbsp;"
			lb=lb & "<FONT COLOR=#0000FF>授权类型：</FONT>" & rs_Down("Bs_LicenceType") & "&nbsp;&nbsp;"
			lb=lb & "<FONT COLOR=#0000FF>运行环境：</FONT>" & rs_Down("Bs_System") & ""
			lb=lb & "</td></tr>"
			lb=lb & ""

			lb=lb & "<tr><td height=1 colspan=2 bgcolor=#CCCCCC></td>"
			lb=lb & "</tr></table><BR>"
		response.write lb
			
		rs_Down.movenext
		i=i+1
		if i>=MaxPerPage then exit do	
	loop
 end sub
%>
		    </span></td>
					</tr>
				</table>
	      </TD>
		</TR>
<!-- 下载中心 END -->
		<TR> 
			<TD> 
				<TABLE cellSpacing=0 cellPadding=0 class='MC_bottom_title'>
					<tr> 
						<td>
<%
if totalput>0 then
call showpage(strFileName,totalput,MaxPerPage,false,true,"个下载")
end if
%> 
						</td>
					</tr>
					<tr><td class='MC_bottom_Td2'></td></tr>
				</table>
			</TD>
		</TR>
		<TR><TD height=10><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	</TABLE>
			</TD>
		</TR>
		<TR> 
			<TD height="1" bgcolor="#666666"><IMG height=1 src="img/1x1_pix.gif" width=10></TD>
		</TR>
		<TR> 
			<TD height=1>  </TD>
		</TR>
		<TR> 
			<TD height=1> 
		</TD>
		</TR>
	</TABLE>    
     <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="5"></td>
        </tr>
      </table>   
        
</td>
  </tr>
</table>

<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>