Oppure

Loading
26/03/08 20:45
P4p3r0g4
1) isoli dal sorgente i risultati analizzandolo.
caratter per carattere riga per riga.
devi cercare i tag che racchiudono i risultati e isolarli con funzioni come instr e mid.
dopodiche` avrai i risultati.
assieme ai risultati conlo stesso metodo ricavi i link.
ogni sitodivide i risultati della ricerca in modo diverso quindi si, devi analizzare il codice del sito e capire il meccanismo per poi implementare l'algoristmo di estrapolazione dei dati nel tuo programma.
se mi dici che non hai capito, vengo li e ti picchio, giuro.
2)utilizzi una listbox per visualizzare i risultati e metti invece in un vettore (o array come preferisci chiamarlo) i link.
al click apri il collegamento nel vettore corrispondente al list1.listindex
aaa
01/04/08 14:20
Saitek
:rotfl::rotfl::rotfl::rotfl::rotfl:
Nono non picchiarmi :D

No ho capito più o meno.
Ma diciamocelo...è difficile!!! Ora appena ho tempo provo a buttare giù qualcosa :)
Grazie mille p4p!
aaa
01/04/08 14:52
P4p3r0g4
sto facendo un programma simile (in vb.net perche` il mio vb6 e andato a putt..) ti posto il mio metodo di estrazione
    Private Function GetText(ByVal OriginalText As String, ByVal TagDiInizio As String, ByVal TagDiFine As String) As String
        On Error Resume Next
        Dim PosDiInizio As Long, PosDiFine As Long, DeltaPos As Long
        PosDiInizio = InStr(OriginalText, TagDiInizio) + Len(TagDiInizio)
        PosDiFine = InStr(OriginalText, TagDiFine)
        DeltaPos = PosDiFine - PosDiInizio
        GetText = Mid(OriginalText, PosDiInizio, DeltaPos)
    End Function


dovrebbe essere compatibile col vb6.
chiamndo gettext con la stringa, il codice che precede la tua stringa e il codice che la segue ti restituisce la stringa intermedia.
aaa
02/04/08 7:16
Shutdown
Attenzione a non continuare il thread in :ot:. :k:
aaa