% Const TFolder="<#TFloder#>":Public intPageCount:Application.Lock:Application(SessionStr&"TFolder")=TFolder:Application.Unlock %>