save_area.asp

一个关于房产的asp程序

<!--#include file=../include/config.asp-->
<!--#include file=../include/access.asp-->
<!--#include file=../include/function.asp-->
<!--#include file=../include/conn_view.asp-->

<%
        dim rs,sql,area_name
	area_name=replace(trim(request("area_name")),"'","")
	

	sql="select * from [area]"
	set rs=server.createobject("adodb.recordset")
    rs.open sql,conn,3,3
	    rs.addnew
        rs("area_name")=area_name
        rs.update
		response.write "添加成功！"
		response.redirect "view_area.asp"
%>