" />
Download Adobe Flash Player.
<%If eb_logoimg <> "" then%>
<%End if%>
<% R_Fields_code = "eb_subject, eb_pk" SQL = "Select "&R_Fields_code&" FROM ebook WHERE eb_chk = 'Y' ORDER BY eb_code ASC" Set Rs = Dbcon.Execute (SQL) Do While Not rs.eof eb_pk_str = rs("eb_pk") eb_subject = rs("eb_subject") %>
><%=eb_subject%>
<% rs.movenext Loop rs.close : Set rs = Nothing Dbcon.close : Set Dbcon = nothing %>
P
1
<%If eb_size = "max" then%> <%End if%>