<% '------------------------------------------------------------------------------- 'Template '------------------------------------------------------------------------------- %> <% '------------------------------------------------------------------------------- 'Config '------------------------------------------------------------------------------- Public Sub Config() Page.S = fn.dic("s") Page.Cate = "1030000" End Sub '------------------------------------------------------------------------------- 'Local Function '------------------------------------------------------------------------------- '------------------------------------------------------------------------------- 'Content '------------------------------------------------------------------------------- Public Sub RenderContent() %> <% dim seq seq = fn.dic("seq") set db = new dbclass db.sql = "SELECT * FROM Board WHERE QUnique=10702 and QIdx=" & seq & " ;" db.sql = "UPDATE Board SET QRead=QRead+1 WHERE QUnique=10702 and QIdx=" & seq & " ;" 'db.view set rs = db.execrs() set db = nothing %>
제목 <%=rs("QTitle")%>
작성자 <%=rs("MName")%> 작성일 <%=left(rs("QDate"),10)%>

<%=replace(rs("QContent"),"http://file.themavens.co.kr","")%>
">
<% End Sub %>