savearea.asp

来自「一个非常好的旅游网站程序.」· ASP 代码 · 共 16 行

<!--#include file="conn.asp"-->
<% if request("area")=""then
response.write("<script language=""JavaScript"">alert(""请填写完整信息！"");history.go(-1)</script>")
response.end
end if %>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From area",conn,1,3
if request("id")<>"" then
rs.update
else 
rs.addnew
end if
rs("area")=request("area")
rs.update
response.redirect "admin_addarea.asp"%>