admin_save2.asp

来自「信达技校学生管理系统,程序编写比较有价值。」· ASP 代码 · 共 39 行

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<% 
id=request.form("id")
name=request.form("name")
links=request.form("links")
hefrom=request.form("hefrom")
heclass=request.form("heclass")
content=GetHtmlStr(request.form("content"))
jieye=request.form("jieye")
pinkun=request.form("pinkun")
if pinkun=1 then
pinkun=false
else
pinkun=true
end if
if jieye=1 then
jieye=false
else
jieye=true
end if
rs.open "infor where id="&id,conn,1,3
if name<>""and links<>""and hefrom<>""and heclass<>"" then
rs("name")=name
rs("links")=links
rs("hefrom")=hefrom
rs("class")=heclass
rs("content")=content
rs("pinkun")=pinkun
rs("jieye")=jieye
rs.update
Response.Write "<script>alert(""添加成功！！"");location.href=""admin_list.asp"";</script>"
else
Response.Write "<script>alert(""你填写的内容不完整！！"");location.href=""admin_update.asp"";</script>"
Response.end
rs.close
set conn=nothing
end if
%>