<% if (request("txtID") <> empty) then set cn = server.CreateObject("ADODB.Connection") cn.open "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("xypex.mdb") id=request("txtID") pwd=request("txtPwd1") tel1=request("txtT1") & "-" & request("txtTel") & "#" & request("ext") tel2=request("txtT2") & "-" & request("txtTel2") cell=request("txtCell") addr=request("txtAddr") job=request("txtJob") email=request("txtEmail") names=request("txtName") nick=request("txtNick") zip=request("zip") rev=request("txtR") set rs = server.CreateObject("ADODB.Recordset") str="select * from members where uid='" & id &"'" rs.open str,cn,3,3 if (rs.recordcount>=1) then msg="err" else rs.addnew rs("uid")=id rs("pwd")=pwd rs("name")=names rs("tel")=tel1 rs("tel1")=tel2 rs("cell")=cell rs("addr")=addr rs("email")=email rs("units")=job rs("zip")=zip rs("nick")=nick rs("rev")=rev rs.update response.Redirect("index.htm") end if end if %> 馳發實業有限公司

  說明      應用範圍      產品簡介     工程實績      討論區      下載區      相關連結   回首頁
 
設為首頁 加入最愛 會員註冊  

 *為必填欄位
*帳號
*密碼
重覆密碼
*姓名">
暱稱"> 討論區用
電話 (公) ">-"> 分機 ">
*電話 (家) ">- ">
手機">
*Email">
*住址"> 郵碼 ">
索取型錄 是  
服務單位">
 
Copyright (C) 2007 All Rights Reserved             回到首頁   網站導覽 加入會員 關於我們