<%@LANGUAGE="VBSCRIPT"%> <%option explicit%> <% Dim rsGetAboutUs,strAboutUs,strSQL set rsGetAboutUs=Server.CreateObject("ADODB.recordset") strSQL="Select au_team from tblAboutUs where au_id=1" rsGetAboutUs.open strSQL,objConn,3,3 If not rsGetAboutUs.eof then strAboutUs=rsGetAboutUs("au_team") Else strAboutUs="Coming Soon...." End If rsGetAboutUs.close %> FEROZE'S Real Estate Advisory :: About Us : Team
   
  HOME SWEET HOME   CORPORATE OFFICES SPACE   LOVE @ FIRST SITE  
 
Background Profile  
 
<%=strAboutUs%>
 
Management Team
<% Dim rsGetMember Set rsGetMember=Server.CreateObject("ADODB.RecordSet") strSQL="SELECT * FROM tblMembers" rsGetMember.Open strSQL,objConn,3,3 while not rsGetMember.EOF %>
<%If rsGetMember("mem_id")<>"" Then%>
  <%=Replace(Trim(rsGetMember("mem_name")),"`","'")%>
<%End If rsGetMember.MoveNext %>
  <%If Not rsGetMember.EOF Then %>
  <%=Replace(Trim(rsGetMember("mem_name")),"`","'")%>
     
<% rsGetMember.MoveNext End If%>
<% wend %>