<%
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
