OPTION EXPLICIT

'MUST HAVE ALREADY INCLUDED COOKIES.VBS

sub NextPage(strNextPage)
	dim iArray, iLock
	iArray = Split ((Now()/28),".",-1,0)
	iLock = iArray(0)&iArray(1)
	location.href = strNextPage&"?"&iLock
end sub