<%
sql = "SELECT * FROM com_webzine WHERE wz_vol like '2005%' and wz_del<>'Y' "
sql = sql&" order by wz_vol desc "
Set rs = Server.CreateObject("ADODB.recordset")
rs.open sql,conn,1
i=1
While (Not rs.eof)
wz_vol=rs("wz_vol")
wz_vol_temp=Right(wz_vol,2)
if wz_vol_temp="01" then wz_vol_temp="First Week"
if wz_vol_temp="02" then wz_vol_temp="Second Week"
if wz_vol_temp="03" then wz_vol_temp="Third Week"
if wz_vol_temp="04" then wz_vol_temp="Fourth Week"
if wz_vol_temp="05" then wz_vol_temp="Fifth Week"
wz_vol=Left(wz_vol,4)&"³â"&Mid(wz_vol,5,2)&"¿ù "&wz_vol_temp
if CLng(rs("wz_idx"))=CLng(request("wz_idx")) then
color_temp="white"
else
color_temp="#EFEEBC"
end if
%>