count.asp

gmaple软件下载系统1.0Beta 具有一下功能: 1.模板功能,前台的呈现更加灵活. 2.支持静态生成,可在动态与静态间随时切换. 3.在静态模式下,可自定义生成目录,生成方式灵活.

<!--#include file="Config.asp"-->
<%
if request.QueryString.Count then
	Count_type = request.QueryString("Count_type")
	if Count_type="Soft_Counts" then
		set rst=conn.execute("select Count(*) as SD_Soft_Count_All from [Soft] where SD_Soft_Del=1")
		Soft_Count_All=rst("SD_Soft_Count_All")
		rst.close
		set rst=conn.execute("select Sum(SD_Soft_Times) from [Soft] where SD_Soft_Del=1")
		Soft_Count_Sum=rst(0)
		rst.close
		response.Write "document.write("""&Soft_Count_All&""")"
	elseif Count_type="Soft_Downs" then
		set rst=conn.execute("select Sum(SD_Soft_Times) from [Soft] where SD_Soft_Del=1")
		Soft_Count_Sum=rst(0)
		rst.close
		response.Write "document.write("""&Soft_Count_Sum&""")"
	elseif Count_type="Soft_Sizes" then
		SD_Soft_Size_All=0
		sql="select SD_Soft_Size from [Soft] where SD_Soft_Del=1"
		rst.open sql,conn,1,1
		if not rst.eof then
			while not rst.eof
				Select Case right(rst("SD_Soft_Size"),1)
					Case "K":SD_Soft_Size = CDbl(left(rst("SD_Soft_Size"),len(rst("SD_Soft_Size"))-1))
					Case "M":SD_Soft_Size = CDbl(left(rst("SD_Soft_Size"),len(rst("SD_Soft_Size"))-1))*1024
					Case "G":SD_Soft_Size = CDbl(left(rst("SD_Soft_Size"),len(rst("SD_Soft_Size"))-1))*1024*1024
				End Select
				SD_Soft_Size_All = CDbl(SD_Soft_Size_All) + SD_Soft_Size
			rst.movenext
			wend
		end if
		rst.close
		SD_Soft_Size_All=SD_Soft_Size_All/1024
		response.Write "document.write("""&Round(CDbl(SD_Soft_Size_All),2)&"M"")"
	end if
end if
%>