<!--#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-->