Ȩ > ¸Á°¡ÅõÇ¥
<% sql = "exec poll_in_top" set rs = server.createobject("adodb.recordset") rs.open sql,db ident = rs("ident") srv_subj = rs("srv_subj") ex1 = rs("srv_ex1") ex2 = rs("srv_ex2") ex3 = rs("srv_ex3") ex4 = rs("srv_ex4") ex5 = rs("srv_ex5") rs.close set rs = nothing poll_id = session.sessionID sql = "select vote_id from poll_out where vote_id='"& poll_id &"' and srv_ident='"& ident &"'" set rs = server.createobject("adodb.recordset") rs.open sql,db,1 if rs.eof or rs.bof then java = "vote_submit("& ident &",'1')" else java = "vote_nowview('"& ident &"','1')" end if rs.close set rs = nothing %>
  <%=srv_subj%>
  <% if ex5 <> "" then%> <% end if%>
<%=ex1%>
<%=ex2%>
<%=ex3%>
<%=ex4%>
<%=ex5%>
<% sql = "select top 1 idx,content,manga_idx,manga_name,manga_img from live_poll " sql = sql & " where adult=1 order by idx desc" set rs = server.createobject("adodb.recordset") rs.open sql,db idx = rs("idx") content = rs("content") manga_idx = rs("manga_idx") if manga_idx <> "" then manga_idx = split(manga_idx,"#") end if manga_name = rs("manga_name") manga_name = split(manga_name,"#") manga_img = rs("manga_img") manga_img = split(manga_img,"#") sql = "select middleimage from comic where name like '%"& manga_name(0) &"%'" set rs = db.Execute(SQL) if rs.eof or rs.bof then if adult = "0" then middleimage = "upfile/view.jpg" else middleimage = "upfile/view1.jpg" end if else middleimage = "../img/comic/" & rs("middleimage") end if rs.close set rs = nothing %>
<%=replace(content,chr(13),"
")%>
 
<% sql = "select top 1 idx,content,manga_idx,manga_img from manga_share " sql = sql & " where adult=1 order by idx desc" set rs = server.createobject("adodb.recordset") rs.open sql,db idx = rs("idx") content = rs("content") manga_idx = rs("manga_idx") manga_img = rs("manga_img") %>
<%=replace(content,chr(13),"
")%>