Home > Q & A
   
   
  <% dim sq1, storyid, pg, finder1, finder2, content, ref, rd, job %> <% pg = request("pg") ref = request("ref") storyid = cint(request("storyid")) finder1 = request("finder1") finder2 = request("finder2") job = request("job") call db_conn() '***Á¶È¸¼ö ¿Ã¸®±â*** sq1 = "update tb_board set viewcount = viewcount + 1 where storyid="&storyid dbconn.Execute(sq1) '******³¡****** call rs_conn() sq1 = "select * from tb_board where view_yn = 1 and ref="&ref rs.Open sq1, dbconn, 1 %> <%do until rs.eof if storyid = rs("storyid") then if rs("content") <> "" or not isnull(rs("content")) then content = replace(rs("content"),chr(10),"
") content = replace(content," "," ") end if %>
ÀÛ¼ºÀÚ <%=rs("username") %> ÀÛ¼ºÀÏ <%=rs("regdate")%>
E-Mail "><%=rs("email") %> Á¶È¸¼ö <%=rs("viewcount")%>
Á¦ ¸ñ <%=rs("subject")%>

<%=content%>


ºñ¹Ð¹øÈ£  value="<%=rs("password")%>"<%end if%>>
"> "> "> ">
<% end if rs.movenext loop rs.movefirst %> <%if not rs.EOF then dim i, counter i = rs.recordcount 'i : ·çÇÁ¹® »ó¼ö 'counter : °Ô½Ã¹° ¹øÈ£¸Þ±è do until rs.eof%> <%i = counter - 1 rs.MoveNext loop end if %>
°ü·Ã±Û
¹ø È£ ÀÛ¼ºÀÚ Á¦ ¸ñ ÀÛ¼ºÀÏ Á¶È¸¼ö
<%counter = i%> <%= counter %> <%= rs("username") %> <%if rs("re_level") > 0 then%> " height=10> <% end if %> &pg=<%=pg%>&finder1=<%=finder1%>&finder2=<%=finder2%>&ref=<%=rs("ref")%>&job=<%=job%>"><%= rs("subject") %> <%= left(rs("regdate"),10) %> <%= rs("viewcount") %>
&finder1=<%=finder1%>&finder2=<%=finder2%>&job=<%=job%>">               
<% Call rs_close() Call db_close() %>