<%@ Language=VBScript %>
<%
fp = Server.MapPath("dlcount.txt")
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile(fp)
ct = Clng(a.ReadLine)
if Session("bfydocct") = "" then
Session("bfydocct") = ct
ct = ct + 1
a.close
Set a = fs.CreateTextFile(fp, True)
a.WriteLine(ct)
end if
a.Close
%>
![Translate Page to Spanish [Español]](http://www.hollywoodfl.org/images/main/espanol.jpg){kind=small}
![Translate Page to French [Français]](http://www.hollywoodfl.org/images/main/francais.jpg){kind=small}
