<% idx = request("idx") page = request("page") category = int(request("category")) comm = request("comm") if category = "" or NOT ctype(category) = 4 then errorbox("카테고리가 잘못되었습니다") end if set rs = Server.CreateObject ("ADODB.recordset") sql = "select * from board where idx = "&idx rs.Open sql, conn, 3, 3 wdate = formatdatetime(rs("wdate"),2) userid = rs("userid") fileurl = rs("fileurl") filename = rs("filename") filesize = rs("filesize") name = rs("name") email = rs("email") homepage = rs("homepage") title = rs("title") content = rs("content") rs.Fields ("hit") = rs("hit") + 1 rs.update rs.close set rs = nothing %>

<% if NOT isNull(fileurl) then %> <%end if%>

<%=wdate%> 일자 <%=cname(category)%>
작성자	<%=name%> <% if len(email) > 0 then %> <%end if%> <% if len(homepage) > 0 then %> <%end if%>
글제목	<%=title%>
첨부파일	board2\data\<%=filename%>"><%=filename%> (<%=filesize%> bytes)
글본문	<% content=replace(content,chr(13)&chr(10)," ") Response.Write (content) %>