savedepartinfo.asp

来自「功能不是很全面,需要自己修改和添加.尊重作者版权,希望大家相互学习,提出意见和建」· ASP 代码 · 共 17 行

<!-- #include file="conn.asp" --> 
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from XzDepart where ID="&request.Form("id"),conn,1,3
rs("DepartTypeName")=trim(request("XzDepartType"))
rs("XzName")=trim(request("XzName"))
rs("XzJianJie")=trim(request("XzJianjie"))
rs("XzJoin")=trim(request("XzJoin"))
rs("XzAdd")=trim(request("XzAdd"))
rs("XzTel")=trim(request("XzTel"))
rs.Update
response.Write "<script>alert('修改成功！');this.location.href='admin_DepartInfo.asp';</script>"
response.End
rs.Close
set rs=nothing
%>