codice:
Private Sub Command1_Click()
'per inserire username e password
Dim d As IHTMLDocument3
Dim el As IHTMLElement
    
Set d = wbs1.Document
    
'Set el = d.getElementsByName("nome").Item(0)    'ricava l'elemento 0 dalla collezione di elementi aventi name="LOGIN"
'el.setAttribute "value", "pippo"                    'imposta l'attributo html value="pippo"

'Set el = d.getElementsByName("pass")(0)
'el.setAttribute "value", "password"

'pulsante di invio
Set el = d.getElementsByName("HELP")(0)
el.Click

End Sub

Private Sub Command2_Click()
Dim stringa As String
stringa = wbs1.Document.body.innerText

MsgBox stringa
End Sub

mi da errore proprietà dell'oggetto non supportata come mai?