admin_edit_save.asp

来自「新的简单易用的公司管理系统」· ASP 代码 · 共 44 行

<!--#include file=conn.asp-->
<!--#include file=admin_chkpass.asp-->
<!--#include file=inc/function.asp-->
<%
dim id
id=request("n_id")
If not isnumeric(id) then
response.write"<script>alert('"&ewap_(32)&"');window.document.location.href='admin_index.asp'</script>"
response.end
end if
If request("n_title")="" OR request("n_detail")="" then
response.write"<script>alert('"&ewap_(33)&"');window.document.location.href='admin_index.asp'</script>"
response.end
end if
If request("class")="" then
response.write"<script>alert('"&ewap_(34)&"');window.document.location.href='admin_index.asp'</script>"
response.end
end if
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select ntitle,ndetail,ntime,nclass from news where nid="&id
rs.open sql,cn,3,3
rs("ntitle")=HTMLEncode(request("n_title"))
rs("ndetail")=HTMLEncode(request("n_detail"))
rs("ntime")=now()
rs("nclass")=request("class")
rs.update

%>
<%
If err then

response.write"<script>alert('"&ewap_(34)&"');window.document.location.href='admin_index.asp'</script>"

else
response.write"<script>alert('"&ewap_(30)&"');window.document.location.href='admin_index.asp'</script>"
end if
rs.close
set rs=nothing
cn.close


%>