Code:
dim objexplorer, pagina, pagina2
set objexplorer = CreateObject("InternetExplorer.Application")
objexplorer.visible = true
objexplorer.navigate "http://www.google.it"
Set pagina = description.Create()
pagina("micclass").value= "Page"
Set pagina2= objexplorer.childobjects(pagina)now try by executing above script