estrapolare varie parti da una stringa

[marco1970]

Buongiorno,
avrei bisogno di estrapolare varie parti da una stringa.

{"data":{"user":{"edge_followed_by":{"count":502,"page_info":{"has_next_page":true,"end_cursor":"Qx3ZDhzME13cUtLTnpYc20wNXBOUElfSUNMY29FY1lfUnhqSWwwWQ=="},"edges":[{"node":{"id":"2631989","username":"pippo","full_name":"pluto","profile_pic_url":"https://www.pippo.it","is_private":false,"is_verified":false,"followed_by_viewer":false,"requested_by_viewer":false,"reel":{"id":"2631995","expiring_at":1600214,"has_pride_media":false,"latest_reel_media":160893,"seen":null,"owner":{"__typename":"GraphUser","id":"263195","profile_pic_url":"https://www.pippo.it","username":"qwerty"}}}},{"node":{"id":"7097"username":"qwerty","full_name":"sasasasas,"profile_pic_url":"https://www.pippo.it","is_private":false,"is_verified":false,"followed_by_viewer":false,"requested_by_viewer":false,"reel":{"id":"70975,"expiring_at":1609214,"has_pride_media":false,"latest_reel_media":0,"seen":null,"owner":{"__typename":"GraphUser","id":"709757","profile_pic_url":"www.pippo.it","username":"cane"}}}},{"node":{"count":0,"edges":[]}}},"status":"ok"}

in pratica nella striga sopra riportata ho la necessita di recuperare i vari nomi che si trovano tra apici dopo la parola username.

un idea da dove iniziare GRAZIE

[patel]

spiega meglio, quali sono le parole da estrapolare nella stringa che hai mostrato ?

[alka]

un idea da dove iniziare GRAZIE

Trattandosi di una stringa in formato JSON, farei uso della libreria JSON.NET, senza indugio.

Ciao!

[marco1970]

Trattandosi di una stringa in formato JSON, farei uso della libreria JSON.NET, senza indugio.

Ciao!

perfetto in effetti è un risultato di JSON. Ho scaricato ed installato mi potresti dare solo imput di come iniziare? NON voglio la pappa pronta. Grazie cmq per la dritta

[alka]

mi potresti dare solo imput di come iniziare?

Nella mia risposta c'è il link al sito che contiene tutta la documentazione e anche degli esempi di codice per diversi scenari di base.

Ciao!

[marco1970]

Nella mia risposta c'è il link al sito che contiene tutta la documentazione e anche degli esempi di codice per diversi scenari di base.

Ciao!

In primis Grazie!

Dal sito ho preso spunto da questo

string json = @"{'  'Name': 'Bad Boys',
'  'ReleaseDate': '1995-4-7T00:00:00',
'  'Genres': [
'    'Action',
'    'Comedy'
'  ]
'}";


'Movie m = JsonConvert.DeserializeObject < Movie > (json);


'String name = m.Name;
'// Bad Boys

modificandolo in

Dim json = "{'Name': 'Bad Boys',  'ReleaseDate': '1995-4-7T00:00:00',  'Genres':['Action','Comedy' ]}"

        Movie m = JsonConvert.DeserializeObject(json)


        Dim Name1 = m.Name
        MsgBox(Name1)

poi ho aggiunto un modulo classe

Public Name  { Get, Set }

ma qui dovrei correggerlo e non mi è chiaro come....

ovviamente nel modulo di avvio mi da errore nella riga MOVIE

[alka]

ma qui dovrei correggerlo e non mi è chiaro come....
[...]
ovviamente nel modulo di avvio mi da errore nella riga MOVIE

Qual è l'errore che ottieni? Qual è il codice reale?

[marco1970]

Qual è l'errore che ottieni? Qual è il codice reale?

ERRORI

Gravità    Codice    Descrizione    Progetto    File    Riga    Stato eliminazioneErrore    BC30451    'm' non è dichiarato. Potrebbe essere inaccessibile a causa del livello di protezione.    prova    C:\Users\Marco\Desktop\prova\prova\prova\Form1.vb    88    Attivo
Errore    BC30800    Gli argomenti del metodo devono essere racchiusi tra parentesi.    prova    C:\Users\Marco\Desktop\prova\prova\prova\Form1.vb    86    Attivo
Errore    BC30109    'Movie' è un tipo classe e non può essere usato come espressione.    prova    C:\Users\Marco\Desktop\iprova\prova\prova\Form1.vb    86    Attivo
Errore    BC30451    'm' non è dichiarato. Potrebbe essere inaccessibile a causa del livello di protezione.    prova    C:\Users\Marco\Desktop\prova\prova\prova\Form1.vb    86    Attivo
Errore    BC30205    È prevista la fine dell'istruzione.    prova    C:\Users\Marco\Desktop\iprova\prova\prova\Class1.vb    2    Attivo

credo che nella classe non ci vadano le parentesi graffe e per questo va in errore la riga Movie nel form1

il codice è quello postato sopra poche righe tanto per capire e poi applicarlo al mio progetto

[alka]

ERRORI

Sono errori di compilazione. Hai preso un esempio C# mentre tu stai usando VB.NET: devi usare ovviamente l'esempio nel linguaggio che usi tu oppure tradurlo se necessario, sapendo che cosa sta effettivamente avvenendo nel codice che osservi.

Non puoi fare copia/incolla passivamente del codice e poi andare a tentativi sperando che tutto funzioni senza problemi.

il codice è quello postato sopra poche righe tanto per capire e poi applicarlo al mio progetto

Manca il codice della TUA classe: se posti errori di compilazione e come riferimento riporti il codice corretto da cui hai preso esempio, senza mettere il tuo che è probabilmente sbagliato, non ce la faremo mai.

Cancella tutto, tira un sospiro, riparti da zero con un minimo di logica nell'analisi degli esempi e della documentazione e inizia a scrivere il codice passo passo verificando ciò che scrivi.

[SirJo]

Sicuramente studiarsi ed utilizzare la libreria JSON è la soluzione migliore, anche perchè poi puoi accedere a tutti gli altri dati della struttura, comunque se devi estrarre solo lo username o anche altri dati ma senza considerare tutta la struttura, puoi anche utilizzare le RegEx, io le uso spesso se devo fare cose semplici e rapide.
Ad esempio, per il tuo caso:

        Dim data = "{""data"":{""user"":{""edge_followed_by"":{""count"":502,""page_info"":{""has_next_page"":true,""end_cursor"":""Qx3ZDhzME13cUtLTnpYc20wNXBOUElfSUNMY29FY1lfUnhqSWwwWQ==""},""edges"":[{""node"":{""id"":""2631989"",""username"":""pippo"",""full_name"":""pluto"",""profile_pic_url"":""https://www.pippo.it"",""is_private"":false,""is_verified"":false,""followed_by_viewer"":false,""requested_by_viewer"":false,""reel"":{""id"":""2631995"",""expiring_at"":1600214,""has_pride_media"":false,""latest_reel_media"":160893,""seen"":null,""owner"":{""__typename"":""GraphUser"",""id"":""263195"",""profile_pic_url"":""https://www.pippo.it"",""username"":""qwerty""}}}},{""node"":{""id"":""7097"",""username"":""qwerty"",""full_name"":""sasasasas,""profile_pic_url"":""https://www.pippo.it"",""is_private"":false,""is_verified"":false,""followed_by_viewer"":false,""requested_by_viewer"":false,""reel"":{""id"":""70975"",""expiring_at"":1609214,""has_pride_media"":false,""latest_reel_media"":0,""seen"":null,""owner"":{""__typename"":""GraphUser"",""id"":""709757"",""profile_pic_url"":""www.pippo.it"",""username"":""cane""}}}},{""node"":{""count"":0,""edges"":[]}}},""status"":""ok""}"

        Dim regs = System.Text.RegularExpressions.Regex.Matches(data, """username"":""([^""]*)")

        Dim risultato As String = ""
        If regs.Count > 0 Then
            For Each reg As System.Text.RegularExpressions.Match In regs
                risultato &= reg.Groups(1).Value & Environment.NewLine
            Next
        End If
        MessageBox.Show("Risultato:" & Environment.NewLine & risultato)