<%@LANGUAGE="VBSCRIPT"%> <% Dim rs82__MMColParam rs82__MMColParam = "82" If (Request("MM_EmptyValue") <> "") Then rs82__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs82 Dim rs82_numRows Set rs82 = Server.CreateObject("ADODB.Recordset") rs82.ActiveConnection = MM_conn_oakcanyon_STRING rs82.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs82__MMColParam, "'", "''") + "" rs82.CursorType = 0 rs82.CursorLocation = 2 rs82.LockType = 1 rs82.Open() rs82_numRows = 0 %> <% Dim rs84__MMColParam rs84__MMColParam = "84" If (Request("MM_EmptyValue") <> "") Then rs84__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs84 Dim rs84_numRows Set rs84 = Server.CreateObject("ADODB.Recordset") rs84.ActiveConnection = MM_conn_oakcanyon_STRING rs84.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs84__MMColParam, "'", "''") + "" rs84.CursorType = 0 rs84.CursorLocation = 2 rs84.LockType = 1 rs84.Open() rs84_numRows = 0 %> <% Dim rs85__MMColParam rs85__MMColParam = "85" If (Request("MM_EmptyValue") <> "") Then rs85__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs85 Dim rs85_numRows Set rs85 = Server.CreateObject("ADODB.Recordset") rs85.ActiveConnection = MM_conn_oakcanyon_STRING rs85.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs85__MMColParam, "'", "''") + "" rs85.CursorType = 0 rs85.CursorLocation = 2 rs85.LockType = 1 rs85.Open() rs85_numRows = 0 %> <% Dim rs86__MMColParam rs86__MMColParam = "86" If (Request("MM_EmptyValue") <> "") Then rs86__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs86 Dim rs86_numRows Set rs86 = Server.CreateObject("ADODB.Recordset") rs86.ActiveConnection = MM_conn_oakcanyon_STRING rs86.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs86__MMColParam, "'", "''") + "" rs86.CursorType = 0 rs86.CursorLocation = 2 rs86.LockType = 1 rs86.Open() rs86_numRows = 0 %> <% Dim rs87__MMColParam rs87__MMColParam = "87" If (Request("MM_EmptyValue") <> "") Then rs87__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs87 Dim rs87_numRows Set rs87 = Server.CreateObject("ADODB.Recordset") rs87.ActiveConnection = MM_conn_oakcanyon_STRING rs87.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs87__MMColParam, "'", "''") + "" rs87.CursorType = 0 rs87.CursorLocation = 2 rs87.LockType = 1 rs87.Open() rs87_numRows = 0 %> <% Dim rs88__MMColParam rs88__MMColParam = "88" If (Request("MM_EmptyValue") <> "") Then rs88__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs88 Dim rs88_numRows Set rs88 = Server.CreateObject("ADODB.Recordset") rs88.ActiveConnection = MM_conn_oakcanyon_STRING rs88.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs88__MMColParam, "'", "''") + "" rs88.CursorType = 0 rs88.CursorLocation = 2 rs88.LockType = 1 rs88.Open() rs88_numRows = 0 %> <% Dim rs89__MMColParam rs89__MMColParam = "89" If (Request("MM_EmptyValue") <> "") Then rs89__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs89 Dim rs89_numRows Set rs89 = Server.CreateObject("ADODB.Recordset") rs89.ActiveConnection = MM_conn_oakcanyon_STRING rs89.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs89__MMColParam, "'", "''") + "" rs89.CursorType = 0 rs89.CursorLocation = 2 rs89.LockType = 1 rs89.Open() rs89_numRows = 0 %> <% Dim rs90__MMColParam rs90__MMColParam = "90" If (Request("MM_EmptyValue") <> "") Then rs90__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs90 Dim rs90_numRows Set rs90 = Server.CreateObject("ADODB.Recordset") rs90.ActiveConnection = MM_conn_oakcanyon_STRING rs90.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs90__MMColParam, "'", "''") + "" rs90.CursorType = 0 rs90.CursorLocation = 2 rs90.LockType = 1 rs90.Open() rs90_numRows = 0 %> <% Dim rs91__MMColParam rs91__MMColParam = "91" If (Request("MM_EmptyValue") <> "") Then rs91__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs91 Dim rs91_numRows Set rs91 = Server.CreateObject("ADODB.Recordset") rs91.ActiveConnection = MM_conn_oakcanyon_STRING rs91.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs91__MMColParam, "'", "''") + "" rs91.CursorType = 0 rs91.CursorLocation = 2 rs91.LockType = 1 rs91.Open() rs91_numRows = 0 %> <% Dim rs92__MMColParam rs92__MMColParam = "92" If (Request("MM_EmptyValue") <> "") Then rs92__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs92 Dim rs92_numRows Set rs92 = Server.CreateObject("ADODB.Recordset") rs92.ActiveConnection = MM_conn_oakcanyon_STRING rs92.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs92__MMColParam, "'", "''") + "" rs92.CursorType = 0 rs92.CursorLocation = 2 rs92.LockType = 1 rs92.Open() rs92_numRows = 0 %> <% Dim rs93__MMColParam rs93__MMColParam = "93" If (Request("MM_EmptyValue") <> "") Then rs93__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs93 Dim rs93_numRows Set rs93 = Server.CreateObject("ADODB.Recordset") rs93.ActiveConnection = MM_conn_oakcanyon_STRING rs93.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs93__MMColParam, "'", "''") + "" rs93.CursorType = 0 rs93.CursorLocation = 2 rs93.LockType = 1 rs93.Open() rs93_numRows = 0 %> <% Dim rs94__MMColParam rs94__MMColParam = "94" If (Request("MM_EmptyValue") <> "") Then rs94__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs94 Dim rs94_numRows Set rs94 = Server.CreateObject("ADODB.Recordset") rs94.ActiveConnection = MM_conn_oakcanyon_STRING rs94.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs94__MMColParam, "'", "''") + "" rs94.CursorType = 0 rs94.CursorLocation = 2 rs94.LockType = 1 rs94.Open() rs94_numRows = 0 %> <% Dim rs95__MMColParam rs95__MMColParam = "95" If (Request("MM_EmptyValue") <> "") Then rs95__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs95 Dim rs95_numRows Set rs95 = Server.CreateObject("ADODB.Recordset") rs95.ActiveConnection = MM_conn_oakcanyon_STRING rs95.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs95__MMColParam, "'", "''") + "" rs95.CursorType = 0 rs95.CursorLocation = 2 rs95.LockType = 1 rs95.Open() rs95_numRows = 0 %> <% Dim rs96__MMColParam rs96__MMColParam = "96" If (Request("MM_EmptyValue") <> "") Then rs96__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs96 Dim rs96_numRows Set rs96 = Server.CreateObject("ADODB.Recordset") rs96.ActiveConnection = MM_conn_oakcanyon_STRING rs96.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs96__MMColParam, "'", "''") + "" rs96.CursorType = 0 rs96.CursorLocation = 2 rs96.LockType = 1 rs96.Open() rs96_numRows = 0 %> <% Dim rs97__MMColParam rs97__MMColParam = "97" If (Request("MM_EmptyValue") <> "") Then rs97__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs97 Dim rs97_numRows Set rs97 = Server.CreateObject("ADODB.Recordset") rs97.ActiveConnection = MM_conn_oakcanyon_STRING rs97.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs97__MMColParam, "'", "''") + "" rs97.CursorType = 0 rs97.CursorLocation = 2 rs97.LockType = 1 rs97.Open() rs97_numRows = 0 %> <% Dim rs98__MMColParam rs98__MMColParam = "98" If (Request("MM_EmptyValue") <> "") Then rs98__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs98 Dim rs98_numRows Set rs98 = Server.CreateObject("ADODB.Recordset") rs98.ActiveConnection = MM_conn_oakcanyon_STRING rs98.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs98__MMColParam, "'", "''") + "" rs98.CursorType = 0 rs98.CursorLocation = 2 rs98.LockType = 1 rs98.Open() rs98_numRows = 0 %> <% Dim rs99__MMColParam rs99__MMColParam = "99" If (Request("MM_EmptyValue") <> "") Then rs99__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs99 Dim rs99_numRows Set rs99 = Server.CreateObject("ADODB.Recordset") rs99.ActiveConnection = MM_conn_oakcanyon_STRING rs99.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs99__MMColParam, "'", "''") + "" rs99.CursorType = 0 rs99.CursorLocation = 2 rs99.LockType = 1 rs99.Open() rs99_numRows = 0 %> <% Dim rs100__MMColParam rs100__MMColParam = "100" If (Request("MM_EmptyValue") <> "") Then rs100__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs100 Dim rs100_numRows Set rs100 = Server.CreateObject("ADODB.Recordset") rs100.ActiveConnection = MM_conn_oakcanyon_STRING rs100.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs100__MMColParam, "'", "''") + "" rs100.CursorType = 0 rs100.CursorLocation = 2 rs100.LockType = 1 rs100.Open() rs100_numRows = 0 %> <% Dim rs101__MMColParam rs101__MMColParam = "101" If (Request("MM_EmptyValue") <> "") Then rs101__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs101 Dim rs101_numRows Set rs101 = Server.CreateObject("ADODB.Recordset") rs101.ActiveConnection = MM_conn_oakcanyon_STRING rs101.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs101__MMColParam, "'", "''") + "" rs101.CursorType = 0 rs101.CursorLocation = 2 rs101.LockType = 1 rs101.Open() rs101_numRows = 0 %> <% Dim rs102__MMColParam rs102__MMColParam = "102" If (Request("MM_EmptyValue") <> "") Then rs102__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs102 Dim rs102_numRows Set rs102 = Server.CreateObject("ADODB.Recordset") rs102.ActiveConnection = MM_conn_oakcanyon_STRING rs102.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs102__MMColParam, "'", "''") + "" rs102.CursorType = 0 rs102.CursorLocation = 2 rs102.LockType = 1 rs102.Open() rs102_numRows = 0 %> <% Dim rs103__MMColParam rs103__MMColParam = "103" If (Request("MM_EmptyValue") <> "") Then rs103__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs103 Dim rs103_numRows Set rs103 = Server.CreateObject("ADODB.Recordset") rs103.ActiveConnection = MM_conn_oakcanyon_STRING rs103.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs103__MMColParam, "'", "''") + "" rs103.CursorType = 0 rs103.CursorLocation = 2 rs103.LockType = 1 rs103.Open() rs103_numRows = 0 %> <% Dim rs104__MMColParam rs104__MMColParam = "104" If (Request("MM_EmptyValue") <> "") Then rs104__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs104 Dim rs104_numRows Set rs104 = Server.CreateObject("ADODB.Recordset") rs104.ActiveConnection = MM_conn_oakcanyon_STRING rs104.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs104__MMColParam, "'", "''") + "" rs104.CursorType = 0 rs104.CursorLocation = 2 rs104.LockType = 1 rs104.Open() rs104_numRows = 0 %> <% Dim rs105__MMColParam rs105__MMColParam = "105" If (Request("MM_EmptyValue") <> "") Then rs105__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs105 Dim rs105_numRows Set rs105 = Server.CreateObject("ADODB.Recordset") rs105.ActiveConnection = MM_conn_oakcanyon_STRING rs105.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs105__MMColParam, "'", "''") + "" rs105.CursorType = 0 rs105.CursorLocation = 2 rs105.LockType = 1 rs105.Open() rs105_numRows = 0 %> <% Dim rs106__MMColParam rs106__MMColParam = "106" If (Request("MM_EmptyValue") <> "") Then rs106__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs106 Dim rs106_numRows Set rs106 = Server.CreateObject("ADODB.Recordset") rs106.ActiveConnection = MM_conn_oakcanyon_STRING rs106.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs106__MMColParam, "'", "''") + "" rs106.CursorType = 0 rs106.CursorLocation = 2 rs106.LockType = 1 rs106.Open() rs106_numRows = 0 %> <% Dim rs83__MMColParam rs83__MMColParam = "83" If (Request("MM_EmptyValue") <> "") Then rs83__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs83 Dim rs83_numRows Set rs83 = Server.CreateObject("ADODB.Recordset") rs83.ActiveConnection = MM_conn_oakcanyon_STRING rs83.Source = "SELECT mapID, mFullimage FROM QueryMapinfo WHERE mapID = " + Replace(rs83__MMColParam, "'", "''") + "" rs83.CursorType = 0 rs83.CursorLocation = 2 rs83.LockType = 1 rs83.Open() rs83_numRows = 0 %> Lake Alan Henry Properties

Lake Alan Henry Property
OAK CANYON Estates: Section 4


For details about a specific Lot, please click in the Lot Number

" border="0" usemap="#Map2">
" border="0" usemap="#Map3">" border="0" usemap="#Map4">
" border="0" usemap="#Map5">" border="0" usemap="#Map6">
" border="0" usemap="#Map7">" border="0" usemap="#Map8">
" border="0" usemap="#Map9">" border="0" usemap="#Map10">" border="0" usemap="#Map11">" border="0" usemap="#Map12">
" border="0" usemap="#Map13">" border="0" usemap="#Map14">
" border="0" usemap="#Map15">
" border="0" usemap="#Map16">" border="0" usemap="#Map17">" border="0" usemap="#Map18">
" border="0" usemap="#Map19">" border="0" usemap="#Map20">" border="0" usemap="#Map21">
" border="0" usemap="#Map22">" border="0" usemap="#Map23">
" border="0" usemap="#Map24">" border="0" usemap="#Map25">
" border="0" usemap="#Map26">

[SECTION 1] - [SECTION 2] - [SECTION 3] - [SECTION 4]

Home | Lake Allan Henry Properties | Ranches | Links | Contact

©Copyright J.M. Basinger Companies Inc. | All rights reserved | Website development by Caviness Advertising
   
<% rs82.Close() Set rs82 = Nothing %> <% rs83.Close() Set rs83 = Nothing %> <% rs84.Close() Set rs84 = Nothing %> <% rs85.Close() Set rs85 = Nothing %> <% rs86.Close() Set rs86 = Nothing %> <% rs87.Close() Set rs87 = Nothing %> <% rs88.Close() Set rs88 = Nothing %> <% rs89.Close() Set rs89 = Nothing %> <% rs90.Close() Set rs90 = Nothing %> <% rs91.Close() Set rs91 = Nothing %> <% rs92.Close() Set rs92 = Nothing %> <% rs93.Close() Set rs93 = Nothing %> <% rs94.Close() Set rs94 = Nothing %> <% rs95.Close() Set rs95 = Nothing %> <% rs96.Close() Set rs96 = Nothing %> <% rs97.Close() Set rs97 = Nothing %> <% rs98.Close() Set rs98 = Nothing %> <% rs99.Close() Set rs99 = Nothing %> <% rs100.Close() Set rs100 = Nothing %> <% rs101.Close() Set rs101 = Nothing %> <% rs102.Close() Set rs102 = Nothing %> <% rs103.Close() Set rs103 = Nothing %> <% rs104.Close() Set rs104 = Nothing %> <% rs105.Close() Set rs105 = Nothing %> <% rs106.Close() Set rs106 = Nothing %>