<!--#include file = admin_chk.asp -->
<!--#include file = admin_conn.asp -->
<%
if request("lm")<>"" then
  id=request("id")
  lm=trim(request("lm"))
  fontcolor=trim(request("fontcolor"))
  pic=trim(request("pic"))
  sql = "select * from lm where id="&id
  Set rs = Server.CreateObject("ADODB.RecordSet")
  rs.Open sql,conn,1,3
  if trim(rs("lm3"))<>"" then 
  	rs("lm3")=lm
  elseif trim(rs("lm2"))<>"" then
    rs("lm2")=lm
  elseif trim(rs("lm"))<>"" then 
    rs("lm")=lm
  end if
  if fontcolor<>"" then
	  rs("fontcolor")=fontcolor
  end if
  rs("pic")=pic
  rs.update
  rs.close
  set rs=nothing

  
end if

conn.close
set conn=nothing
Response.Redirect "admin_news_lm.asp"
%>