<% dim id,classid,test,title id=request.querystring("id") classid=request("classid") if id="" or IsNumeric(id) = False then Response.write "ID错误！" Response.write "" Response.end end if if classid="" or IsNumeric(classid) = False then Response.write "ID错误！" Response.write "" Response.end end if test=request.form("test") title=request.form("title") set rs=server.createobject("adodb.recordset") sql="select * from sms Where id="&id rs.open sql,conn,1,3 rs("test")=test rs("YD_date")=now() rs("title")=title rs.update rs.close set rs=nothing response.write "文章编辑成功!" %>
----------
[返回文章]
[文章分类]
[后台管理]