rieccomi con il secondo errore impossibile ,
anche questo e' uno di quelli che sui miei computer non accade mai ,
mentre su quelli dei miei clienti accade in media circa il 15% delle volte che viene fatto eseguire. ( ho una gestione degli errori che mi manda una segnalazione al server per ogni errore trovato con descrizione , riga , modulo,ecc.... )

passiamo alla descrizione

l'azione che deve essere svolta e' un SUBMIT di una form ad un preciso istante

ogni tanto si genera un errore 91 al momento del submit... come se la form non venisse trovata o la pagina non fosse caricata correttamente ... passiamo al codice ...
e cerchiamo di capire ... PERCHE' ....

90 secondi prima del preciso istante in cui devo inviare il submit ,
invio il comando navigate al webbrowser

per essere sicuro che la pagina sia stata caricata eseguo questo controllo ogni 15 secondi fino alla scadenza,
se non e' stata caricata , refresha...

codice:
        On Error GoTo err91
        Dim doc As IHTMLDocument3
        Dim html As String
        Set doc = Wb1.Document
        html = doc.documentElement.outerHTML
        If InStr(1, html, "titolo della pagina", vbTextCompare) = 0 Then GoTo err91 ' controlla inizio
        If InStr(1, html, "codice html in centro pagina", vbTextCompare) = 0 Then GoTo err91     ' centro
        If InStr(1, html, "nome della form da submittare", vbTextCompare) = 0 Then GoTo err91                ' form
        If InStr(1, html, "</html>", vbTextCompare) = 0 Then GoTo err91             ' fine pagina
        step91 = True
        flag91 = False 'flag usata per uscire dal ciclo
    End If
End If
exit sub 
err91:
...
... gestione refresh
Il webbrowser non carica immagini o altro
se arriva fino alla fine dovrebbe significare che la pagina e' stata completata al 100%.
quindi rimane in attesa dell 'ora X. in cui deve fare la submit


che una volta arrivata esegue Questo codice:

codice:
Dim doc As IHTMLDocument3
Dim frm As IHTMLFormElement
Dim pagina As String
Dim numfile As Integer

On Error GoTo errX
Set doc = Wb1.Document
Set frm = doc.getElementsByName("nomeform").Item(0)
frm.submit

Exit Function
errX:
...
...
...gestione errori
cosa succede ??? a volte fa cilecca ... non so perche'

vuoi potreste conoscere una causa ???

sono ben accetti consigli di qualunque tipo