<%[@ IncludeFile "Code/Util.vbs" ]%> <%[@ IncludeFile "Code/Lang.vbs" ]%> <%[ InitGlobalVariables If g_cTocExpand = -1 Or g_cTocExpand >= Pictures.Count Then fTreeOpen = true strToggle="collapse" Else fTreeOpen = false strToggle = "expand" End If ]%> @[ Report.WriteFormatted Dic("FmtTitleTocContacts"), Session("Title") ]@ <%[If g_fUseTreeIndexes Then]%> @[WriteHtmlButtonToggle("Entries")]@ <%[Else]%> <%[End If]%>

@[ Report.WriteTextDic "TocIndexOccupancies" ]@

<%[ Dim strFirstChar, strFirstCharPrev, strName, strNamePrev, c If g_fUseTreeIndexes Then Report.WriteLn "" ]%>

<%[ WriteHtmlFramesetSafeguard(Contacts.Count) ]%>