<%@LANGUAGE="VBSCRIPT"%>
<%
Dim agents__MMColParam
agents__MMColParam = "1"
if (Request.QueryString("AgentID") <> "") then agents__MMColParam = Request.QueryString("AgentID")
%>
<%
set agents = Server.CreateObject("ADODB.Recordset")
agents.ActiveConnection = MM_conRemax_STRING
agents.Source = "SELECT * FROM agents WHERE AgentID = " + Replace(agents__MMColParam, "'", "''") + ""
agents.CursorType = 0
agents.CursorLocation = 2
agents.LockType = 3
agents.Open()
agents_numRows = 0
%>
Remax-ab realty- stratfordhomes.ca
<%
agents.Close()
%>
