修改會員資料

<% if (Request("pass1")<>Request("pass2") or Request("pass1")=Empty ) then Response.Write "密碼錯誤，請重新確認！" else SQL_Statement = "select * from member where mid=" & Session("mid") RS.Open SQL_Statement,DBC,2,2 RS(1)=Request("m_name") RS(2)=Left(Request("Hsi_code"),3) RS(3)=Request("address") RS(4)=Request("phone") RS(5)=Request("email") RS(6)=Request("pass1") RS.Update if DBError=0 then Response.Write "

" & RS(1) & " 資料修改完成" end if Rs.Close end if %>