<!-- #include file="include/con_music.asp" -->
<!-- #include file="include/jk_review.asp" -->
<%
tit_fir="音乐频道"
tit="专辑列表"
n_id=trim(request.querystring("n_id")) 
if not(isnumeric(n_id)) then
end if
dim singerword,name
call c_s_nid()
call web_head(0,0,0,0,0)
call music_load()
%>
<TABLE width=777 border=0 align="center" cellPadding=0 cellSpacing=0 
background="image/music/j7.gif">
  <TBODY>
    <TR> 
      <TD width=58 height=38><IMG height=38 
      src="image/music/j8.gif" width=107 border=0> 
      <TD vAlign=center align=middle width=672> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD vAlign=center align=middle width="100%"> 
                <%
			  call music_head()
			  %>
              </td>
            </tr>
          </TBODY>
        </TABLE>
      <TD width=10 height=38> <P align=right><IMG height=38 src="image/music/j9.gif" 
      width=6 border=0></P></TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=777 align=center border=0>
  <TBODY>
    <TR> 
      <TD width=176 vAlign=top bgcolor="#eef7fd"> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD> </TD>
            </TR>
            <TR> 
              <TD bgColor=#eef7fd><IMG height=52 
            src=image/music/left02.jpg width=176 
            border=0> <TABLE  cellSpacing=4 cellPadding=0 width="86%" 
            align=center bgColor=EEF7FD border=0>
                  <TBODY>
                    <TR> 
                      <TD> 
                        <%
					  call music_sea( )
					  %>
                      </TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
            <TR> 
              <TD bgColor=#eef7fd><IMG height=52 
            src=image/music/left06.jpg width=176 
            border=0><BR> <TABLE height=134 cellSpacing=4 cellPadding=0 width="86%" 
            align=center bgColor=EEF7FD border=0>
                  <TBODY>
                    <TR> 
                      <TD height=76> <DIV align=center><IMG class=imgb height=60 
                  src="image/music/foto.gif" width=140 
                  border=0></DIV></TD>
                    </TR>
                    <TR> 
                      <TD height=46> 
                        <%
					  call music_top(10,10)
					  %>
                      </TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
            <TR> 
              <TD><IMG height=57 src="image/music/left03.jpg" 
            width=176 border=0></TD>
            </TR>
            <TR> 
              <TD> <TABLE cellSpacing=0 cellPadding=0 width=173 bgColor=#eef7fd 
            border=0>
                  <TBODY>
                    <TR> 
                      <TD> <TABLE height=117 cellSpacing=4 cellPadding=0 width="87%" 
                  align=center bgColor=EEF7FD border=0>
                          <TBODY>
                            <TR> 
                              <TD height="66" valign="top"><div align="center"><IMG class=imgb height=60 
                        src="image/music/newcd.jpg" 
                        width=140></div></TD>
                            </TR>
                            <TR> 
                              <TD> 
                                <%
					  call disk_top(10,10)
					  %>
                              </TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
          </TBODY>
        </TABLE></TD>
      <TD vAlign=top bgcolor="A0CAED"> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD bgColor=#ffffff height=5></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" bgColor=#ffffff 
        border=0>
          <TBODY>
            <tr> 
              <TD width=593><div align="right"><IMG src="image/music/m14.gif" width=593 height=37 border=0></div></TD>
            </tr>
            <TR> 
              <TD> <TABLE width="593" border=0 align="right" cellPadding=0 cellSpacing=0>
                  <TBODY>
                    <TR> 
                      <TD 
                background="image/music/middlebg02.gif" 
                height=182> 
                        <%
call musicnclass()
call disk_new2(20,12)
response.write music_bar_top("center_singer_review",1)
response.write "<tr><td>"
call  review_type("msing",n_id,"music_singer_view.asp?c_id="&c_id&"&s_id="&s_id&"&n_id="&n_id,1,login_username)
response.write "</td></tr>"
response.write music_bar_end()
'---------------------------歌手信息--------------------------
sub musicnclass()
dim temp1,singer
  set rs=conn.execute("select * from music_singer where hidden=1 and id="&n_id)
  if not rs.eof then
    singerword=rs("word")
    singerword=code_jk(singerword)
    temp1=temp1&"<tr><td width=200>"&pic_fk(rs("pic"),2,"music_singer_view.asp?c_id="&c_id&"&s_id="&s_id&"&n_id="&n_id&"")&"</td>" & _
             vbcrlf&"<td>" & _
             vbcrlf&"<table width=362 border=0 align=center cellspacing=0><tr><td width=170><table border=0 cellspacing=1 align=center cellpadding=2>" & _
             vbcrlf&"<tr><td>歌手："&rs("name")&"</td></tr>" & _
             vbcrlf&"<tr><td>性别："&rs("sex")&"</td></tr>" & _
             vbcrlf&"<tr><td>生日："&rs("bir")&"</td></tr>" & _
             vbcrlf&"<tr><td>星座："&rs("ctell")&"</td></tr>" & _
             vbcrlf&"<tr><td>添加时间："&rs("tim")&"</td></tr>" & _
             vbcrlf&"<tr><td><img src='images/music/s_singer.gif' border=0 align=absMiddle>&nbsp;<a href='music_song_list.asp?c_id="&rs("c_id")&"&s_id="&rs("s_id")&"&n_id="&rs("id")&"'>浏览"&rs("name")&"的所有歌曲</a></td></tr>" & _
             vbcrlf&"<tr><td><img src='images/music/s_singer.gif' border=0 align=absMiddle>&nbsp;<a href='music_disk_list.asp?c_id="&rs("c_id")&"&s_id="&rs("s_id")&"&n_id="&rs("id")&"'>浏览"&rs("name")&"的所有专辑</a></td></tr>" & _
             vbcrlf&"</table></td><td width=188>"&singerword&"</td></tr></table>" & _
             vbcrlf&"</td>" & _
             vbcrlf&"</tr>"
  end if
  rs.close
  response.write music_bar_top("center_singer_view",1)
  response.write temp1
  response.write music_bar_end()
end sub
   %>
                      </TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD bgColor=A0CAED 
height=5></TD>
            </TR>
          </TBODY>
        </TABLE></TD>
    </TR>
  </TBODY>
</TABLE>
<%
call web_end(0,0)
%>