<%On Error Resume Next%>
<!--#include file="conn.asp"-->
<!--#include file="chk_logs.asp"-->
<%

id=trim(request("id"))
set rs=server.createobject("adodb.recordset")

f01=trim(request.Form("f01"))
f02=trim(request.Form("f02"))
lb=trim(request("lb"))
lx=trim(request("lx"))
f04=trim(request.Form("content"))
f05=trim(request.Form("f05"))
xtp=trim(request.Form("xtp"))
sql="select * from xinwen where id="&id&""
rs.open sql,conn,1,2
if not rs.eof then
if f01<>"" then rs("f01")=f01
rs("f02")=f02
if f04<>"" then rs("f04")=f04
if lx<>"" then rs("lx")=lx
rs("f05")=f05
rs("xtp")=xtp
if xtp<>"" then rs("xtp")=xtp
rs("lb")=lb
end if
rs.update
rs.close
response.Redirect "xinwen.asp?lb="&lb
%>
