<% if request.Form("formsub") = "strval" then adors1.open "Select * from beamemberTbl where Memail='"& request.Form("txtEmail") &"'", adoCon,2,3 if adors1.eof then adors1.addnew adors1("Mname") = request.Form("txtFName") adors1("Mic") = request.Form("txtICNo") adors1("Mdob") = request.Form("txtDOB") adors1("MhseAdd") = request.Form("txtHMadd") if request.Form("txtHMpcode")<>"" then adors1("MhsePostcode") = request.Form("txtHMpcode") end if adors1("MoffAdd") = request.Form("txtOFadd") if request.Form("txtOFpcode")<>"" then adors1("MoffPostcode") = request.Form("txtOFpcode") end if adors1("Mphonenum") = request.Form("txtPNum") adors1("Mfaxnum") = request.Form("txtFNum") adors1("Mmobile") = request.Form("txtMNum") adors1("Moccupation") = request.Form("txtOccu") adors1("Memail") = request.Form("txtEmail") adors1.update response.Redirect("beamember.asp?msg=1") else response.Redirect("beamember.asp?msg=0") end if adors1.close end if %>
 
 
HOME DONATE NEWS & EVENTS CAREERS  
THE FOUNDATION WHAT WE DO? THE TEAM RESEARCH & DEVELOPMENT CONTACT US
BE A MEMBER <%if request.QueryString("msg")="1" then response.Write("Registration successful.") elseif request.QueryString("msg")="0" then response.Write("E-mail address already exits.") end if%>
Membership Form
Full Name * Fax Number
IC No. * Mobile
Date of Birth * Occupation
House Address E-mail *
Postal Code
i)
I understand the mission, vision and the values of the YPPPTM.
ii)
I promise to give my support and co-operation for all the activities of YPPPTM.
iii)
The information given above is correct and true to the best of my knowledge.
Office Address
Postal Code
Phone Number  
* Compulsory fields