[VB6] - Scaletta navigazione

[Veronica80]

grazie ragazzi siete 2 angeli!

Vi chiedo l'ultima cosetta e poi non vi stresso +!

Quando chiudo il form della navigazione si torna a quello del datagrid che però ovviamente risulta filtrato!

alchè io ho fatto così:

.chiudo il recordset
.gli faccio rieseguire tutte le azioni che esegue al load
.e poi datagrid1.refresh

però nn varia...
Maledetti datagrid....

[optime]

clonati il recordset e nell'evento timer lavora sul clonato

[Veronica80]

si si ci avevo già pensato da sola alla fine!

Solo che mi sa che nn va...xD cioè lancia il primo sito ecc ma nn li cambia +!
faccio prima a incollarvi come ho sistemato il codice!

Dim UrlAttuale As String
Dim rs2 As New ADODB.Recordset

Private Sub bttChiudi_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
    main.Show
    Unload Me
End If
End Sub

Private Sub Form_Load()
If rs2.State = 1 Then
    rs2.Close
End If
rs2.Source = "SELECT * FROM scaletta ORDER BY orario"
rs2.ActiveConnection = Cn
rs2.Open
End Sub

Private Sub Form_Resize()
WebBrowser1.Width = Me.Width
WebBrowser1.Height = Me.Height

End Sub

Private Sub Timer1_Timer()
    Dim orario As Date
    orario = Format(Time, "HH:NN")   '<-!!! Verifica che il formato restituito sia corretto!!!
    bttChiudi.SetFocus
'Rem Se vuoi usare Find:
'Rs2.Find "orario=" & orario

    Rem Se invece vuoi usare Filter:
    rs2.Filter = "orario<=" & orario

    Rem Se esiste almeno un record apro la pagina corrispondente
    If Not rs2.EOF Then
        If rs2.Fields("URL") <> UrlAttuale Then
            UrlAttuale = rs2.Fields("URL").Value
            WebBrowser1.Navigate UrlAttuale
        End If
    End If
End Sub

[optime]

resetta prima di rifiltrare

rs2.Filter
rs2.Filter = "orario<=" & orario

[Veronica80]

no mi da errore...
credo dipenda dal fatto che FILTER è una proprietà e nn può esser dichiarata così

[Veronica80]

secondo me il problema non è nel recordset che è cmq pieno, ma nella condizione IF.

se scrivo: <= lui considera valido sempre il primo orario come filtro visto che è sicuramente minore del secondo del terzo ecc ecc

[optime]

io infatti ho consigliato il metodo find, non filter

[Veronica80]

aiuto....io ormai mi son persa...tra find, filter, if, cif, vim...non ci capisco + nulla!

[optime]

Originariamente inviato da Veronica80
aiuto....io ormai mi son persa...tra find, filter, if, cif, vim...non ci capisco + nulla!

perché invece di piagnucolare non guardi quello che ti ho scritto e lo applichi?

[gibra]

Originariamente inviato da optime
gibra, così cerca i siti UNA sola volta, invece li deve cercare continuamente e caricarli solo se diversi dall'ultimo aperto

Non credo proprio. :rollo:
Non stai considerando il codice nel suo insieme, ovvero con quello che ho già inviato precedentemente.