save_hack.asp

伴江行房产易系统 v2.10资源介绍: 提供包括新房、二手房、租赁房、别墅、写字楼、商铺、家居、装修装饰、购房指南、中介联盟等房地产网络解决方案

<!--#include file=../include/config.asp-->
<!--#include file=../include/conn_view.asp-->
<%
        dim rs,sql,pb,house_ms,bh

        bh=replace(now(),left(now(),2),"")
	bh=replace(bh,"-","")
	bh=replace(bh,":","")
	bh=replace(bh," ","")
        bh="cz" & bh
	
        pb=request("pb")
	pb=replace(pb," ","&nbsp;")
        pb=replace(pb,chr(13)&chr(10),"<Br>")

        house_ms=request("house_ms")
	house_ms=replace(house_ms," ","&nbsp;")
        house_ms=replace(house_ms,chr(13)&chr(10),"<Br>")
	

	sql="select * from [house_hack]"
	set rs=server.createobject("adodb.recordset")
        rs.open sql,conn,3,3
        rs.addnew
        
        rs("bh")=bh
        rs("house_name")=request("house_name")

  if trim(request("address"))="" then
     rs("address")="未知"
  else
     rs("address")=request("address")
  end if

     rs("qy")=request("qy")

  if request("wylx")="" then
     rs("wylx")="未知"
  else
     rs("wylx")=request("wylx")
  end if

  if trim(request("sy_area"))="" then
     rs("sy_area")="未知"
  else
     rs("sy_area")=request("sy_area")
  end if
        
  if trim(request("jg_time"))="" then
     rs("jg_time")="未知"
  else
     rs("jg_time")=request("jg_time")
  end if

  if trim(request("bus"))="" then
     rs("bus")="未知"
  else
     rs("bus")=request("bus")
  end if
  if request("zxcd")="" then
     rs("zxcd")="未知"
  else
     rs("zxcd")=request("zxcd")
  end if

        rs("hx")=request("hx")
        rs("jz_area")=request("jz_area")
        rs("jg")=request("jg")

        rs("sum_floor")=request("sum_floor")
        rs("pay")=request("pay")
        rs("do_floor")=request("do_floor")
        rs("pb")=pb
        rs("man")=request("man")
        rs("tel")=request("tel")

        rs("email")=request("email")
        rs("house_ms")=house_ms
        rs("date")=now()
if session("user_name")="xiao" then
   rs("pass")="否"
else
   rs("pass")="是"
end if
        rs("zj")=request("zj")

 if session("adminlogin") = "ok" then
        rs("user_id")=session("user_id")
 end if

 if session("zjlogin") = "ok" then
        rs("zj_id")=session("zj_id")
 end if

        rs.update

%>

<!--#include file=../include/foot.asp-->
<SCRIPT LANGUAGE=vbscript>
<!--
msgbox("您所发布的信息已成功提交!")
window.top.location.href="../../dj_hack.asp"
-->
</SCRIPT>