<% dim key,cat,sql,chid ch=request("ch") id=request.QueryString("mid") if ch <> "" then if session("login")<>"true" then response.Redirect("login.asp?p="&request.ServerVariables("SCRIPT_NAME")) else sql="select * from tbl_biodata where username like('"&ch&"%')" end if end if cpage=request.QueryString("cpage") cpage = cint(Request("cpage")) if cpage = 0 or cpage = "" or not isnumeric(cpage) then cpage = 1 end if %>

<% if ch <> "" then %> <% end if %> | <% for i = asc("A") to asc("Z") %> <%if ch=chr(i) then%> <%=chr(i)%> |  <%else%> <%=chr(i)%> |  <%end if%> <% next %>  Note : Click on Username text to view detailed information of user. <% rs.open sql,cn,3,1 if rs.eof then %> <% else %> <% end if rs.close %>  Member names starting with <%=ch%> No Records found for <%=ch%> <% rs.pagesize=20 rs.absolutepage=cpage if cpage>0 then %> Page : <% end if if cpage <> 1 then %>   &ch=<%=ch%> class="link">Previous <% end if for i=1 to rs.pagecount if i=cpage then %> | <%=i%> |   <% else %> | &ch=<%=ch%> class="link"><%=i%> |  <% end if next if cpage &ch=<%=ch%> class="link">Next     <% end if %> <% dim p p=1 while not rs.eof and p<=20 %> <% if id=rs("username") then %> <% end if %> <% p=p+1 rs.movenext wend %> Userame  Full Name Registering Date Category Position &cpage=<%=cpage%>&ch=<%=ch%>" class="postlink"><%=rs("username")%>  <%=rs("full_name")%> <%=rs("day")%>/<%=rs("month")%>/<%=rs("year")%> <%=rs("category")%> <%=rs("pposition")%> Full Name : <%=rs("username")%> Member Since : <%=rs("day")%>/<%=rs("month")%>/<%=rs("year")%> Category : <%=rs("category")%> Position : <%=rs("pposition")%> Institution : <%=rs("institute")%> Nationality : <%=rs("nationality")%> Interests (Neurosurgical) : <%=rs("ineterest_ns")%> Interests (Other) : <%=rs("ineterest_other")%>