Home
About NIN
Telecommunications Industry
Telecommunications Network
Technology Deployed
Digital Switches
Fiber
Broadband Internet Access
Technology Applications
Economic Development
Rural Development Programs in Nebraska
Resources
Members Only
Reports
Minutes
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: dhahn@neinfonet.com
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 %>
