<% code=Trim(request("code")) If code="" Then code="ebs_headline" End If NID=request("NID") %> <% if NID <> "" then SQL = "SELECT * FROM "&code&" where NID=" & NID & "order by NID desc" else SQL = "SELECT top 1 * FROM "&code&" ORDER BY NID DESC" end if Set rs3 = Server.CreateObject("ADODB.Recordset") rs3.Open Sql, dbConnect, 1 savedir = "http://timescampus.co.kr/admin_managent/admin_managent/newsbord/" & code & "_files" src=savedir&"/"&rs3("MUS") cotrol="http://timescampus.co.kr/admin_managent/admin_managent/newsbord/" & code & "_files" cotrol2=cotrol&"/"&rs3("MUS") NID=rs3("NID") REG_DATE=rs3("REG_DATE") ECOMP = trim(rs3("ECOMP")) if ECOMP<>"" then BCOMP =split(ECOMP,".") CCOMP =BCOMP(0)&".lcm" DCOMP =BCOMP(0)&".exm" end if REF =rs3("REF") SQL2 = "update "&code&" set REF='"&REF+1&"' where NID='"&NID&"'" Set rs4 = Server.CreateObject("ADODB.Recordset") rs4.Open SQL2, dbConnect, 1 %> Untitled Document
 
   
     
 
<%=rs3("TITLE")%> <% temp=split(REG_DATE,"-") %>    [<%=temp(2)%>-<%=temp(1)%>-<%=temp(0)%>]
<%=rs3("CONTENT")%>
 
  출처: 청소년 영자신문 틴타임즈 (www.teentimes.org)