savedata.asp

本房地产网站功能强大

<%
function douhao(kkk)
douhao="'" & replace(kkk,"'","''") & "'"
end function

loginid=session("loginid")
%>
<%
'┌─  风云ASP在线  ────────────────────────┐
'│                                                                 │
'│  作者：赵振波.	http://www.fyasp.com	    				    │
'│                                                                 │
'│   Q Q：176189168  										   	    │
'│                                                                 │
'│ Email：[e-mail]                                             │
'│                                                                 │
'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│
'│                                                                 │
'│                                                                 │
'└───────────────────  http://www.fyasp.com ──┘
%>
<!--#include file="../inc/conn.asp"-->
<%dim userid,pwd,repwd,name,company,country,province,address,pcode,phone,hphone
dim email,weburl,info,jperson,emp,income,bank,account,fax
opendataconn
set rs=conn.execute("select * from  company where userid='"&loginid&"'")
if rs.eof  then%>
<script language="JavaScript">
alert("对不起!找不到此用户代码!　　")
history.back()
</script>
<%else
name1=douhao(trim(request("name")))
phone=douhao(trim(request("phone")))
email=douhao(trim(request("email")))
question=douhao(trim(request("question")))
answer=douhao(trim(request("answer")))
company=douhao(trim(request("company")))
address=douhao(trim(request("address")))
zip=douhao(trim(request("zip")))
info=trim(request("info"))
info=douhao(replace(info,vbcrlf,"<br>"))
reg_type=douhao(trim(request("reg_type")))

sqlstr="update company set name="&name1&",phone="&phone&",email="&email&",question="&question&",answer="&answer&",company="&company&",address="&address&",zip="&zip&",info="&info&",reg_type="&reg_type&",zj='1' where userid='"&loginid&"'"
conn.execute sqlstr
response.redirect "myoffer.asp"
set rs=nothing
end if
conn.close
set conn=nothing%>