<%@ LANGUAGE=VBScript %> <% Option Explicit %> <% Response.Expires = 0 %> <% if Session("FONTSIZE") = "" then %> <% else %> <% Const L_ASP_TEXT = "Active Server Pages" Const L_DBG_TEXT = "ASP Debugging" Const L_OTHER_TEXT = "Other" On Error Resume Next Dim path, currentobj path=Session("dpath") Session("path")=path Set currentobj=GetObject(path) %> <% if Session("setProcOpts")then %> <% end if %>

<%= L_ASP_TEXT %>

|

<%= L_DBG_TEXT %>

|

<%= L_OTHER_TEXT %>

<% end if %>