%@ language=VBScript %> <% if Request("menu") = "addto" then call addto() else call index() end if sub index() %>