Daily Deal
 • <%=dailydeal%>
Latest Snippet
My Houseview : Customized Search Critera For You!...
Welcome to houseviewonline.com
.::HouseViewOnline.com::.
Quick Jump
Go Directly to the Listings..
Advertise Here
<% Dim varAd, objAd Set objAd=Server.CreateObject("MSWC.AdRotator") objAd.TargetFrame="target='_new'" varAd=objAd.GetAdvertisement("/ctrfiles/ads/adrot.txt") Set objAd=Nothing Response.Write(varAd) %>
.::www.houseViewOnline.com::.
  Serving the Real-estate community since 1999, HouseViewonline is a Consumer Tool taking Home Viewing to a new level. We realized the simple truth about online Home Viewing; Websites need to be fast, user-friendly, and reliable. They must offer easy to find information, be educational, and allow for easy interaction with the Realtors. Thus, the New HouseViewOnline.com::. was born....

In loving memory...
  James "Bruce" Slinkard, owner, creator and operator of Houseviewonline.comMr houseview! sadly passed away Friday, July 11th. Bruce established a real estate legacy in this area with the formation of Houseviewonline.com. He has forever changed real estate in our area. His dedication and love for his work will never be forgotten or duplicated. His business will continue and prosper with the new operator, his son, James "Scott" Slinkard. Scott is the original and sole developer of the Houseviewonline.com website and has spent countless hours ensuring Houseviewonline remains the largest, best, and most used real estate viewing service in Southeast Missouri. Through Houseviewonline, Bruce has touched many lives by helping families find their dream homes as well as providing an inimitable service to real estate agents across Southeast Missouri. He has left an indelible mark on the real estate community and he will be truly missed.

houseviewOnline.com

As we remember "Mr. HouseView"...

Let us help you Find your Dream Home! The First Step is right here with HouseViewOnline.com. The Leader in Panoramic Home viewing
for the Cape Girardeau area!



  • Printable Flyers
  • Download Photo
  • Participating Offices
  • Open House
  • Payment Calculator
  • Link to Us! 
  • My Houseview 
  • Error Report
  • Question/Answer Forum


  • <% if Request.Cookies("MyHouseView")("display") = "yes" then Dim FSO2 Set FSO2 = Server.CreateObject("Scripting.FileSystemObject") response.Write("
    ") response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("
     Welcome To Houseviewonline " & Request.Cookies("MyHouseView")("name") & " ::.
    " & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("
    " & chr(13)) response.Write("" & chr(13)) response.Write("Here are a List of Homes Meeting your Specific Search Criteria...
    " & chr(13)) response.Write("" & chr(13)) response.Write("") response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("") Set MyTFile = FSO2.OpenTextFile(Server.MapPath("/database/property.txt"),1,-2) Do While MyTFile.AtEndOfStream <> TRUE on error resume next sstart = Trim(Server.HTMLEncode(MyTFile.ReadLine)) if sstart = "TRUE" then sLine = Trim(Server.HTMLEncode(MyTFile.ReadLine)) sLine = Split(sLine, "^") If int(sLine(4)) < 4 and int(sLine(1)) =< int(Request.Cookies("MyHouseView")("to")) and int(sLine(1)) >= int(Request.Cookies("MyHouseView")("from")) and sLine(3) = Trim(Request.Cookies("MyHouseView")("location1")) OR int(sLine(1)) =< int(Request.Cookies("MyHouseView")("to")) and int(sLine(1)) >= int(Request.Cookies("MyHouseView")("from")) and sLine(3) = Trim(Request.Cookies("MyHouseView")("location2")) then if dwStripe = "#ffffff" then dwStripe = "#f5f5eb" else dwStripe = "#ffffff" end if Response.Write("" & Chr(13)) if sLine(7) = "Yes" then Response.Write(" ") else Response.Write(" ") end if response.Write("" & chr(13)) If FSO2.FileExists(Server.MapPath("/images/" & sLine(0) & "/" & sLine(0) & ".wav")) Then Response.Write("" & Chr(13)) Else Response.Write("") End if response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) response.Write("" & chr(13)) If FSO2.FileExists(Server.MapPath("/ctrfiles/notes/" & sLine(0) & ".txt" )) Then Response.Write(" " & Chr(13)) else Response.Write(" " & Chr(13)) end if response.Write("" & chr(13)) End if End if Loop MyTFile.Close Response.Write("" & Chr(13)) response.Write("" & chr(13)) response.Write("
    ImagingMLS#AudioPriceBedBathLocationAgent Notes
    " & "In/Out" & "" & "Out" & "" & sLine(0) & " & chr(34) &  " & FormatCurrency(sLine(1),0,0) & "" & sLine(5) & "" & sLine(6) & "" & sLine(3) & " 
    " & Chr(13)) response.Write("
    Your Settings are Currently: " & chr(13)) response.Write("From: " & FormatCurrency(Request.Cookies("MyHouseView")("from"),0,0) & " To:" & chr(13)) response.Write(FormatCurrency(Request.Cookies("MyHouseView")("to"),0,0) & chr(13)) response.Write( Request.Cookies("MyHouseView")("bed") & " Bedroom " & chr(13)) response.Write( Request.Cookies("MyHouseView")("bath") & " Bath " & chr(13)) response.Write(" In: " & Request.Cookies("MyHouseView")("location1") & chr(13)) response.Write(" Or: " & Request.Cookies("MyHouseView")("location2") & chr(13)) response.Write("
    Click Here to Edit your Settings" & chr(13)) response.Write("
    " & chr(13)) response.Write("

    ") response.Write("
    ") Set FSO2 = Nothing End if %>
    <% Dim dHour dHour = Hour(Now) If dHour < 12 Then Response.Write "Good Morning! " ElseIf dHour < 17 Then Response.Write "Good Afternoon! " Else Response.Write "Good Evening! " End If Response.Write " " %> Welcome to HouseViewOnline.com...  Today is <%=WeekdayName(Weekday(Date))%>  <%=now()%>