<% if not messageNotAvailable then Dim topicPage, toStyle, bigReplyPic, toStylePic, toStyleMsg, toStyleSwitch If pgView = "flat" then toStyle = "tm" topicPage = tpage bigReplyPic = allData(9,0) toStylePic = "tree" toStyleMsg = profStyleTree toStyleSwitch = "m" else toStyle = "m" topicPage = p bigReplyPic = m toStylePic = "flat" toStyleMsg = profStyleFlat toStyleSwitch = "tm" End if end if if isThreadRecycled then pgTitle = ttDeletedTopic Dim altCatLink,altForumLink, altDefaultLink altForumLink = linkModifier("tt.asp?"&iff(isSearchEngine=2,URLSearchEngineModifier(forumtitle)&"&","")&"appid="& appid &"&p="& topicPage &"&tmode="& tmode&"&smode="&smode) altCatLink = linkModifier("default.asp?catApp="& catApp) altDefaultLink = linkModifier("default.asp") %>

<%= pgTitle %>

<%=LoggedInAsTitle & memLogin %>

<% getSessionType = 2 %>

<% if not messageNotAvailable then %> <% if (isAdmin or mode) then %> " onclick="return logwin(this.href+'?threadID=<%= threadID %>')"> " border=0 align="absmiddle"><%= ttManageDesc %> <% end if %> <% if memBrowser = "moz6" and not isThreadRecycled then %> ?m=<%= bigReplyPic %>&mpage=<%= page %>&p=<%= topicPage %>&tmode=<%= tmode %>&smode=<%= smode %>&toStyle=<%= toStyleSwitch & keyAndLan %>"> " border=0 align="absmiddle"><%= toStyleMsg %> <% end if %> <% If (siteWideSubscription > 0 and forumSubscription >= 1) and allowmail and not isGuest and not isThreadRecycled then %> ?threadID=<%= threadID %>" onclick="return confirmDeletion('<%= JSEncode(subscribeDesc&": "& pgTitle) %>')"> " border="0" alt="<%= subscribeDesc %>" align="absmiddle"><%= subscribeDesc %> <% End If %> <% if not isThreadRecycled then%> " border=0 align="absmiddle"><%= tmPrintableVersion %> <% End If %> <% end if %>

<% call mTopNav(1) %>