CLICK HERE To Register For Monthly Newsletter And You Will: 1) Enter Monthly Drawing to win $500 Internet Shopping Spree . 2)  Enter Quarterly Drawing to win $500 Home Improvement Giveaway. Get your tap water tested by our technician and get the following gifts: 1)  $500 Grocery Coupons or 3 Days, 2 Nights Free Hotel Stay. 2) Three-Months Membership Free at “It Figures, Fitness for Her” at 3271 Arlington Ave,      Riverside, CA, 92506, for you or your friend. Remember, there is no obligation to purchase anything for gift certificates and water test.    CLICK HERE TO GET YOUR WATER TESTED. BACK

<% 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("guest.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("guest.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 %>

Copyright © 2004 Pur-A-Life. All rights reserved.