tgrevise1.asp

大家好

<%@ LANGUAGE="VBSCRIPT"%>
<!-- #include file="../ADOVBS.INc" -->
<%
fenlei=request("fenlei")
biaoti=request("biaoti")
fbiaoti=request("fbiaoti")
bm=request("bm")
mail=request("mail")
fenlei=request("fenlei")
text1=request("text1")
xm=request("xm")
dianhua=request("dianhua")
dizhi=request("dizhi")
youbian=request("youbian")

if text1="  "  then
	response.write "请您填写文章内容！"
	response.end
end if

set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString") 
set rs=server.createobject("adodb.recordset")
rs.LockType=adLockOptimistic
sqlstr="select * from loveshenghuo where id='"&request("id")&"'"
rs.open sqlstr,conn

if request("submit2")<> "" then
	rs.delete
else
rs("biaoti")=biaoti
rs("fbiaoti")=fbiaoti
rs("bm")=bm
rs("mail")=mail
rs("fenlei")=fenlei
rs("text")=text1
rs("xm")=xm
rs("dianhua")=dianhua
rs("dizhi")=dizhi
rs("youbian")=youbian


rs.update
end if
set conn=nothing
response.write "OK!"

'response.end
%>
<script language=javascript>
<!--
	for(i=0;i<10000;i++);
	window.location.href="../adm/manager.asp?id=0"
//-->
</script>
<%
response.end
%>