<%@ Language=VBScript %> <% Set FileObject = Server.CreateObject("Scripting.FileSystemObject") HitsFile = Server.MapPath ("/counter") & "\hits.txt" Set InStream= FileObject.OpenTextFile (HitsFile, 1, false ) OldHits = Trim(InStream.ReadLine) NewHits = OldHits + 1 Set OutStream= FileObject.CreateTextFile (HitsFile, True) OutStream.WriteLine(NewHits) %>
   

      

      

Welcome to Ahil's Garden of Poems. Contained herein are selected poems by Ahil. A poem is like a flower: all are beautiful in their ownway, yet no two are ever alike.

Enjoy your excursion through the following pages and please sign the Guestbook before you leave. Your comments are most welcome.