%@ Language=VBScript%> <% dim opcio_menu dim submenu submenu=0 opcio_menu="3" opcio_menu=Request.querystring("menu") %>