<%On Error Resume Next%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css">
<link href="css.css" rel="stylesheet" type="text/css">
<!--#include file="conn.asp"-->
<!--#include file="chk_logs.asp"-->
<%
set rs=server.createobject("adodb.recordset")
f01=trim(request.Form("f01"))
f02=trim(request.Form("f02"))
lb=trim(request.Form("lb"))
lx=trim(request.Form("lx"))
f04=trim(request.Form("content"))
f05=trim(request.Form("f05"))
xtp=trim(request.Form("xtp"))
sql="select * from xinwen"
rs.open sql,conn,1,2
rs.addnew
if f01<>"" then rs("f01")=f01
if f02<>"" then rs("f02")=f02
if lb<>"" then rs("lb")=lb
if lx<>"" then rs("lx")=lx
if f04<>"" then rs("f04")=f04
if f05<>"" then rs("f05")=f05
if xtp<>"" then rs("xtp")=xtp
rs("ss")=1
rs.update
id=rs("id")
'response.Write lb
'response.end
if rs("xtp")<>"" then
response.Redirect "chicun1.asp"&"?id="&id&"&lb="&lb
else
response.Redirect "xinwen.asp?lb="&lb
end if
rs.close
%>
