save_user.asp

<1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>

<!--#include file=../system/include/config.asp-->
<!--#include file=../share/conn_system.asp-->
<!--#include file=../system/include/access.asp-->
<!--#include file=../system/include/function.asp-->

<%
	dim strSql,rs,bz
	
        bz=request("bz")
	bz=replace(bz," ","&nbsp;")
        bz=replace(bz,chr(13)&chr(10),"<Br>")

	if request("password")<>request("qr_password") then
%>
<SCRIPT LANGUAGE=vbscript>
<!--
msgbox("你的'密码'和'确认密码'不相符!")
Sub window_onload
window.history.back
End Sub
-->
</SCRIPT>
<%
        response.end
        end if
	set rs=Server.CreateObject("Adodb.RecordSet")
	strSql="select * from [user_zj] "
	rs.Open strSql,conn,3,3
	if rs.eof then
		out("找不到该订单！")
	else
                rs.addnew

		rs("username")=request("username")
		rs("password")=request("password")
		rs("zj_name")=request("zj_name")
		rs("zj_man")=request("zj_man")
		rs("faren")=request("faren")
		rs("email")=request("email")
		rs("tel")=request("tel")
		rs("address")=request("address")
		rs("http")=request("http")
		rs("bz")=bz
		rs("fax")=request("fax")
		rs("date")=now()
		rs("pass")="否"
		rs.update

        out("提交成功！我们的工作人员会在24小时内联系您")
        end if
	rs.close
	set rs=nothing
%>
<!--#include file=../system/include/foot.asp-->