<%'@LANGUAGE="VBSCRIPT"%>
[an error occurred while processing this directive]
[an error occurred while processing this directive]
<%
set rsEditorLinks = Server.CreateObject("ADODB.Recordset")
rsEditorLinks.ActiveConnection = MM_connEditorLinks_STRING
rsEditorLinks.Source = "SELECT DocumentID, Status, Title, Sorting FROM Documents WHERE Status = 'Active' AND Title <> 'Home Page' ORDER BY Sorting ASC, Title ASC"
rsEditorLinks.CursorType = 0
rsEditorLinks.CursorLocation = 2
rsEditorLinks.LockType = 3
rsEditorLinks.Open()
rsEditorLinks_numRows = 0
%>
<%
Dim Repeat4__numRows
Repeat4__numRows = -1
Dim Repeat4__index
Repeat4__index = 0
rsEditorLinks_numRows = rsEditorLinks_numRows + Repeat4__numRows
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters
' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "="
MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone=""
' add the URL parameters to the MM_keepURL string
For Each Item In Request.QueryString
NextItem = "&" & Item & "="
If (InStr(1,MM_removeList,NextItem,1) = 0) Then
MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item))
End If
Next
' add the Form variables to the MM_keepForm string
For Each Item In Request.Form
NextItem = "&" & Item & "="
If (InStr(1,MM_removeList,NextItem,1) = 0) Then
MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item))
End If
Next
' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1)
if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)
' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
If (firstItem <> "") Then
MM_joinChar = "&"
Else
MM_joinChar = ""
End If
End Function
%>
|
|
<% If VarMLSListing = "True" Then %>
<% End If %>
<% If VarEnableListing = "True" Then %>
<% End If %>
<% If VarShowEvents ="True" Then %>
<% End If %>
<% If VarShowBios ="True" Then %>
<% End If %>
<% If VarShowEditableLinks = "True" Then %>
<% If Not rsEditorLinks.EOF Or Not rsEditorLinks.BOF Then %>
<%
While ((Repeat4__numRows <> 0) AND (NOT rsEditorLinks.EOF))
%>
|
|
">"><%=(rsEditorLinks.Fields.Item("Title").Value)%> |
<%
Repeat4__index=Repeat4__index+1
Repeat4__numRows=Repeat4__numRows-1
rsEditorLinks.MoveNext()
Wend
%>
<% End If ' end Not rsEditorLinks.EOF Or NOT rsEditorLinks.BOF %>
<% End If %>
| |
Accredited
Buyers Representative |
Real
Estate Buyer's Agent Council |
|
| |
<%
rsEditorLinks.Close()
%>
|
Search
for Properties
Metro
Atlanta Homes (including North Georgia) -
Metro
Atlanta has two separate multiple listing systems, which contain
homes for sale (First Multiple Listing Service – FMLS, and Georgia
Metro Listing Service – MLS). Some Atlanta real estate companies
belong to one or the other. Hober Realty is a member of both. It’s
the only way to ensure we can give our clients the ‘complete’ information
on the Atlanta real estate market. Below are the links to each of
these database systems. If you don’t find what you are looking for
in one, try the other.
 |
Search
for the house of your dreams from thousands of available listings
in your area: Local
Sites -
• Search
MLS
• Search FMLS
National Sites -
• Realtor.com -
This unique full service real estate site is designed to make
it easier for home shoppers to look for and buy a home anywhere
across the country. It’s the official Internet site of the
National Association of REALTORS®.
|
| Do
you need additional information? Please complete the following
form for a prompt response |
|
| |
|
