<% Set bc = Server.CreateObject("MSWC.BrowserType") On Error Resume Next Err.Clear sbn_install = "f" sbn_install = prop("sbn_install") if Err.Number then sbn_install = "f" Err.Clear End if if bc.ActiveXControls = true and sbn_install <> "f" and sbn_install <> "t" then %> <%else if bc.ActiveXControls then%> <%else%> <%end if%> <%end if%> Back to contents Appendix B: topmenudata.asp