Home
About NIN
Telecommunications Industry
Telecommunications Network
Technology Deployed
Digital Switches
Fiber
Broadband Internet Access
Technology Applications
Resources
Members Only
Contact
Access to Information Technologies Means Opportunities for People & Business
Economic Development
Education
Healthcare
Government
Social Opportunities
Cultural Opportunities
David F. Hahn
Executive Director
E-mail: NINdave@windstream.net
Phone: 402-434-2100
Cell: 402-320-4361
Fax: 402-477-5130
Nebraska Information Network
245 South 84th Street
Lincoln, Nebraska 68510
Last Updated:
January 18, 2012
Welcome to NIN!
<% 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 %>
