<%@ Language="VBScript" %> <% Dim Conn, Rs, searchID, strSQL, strImgNum, filePath,folderNum ' Create ADO Connection Component to connect with the database Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") ' Filename: Realtors_-_General_Real_Estate.asp '------------------------------- ' Realtors_-_General_Real_Estate Custom Includes begin Dim page Dim pageName Dim Cities Dim Counties page = "Realtors_-_General_Real_Estate" pageName = "Realtors_-_General_Real_Estate" Session("expired") = "No" %> <% ' Realtors_-_General_Real_Estate CustomIncludes end '------------------------------- '*** TOOLS *** '** FROM FILE ** root=Replace(server.MapPath("AdminOwnerXML.html"),"AdminOwnerXML.html","") 'Set fso = CreateObject("Scripting.FileSystemObject") 'If fso.fileexists(Root & "alreadyAsked.txt") then 'set f = fso.OpenTextFile(Root & "alreadyAsked.txt", 1) 'sHTML2 = f.ReadAll() 'set f=nothing 'End If '** REMOTE XML ** 'sHTML = "" 'url = "http://www.nailsoupmedia.com/PostLinkLetter.html" ''Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP") 'Set xml = Server.CreateObject("Microsoft.XMLHTTP") 'xml.Open "GET", url, False 'xml.Send 'sHTML = xml.responseText 'set xml=nothing '** REMOTE DATABASE ** 'Set Conn = Server.CreateObject("ADODB.Connection") 'Set Rs = Server.CreateObject("ADODB.Recordset") 'Conn.Open "Provider=sqloledb;" & _ ' "Data Source=216.127.88.120,2433;" & _ ' "Network Library=dbmssocn;" & _ ' "Initial Catalog=Accounting;" & _ ' "User ID=sa;" & _ ' "Password=buckler;" 'rs.Open SQL,conn,1,1 'rs.Close 'conn.Close 'set rs=Nothing 'set conn=Nothing ' Set conn = CreateObject("ADODB.Connection") ' Set rs = Server.CreateObject("ADODB.Recordset") ' filePath = Server.MapPath("AdminMyStuff.html") ' conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & filePath ' strSQL = "SELECT * FROM MyListings ORDER BY ID Desc" ' Set rs = conn.Execute(strSQL) ' rs.Movefirst 'rs.Close 'conn.Close 'set rs=Nothing 'set conn=Nothing '=============================== ' Save Page and File Name available into variables '------------------------------- sFileName = "Realtors_-_General_Real_Estate.html" sTemplateFileName = "Skin/Realtors_-_General_Real_Estate.html" '=============================== '=============================== 'Save the name of the form and type of action into the variables '------------------------------- sAction = GetParam("FormAction") sForm = GetParam("FormName") '=============================== ' Realtors_-_General_Real_Estate Show begin '=============================== ' Display page '------------------------------- ' Load HTML template for this page '------------------------------- 'Dim LoadedPage 'LoadedPage = LoadTemplate2 (sAppPath & "Skin/Objects/AutoBlog.html") LoadTemplate sAppPath & sTemplateFileName, "main" '------------------------------- ' Load HTML template of Header and Footer '------------------------------- '------------------------------- SetVar "FileName", sFileName '------------------------------- ' Step through each form '------------------------------- 'OpenDB Load_Cities_Counties Item_Show '------------------------------- Parse "main", True '------------------------------- ' Output the page to the browser '------------------------------- Response.write fixPage(PrintVar("main")) ' Realtors_-_General_Real_Estate Show end '------------------------------- ' Destroy all object variables '------------------------------- ' Realtors_-_General_Real_Estate Close Event begin ' Realtors_-_General_Real_Estate Close Event end UnloadTemplate '=============================== '=============================== ' FUNCTIONS '------------------------------- '=============================== ' Display '=============================== Sub Load_Cities_Counties() Counties = replaceLastComma(Session("counties")) Cities = replaceLastComma(Session("cities")) End Sub Function ShowMyListings Dim con Dim rst Set con = CreateObject("ADODB.Connection") Set rst = Server.CreateObject("ADODB.Recordset") filePath = Server.MapPath("AdminMyStuff.html") con.Open "Driver={Microsoft Access Driver (*.mdb)};" & _ "DBQ=" & filePath strSQL = "SELECT * FROM MyListings ORDER BY ID Desc" Set rst = con.Execute(strSQL) rst.Movefirst Response.Write While not rst.EOF Response.Write "" & rst("mls") & "
" rst.MoveNext Wend con.Close:set rst=Nothing : set con = Nothing End Function '=============================== ' Display Search Form '------------------------------- Sub Item_Show() %> <% If LoadedPage <> "" Then SetScript "PutYourContentHere",LoadedPage Else If Request("Realtors_-_General_Real_EstateMessage") <> "" Then SetScript "PutYourContentHere","


" & Request("Realtors_-_General_Real_EstateMessage") & "
" End If End if For totalDynamics = 1 to DynamicVarIndex aDVar = DynamicVarItem(totalDynamics) & ",load" SetScript aDVar , DynamicVar(totalDynamics) Next SetScript "MyListings",ShowMyListings Parse "FormSearch", False End Sub '=============================== %>
 

 

5700 Veterans Parkway

Columbus, GA 31904

Direct : 706-718-4690
Office: 706-321-0370

 

 
     Home | Contact | Featrued Listings

  Buyers | Sellers | Reports | Search | Home Values | F.S.B.O | Financing | Todays Rates | About | Contact
  • 15" Laptop Case

    • Easylite creates integrated, controlled, facility wide lighting systems that manage power consumption and enhance user comfort.
  • Airbrush Blush

    • Luminess Air brings airbrush cosmetics to everyone. Once Airbrush was only available to the makeup elite, celebrities and to those who would pay top dollar for the airbrushed look.
  • Austin Apartment

    • Austin Apartments guide and information for corporate housing in Austin, furniture rental and furniture suppliers in Austin.
  • Austin Tx Apartment For Rent

    • Austin Apartment Rental Services website offers information for Austin apartment, Austin apartment for rent and North Austin apartment.


  • Bank Mergers Lawyer

    • HorganRosen.com is your California Specialty Law Firm with Attorneys specializing in Banking & Investment Law, Business Litigation and Mergers. Find out today why we?re the best in Los Angeles and a
  • Bolle Prescription Sun Glasses

    • We carry all major brands who specialize in quality prescription goggles, sunglasses, eyewear and child stuff.
  • Commercial Lighting

    • Easylite creates integrated, controlled, facility wide lighting systems that manage power consumption and enhance user comfort.
  • Cpap Machine

    • We specialize in the supply of high-quality home medical equipment, including CPAP Machines, Re-Usable TENS Electrodes, and Invacare Oxygen Concentrators.


  • Eviction Services

    • Aaaattorneyservices.com offer a variety of legal services at competitive prices. Our seasoned and proffessional staff will provide you with reliable service in such matters as Civil Eviction Service
  • Fancy Dress

    • Iwanttogoas.co.uk is the best online source to bring you the best costumes and fancy dress for kids, mans adults and other occasional fancy dresses available at the best prices in the UK.
  • free online poker

    • PokerMaster.org - your ultimate starting point and reference tool for everything concerning the world of online poker.
  • Girls Boarding School

    • Trinity Teen Solutions is an at-risk Christian-based therapeutic Boarding School and All Catholic residential treatment center program for Troubled Teen Girls.


  • Glass Tile

    • Discountbathroomvanities.com is your one-stop resource for Modern Bathroom Remodeling Design Ideas and High Quality Bathroom Vanities, Mirrors, Glass-Vessel Sinks, Faucets, and Tiles including Glass
  • Golf Swing Help

    • Arrive to Hitfairways.com, which has been helping people to find Fix A Slice, Tips On Golf Swing, Online Golf Instruction,Free Online Golf Lessons, Golf Help, How To Swing Different Golf Clubs from
  • Goodwood Park Hotel

    • Chichesterhouseparty.co.uk brings you to Chichester House, Goodwood House Chichester, New Year House, Chichester House New Years Eve, You will find no better base than it.
  • Guitars

    • MCCShopOnline.com is your source for the best deals on Musical Instruments, Equipment and Accessories including Acoustic, Electric and Bass Guitars, Drums, Amplifiers and everything else you need fr


  • Industrial Cooling Fans

    • UTEC is a thermal management company that manufacturers Computer Electric Cooling Fans, Blowers and other cooling solutions.
  • Juicy Couture

    • Nationaljeancompany.com, National Jean Company& online residence, boasts the largest selection of premium denim and contemporary clothing. nationaljeancompany.com has great deals on the freshest sty
  • Lasik Vision Correction Myrtle Beach

    • Atlantic Eye Laser Vision Center in Myrtle Beach, South Carolina specializes in providing Laser Corrective Eye Surgery including services such as Cataract Correction, Crystalens implantation, and Re
  • Longest Drive

    • This swing is now being used by many long driving champions, and scratch or better golfers worldwide.


  • Media Agencies

    • UTalkMarketing is an online community for the marketing industry. It aggregates the latest marketing news, case studies, ad campaigns, how to guides, marketing jobs and marketing answers.
  • Mont Blanc Replica Watch

    • Low Priced Replicas is your online headquarters for Replica Designer Watches such as our Imitation Rolex, Breitling, Cartier, Chanel, Corum, Franck Muller, Omega, and Movado Replicas at low Wholesal
  • Newborn Baby Gifts

    • Gift of Style.com, Unique gifts for women and all occasions including new baby, birthdays, weddings, anniversaries, thank you, and pet lovers.
  • Nutritional Supplements

    • Supplementology.net is your #1 source for Discount Nutritional and Sports Supplements including Weight Loss Pills and Protein Body Building Supplements specially formulated for Muscle Building. We h


  • Office Depot Coupons

    • Instant Coupons and Coupon Codes and Promotional Codes for Dell, Overstock, eBags, 1800flowers, Best Buy, Eastbay and other online stores
  • Ohare Airport Transport

    • Jetvanchicago.com is committed to providing premier transportation arrangements with the best possible service and at the most competitive price. Our services include Midway Airport Transportation,
  • Outdoor Wooden Furniture

    • Allbackyardfun.com is your source for Discount Backyard Furniture and Accessories such as Oriflamme Fire Tables, Outdoor Teak Wood Furniture and fireplace accessories.
  • Php Dating Software

    • Welcome to Abledating.net, here you will find Free Dating Site Software, Community Script, Online Business Ideas, Professional Matchmaking Software


  • Plastic Display Cases

    • Offers fixtures including display cases, jewelry showcases, mall kiosks, glass and wood display cases, gandola shelves, and bakery cases.
  • Prescription Ski Goggles

    • Prescription Sunglasses Motorcycle Goggles and Sports Eyewear at affordable prices.
  • Puma Golf Shoes And Apparel

    • At ladygolf.com you can find genuine prize products like bogner golf shoes, astra golf, tail ladies golf sportalm European.
  • Randall Rm100

    • You can get gretsch guitars and jackson guitars from Funky Munky Music Online Store.


  • Replica Designer Watch

    • Welcome to Low Cost Replicas, your online headquarters for Wholesale Replica Designer Watches such as our Fake Rolex, Breitling and Cartier Replicas at Factory-Direct Prices.
  • Replica Fake Watch

    • BestReplicaDeals is your online superstore for the Best Deals on Replica Luxury Designer watches such as our Omega, Patek Philippe Replicas at low Wholesale-Direct Prices.
  • Replica Rolex

    • Shopreplicaz.com is your online headquarters for the Best Replica Luxury Designer Watches such as Rolex and Panerai at Wholesale-Direct Prices.
  • Replica Rolex

    • Are you crazy about luxury watch replicas at wholesale price? Find out all that you need to know about Breitling, Cartier, Chanel, Chopard, Patek philippe, Rolex and more at Replicawatchnut.com


  • Replica Watch

    • Welcome to iReplicaMarket.com, your online headquarters for Replica Designer Watches such as Knock-Off (Fake) Rolexes and Imitation Patek Philippe Timepieces at Wholesale-Direct Prices
  • Resell Merchant Accounts

    • Welcome to ipayment-agent-iso.com. We are one of the largest providers of credit and debit card-based payment processing services in the country.
  • Rolex Daytona Replica

    • MySwissReplicas is your online headquarters for Replica Designer Watches such as our Omega, Cartier, and Rolex Submariner Replicas at low Wholesale-Direct Prices.
  • Rolex Masterpiece

    • Monster Rolex is your online headquarters for Imitation Rolex Watches such as our Submariner, Daytona, and GMT Replicas at low Wholesale-Direct Prices.


  • Rolex President

    • Swiss Quality Watchez is your online headquarters for Replica Designer Watches such as Rolex Yachtmaster Replicas at low Wholesale-Direct Prices.
  • Sexy Dress

    • Desire4mo.com is your source for Sexy Bikinis, Lingerie, Costumes, Dresses and Clubwear specifically designed to get you the attention you deserve. We even stock Plus Sizes!
  • Sloping Window Blinds

    • Contour Blinds have been supplying all types of Window Blinds to both the Domestic and Commercial markets throught the UK and Ireland.
  • Stainless Steel Couplers

    • We supply leading brands of fluid handling components, including Snaplock, Liquid Controls, Piusi, Endress+Hauser and Dry Link, and offer several fluid handling and measurement solutions to our cust


  • Steak Bison

    • The Buffalo Guys, LLC is a group of skilled buffalo ranchers who have joined forces to bring nature''s finest buffalo meat to the marketplace.
  • Timex Watches

    • WatchWear.com contains the largest selection of watch brands on the Internet.
  • Travel Bag On Wheels

    • Welcome to Lokker.co.uk, here you will find information about Wheelie Locker, Suitcases With Wheels, Surfboard Bag, Luggage On Wheels, Salomon Bag.
  • Viewsat HD

    • HookedOnTronics is your one stop shop for all you fta needs. We carry only the best in fta also carry may Accessorys for fta and for the Electronic minded if you see it on HookedOnTronics it is the


  • Wholesale Silicone Wristbands

    • Lowest price on custom silicone wristbands on the web guaranteed, Minimum order of only 20 Silicone wristbands, all our wristbands are made from 100% silicone.
  • Wood Engraving

    • LaserEngravingExpress.com is your source for Express Custom Laser Engraving Services perfect for everything from personalizing jewelry to engraving business promotional items. Find out what we can d

      Buyers | Sellers | Relocation | Blog | Financing | Columbus | Search | Testimonials | Login | About | Contact

     

    Equal Housing Opportunity - Columbus Real Estate ?2007 All Rights Reserved - Privacy Statement

    *Military Family Relocation