<% on error resume next ' Create a server object set fso = createobject("scripting.filesystemobject") ' Target the text file to be opened set act = fso.opentextfile(server.mappath("count/homepage.txt")) ' Read the value of the text document ' If the text document does not exist then the on error resume next ' will drop down to the next line counter = clng(act.readline) ' Add one to the counter counter = counter + 1 ' Close the object act.close ' Create a new text file on the server Set act = fso.CreateTextFile(server.mappath("count/homepage.txt"), true) ' Write the current counter value to the text document act.WriteLine(counter) ' Close the object act.Close ' Write the counter to the browser as text Response.Write counter %>

External Peer
Review Report

Erickson & Brooks, CPAs

We are a team of professionals dedicated to providing a full line of accounting and related services to our clients. Our firm was established in 1946, making us one of the longest serving Certified Public Accounting firms in the State of Nebraska.

Erickson & Brooks offers the traditional accounting and auditing services – bookkeeping, financial statement preparation, auditing, and tax planning, preparation and compliance services, as well as specialized services such as computer accounting and management consulting, assistance with sales and acquisitions of businesses, estate planning, budget preparation, and other services. We provide these to all types of entities, including individuals, corporations, limited liability entities, partnerships, government subdivisions, non-profit organizations, and others.

Our major strength is in our people. Whatever service you need or desire, we have the people with the expertise and commitment to quality and personal service to assist you. Come and meet the proud professionals who make up our staff.

Serving the area since 1946

It adds up to hire Erickson & Brooks, CPAs.