<% Dim seq Dim page Dim code Dim errTrap seq = Request("seq") page = Request("page") code = Request("code") sp = Request("sp") key = Request("key") if code <> "EMN" then code = "EMN" elseif code = "" or isNull(code) then code = "EMN" end if %> <% Dim entity 'BoardEntity ÀνºÅϽº Dim bm 'BoardManager ÀνºÅϽº Set entity = New BoardEntity Set bm = New BoardManager bm.setConnectionString = connectionString entity.code = code entity.seq = seq errTrap = bm.view(entity) Dim goReply '´ä±Û¾²±â ¹öÆ° Dim goModify '¼öÁ¤ ¹öÆ° Dim goDelete '»èÁ¦¹öÆ° Dim goList '¸ñ·Ï¹öÆ° '/*----------------------------------------------------------- '¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú¡Ú '¸ñ·Ï ¹öÆ° goList = "" '-------------------------------------------------------------*/ if errTrap = True then if len(trim(entity.title)) <= 0 then entity.title = "[Á¦¸ñ¾øÀ½]" end if %> ::: Welcome to Presskorea :::
 
Home > Media News  
 
Title   <%= entity.title %>
No   <%= entity.seq %> Date   <%= left(entity.write_date,10) %> Hit   <%= entity.read_count %>
<% if entity.html then Response.write entity.content else Response.write Replace(entity.content,chr(13) & chr(10),"
") end if %>
<%= goList %>
 
 
<% else '¿¡·¯ ó¸® response.write errTrap '¼­¹öÂÊ¿¡¼­ ¸®´ÙÀÌ·ºÆ®¸¦ ÇÏÁö ¾ÊÀ½ end if Set entity = Nothing Set bm = Nothing %>