<%
SET rs = Server.CreateObject("ADODB.Recordset")
sql="select count(*) As NClassID from NClass"
'set rs = conn.execute(sql)
rs.Open (sql),conn,1,1
TotalNClass = rs("NClassid")
rs.close
sql="select count(*) As SpecialID from Special"
'set rs = conn.execute(sql)
rs.Open (sql),conn,1,1
TotalSpecial = rs("Specialid")
rs.close
sql="select count(*) As MusiclistID from Musiclist"
'set rs = conn.execute(sql)
rs.Open (sql),conn,1,1
TotalMusiclist = rs("Musiclistid")
rs.close
sql="select count(*) As ID from myuser"
'set rs = conn.execute(sql)
rs.Open (sql),conn,1,1
Totalmyuser = rs("id")
rs.close
rs.Open ("select sum(hits) from Musiclist"),conn,1,1
all_count=rs(0)
rs.Close
conn.Close
set rs=nothing
set conn=nothing
n=Year(date())
y=Month(date())
r=Day(date())
%>
共有歌手:<b><%=TotalNClass%></b>位  
共有专辑:<b><%=TotalSpecial%></b>张  
共有歌曲:<b><%=TotalMusiclist%></b>首  
共有会员:<b><%=Totalmyuser%></b>位  
累计点播数:<font color='#FF00FF'><%=all_count%></font>次