%@LANGUAGE="VBSCRIPT"%>
|
|
|
|
|
|
|
|
Pictures of a Beautiful Place
Click on a thumbnail to view a larger picture.
![]() |
A warm sandy beach. |
![]() |
As the sun goes down... |
![]() |
An aerial photograph of waves crashing upon a coral reef. |
![]() |
A spectacular waterfall. |
![]() |
Another spectacular waterfall. |
Would you believe Sri Lanka??
<% whichname="\NicePlacePageCount.txt" whichdir=Server.Mappath ("\kb5wmy\") whichFN=whichdir & whichname forreading=1 Dim PageCount Set fs = CreateObject("Scripting.FileSystemObject") Set thisfile = fs.OpenTextFile(whichFN, forreading, True) thisline=thisfile.readline strCnt = thisline PageCount = (Cdbl(strCnt) + 1) Response.Write "This page was last updated on
Saturday, June 12, 1999.
� 1999 Carl McNair.