Member of...

Showrooms in
Odessa
&
New Port Richey

Serving Florida
for 10 Years


Click above for more about our low cost windows

Hurricane Charley 2004
Click hurricane to see more about our hurricane protection products

Ackerman Construction is a commercial contractor, capable of performing small jobs like a home remodel to huge jobs like building a multi-story commercial building.

We specialize in selling and installing quality low cost windows, hurricane protection products and storm protection products.

At Window World we can sell and install windows starting as low as $189.00 each. We handle and install quality low cost windows. Single hung windows and double hung windows.

Hurricane protection products are another specialty of ours. We can hurricane protect windows, hurricane protect doors and hurricane protect garage doors.

Some of the hurricane protection products and storm protection products we handle are:

  • Fabric Shield Roll downs to hurricane protect windows and hurricane protect doors
  • Storm Catcher to hurricane protect windows
  • Steel hurricane shutters
  • Steel hurricane panels
  • Lexan clear hurricane protection panels
  • Aluminum storm panels
  • Single & double hung high impact windows
  • Garage door vertical storm braces to hurricane protect garage doors.
Rondon Consuslting 2/2007
<% ' Graphical Hit Counter Example By www.PowerASP.com ' Declare variables Dim ObjCounterFile, ReadCounterFile, WriteCounterFile Dim CounterFile Dim CounterHits Dim FixedDigitCount Dim DigitCount Dim DigitCountLength Dim DigitZerosToAdd Dim DigitZeroCount Dim ShowDigits Dim DigitPath ' (FixedDigitCount) will add zeros to the front of your count ' if the count is less then the (FixedDigitCount) ' just like "frontpage" counters let you do FixedDigitCount = 5 DigitPath = "digits/red_on_white" On Error Resume Next Set ObjCounterFile = Server.CreateObject("Scripting.FileSystemObject") CounterFile = Server.MapPath ("counter.txt") Set ReadCounterFile= ObjCounterFile.OpenTextFile (CounterFile, 1, True) If Not ReadCounterFile.AtEndOfStream Then CounterHits = Trim(ReadCounterFile.ReadLine) If CounterHits = "" Then CounterHits = 0 Else CounterHits = 0 End If ReadCounterFile.Close Set ReadCounterFile = Nothing CounterHits = CounterHits + 1 Set WriteCounterFile= ObjCounterFile.CreateTextFile (CounterFile, True) WriteCounterFile.WriteLine(CounterHits) WriteCounterFile.Close Set WriteCounterFile = Nothing Set ObjCounterFile = Nothing DigitCountLength = Len(CounterHits) If DigitCountLength < FixedDigitCount Then DigitZerosToAdd= FixedDigitCount - DigitCountLength DigitZeroCount = 1 For DigitZeroCount = DigitZeroCount to DigitZerosToAdd ShowDigits = ShowDigits & "" Next End If DigitCount = 1 For DigitCount = DigitCount to DigitCountLength ShowDigits = ShowDigits & "" Next %> <% =ShowDigits %>