Registration Verification
<% lastname = trim(Request.form("LName")) verify = trim(request("verify")) cmnt = "" if verify = "yes" then if lastname = "" and firstname = "" then cmnt = "Please specify at least the first or last name of the person you wish to verify." ' got to give as at least some of it else 'set default query string sql = "Select * from RegTbl where left(Name,"&len(lastname)&") = '" & lastname & "' order by name asc" ' search on names dbopen() set rscheck = my_conn.Execute(sql) if rscheck.eof then cmnt = "If registration is still not verified, contact the Registration Secretary " cmnt = cmnt & "timothym@icaz.org.zw
" else ' we found the member, show the info %>| <%=rscheck("Name")%> | Registration Number: Constituent Body: Category: |
<%=rscheck("RegNo")%> <%=rscheck("ConBody")%> <%=rscheck("Category")%> |
|
|
Individuals Last Name: (at least the first 4 letters of the surname are required) |
|
|
|
|
<% end if ' end of wanting to enter some details (verify = '' or cmnt>0) %>