Buonasera ragazzi. Avrei intenzione di creare un programma che lavora in background controllando una pagina web. quando avviene una modifica parte un suono di "allarme" credo sia facile da fare. qualcuno mi aiuta?
Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
Una modifica in generale in tutta la pagina o una modifica specifica? Dovresti essere un po' più precisoBuonasera ragazzi. Avrei intenzione di creare un programma che lavora in background controllando una pagina web. quando avviene una modifica parte un suono di "allarme" credo sia facile da fare. qualcuno mi aiuta?
Allora, i video su quel link cambiano ogni 30/60 secondi e deve cliccarne sempre uno diverso (era un link di youtube e.e)Per tornare indietro e refreshare la pagine è facile : basta che ti salvi il link della pagina in cui eri e quindi navigando avrai già la pagina refreshata. Per cliccare il primo video nella pagina dipende: fai tasto destro sul video, ispeziona elemento e riporta tutto il codice che ti seleziona sul forum in modo da capire cosa andare a cercare nel codice HTML.
<a href="/watch?v=FBD01hKk4pU" class="yt-uix-sessionlink yt-uix-tile-link yt-ui-ellipsis yt-ui-ellipsis-2 spf-link " data-sessionlink="itct=CDsQ3DAYACITCJuHibK82cwCFS6IwgodClcFkSj0JFIDYW12" title="AMV Rakudai Kishi no Cavalry AMV I Fooled You amv 2015" rel="spf-prefetch" aria-describedby="description-id-424330" dir="ltr">AMV Rakudai Kishi no Cavalry AMV I Fooled You amv 2015</a>
<img src="https://i.ytimg.com/vi/FBD01hKk4pU/hqdefault.jpg?custom=true&w=196&h=110&stc=true&jpg444=true&jpgq=90&sp=68&sigh=Z-a7Iml28J_gwDTxJN9gH_4Vz2s" alt="" width="196" height="110">
Dim i as integer = 0
while(i = 0)
For Each ele As HtmlElement In Webbrowser1.document.Links '' così prendi tutti i link nella pagina
If Ele.GetAttribute("href") = "/watch" Then '' così prendi i solo i link dei video
Ele.InvokeMember("click")
i=1 '' in questo modo gli fai prendere solo il primo link. E' un metodo un po' "triste" ma è quello che mi viene al momento
End If
Next
WebBrowser1.Document.GetElementById("comment-simplebox-create-comment").SetAttribute("value", TextBox1.Text)
Per mettere il codice devo cliccare due volte su Webbrowser e incollo tra "Private Sub Web..." e "End Sub"?Per cliccare il primo link nel webbrowser è questo il codice:
Codice:Dim i as integer = 0 while(i = 0) For Each ele As HtmlElement In Webbrowser1.document.Links '' così prendi tutti i link nella pagina If Ele.GetAttribute("href") = "/watch" Then '' così prendi i solo i link dei video Ele.InvokeMember("click") i=1 '' in questo modo gli fai prendere solo il primo link. E' un metodo un po' "triste" ma è quello che mi viene al momento End If Next
Per aggiungere un commento al link invece il codice è questo:
Codice:WebBrowser1.Document.GetElementById("comment-simplebox-create-comment").SetAttribute("value", TextBox1.Text)
Spero di esserti stato d'aiuto, ti dico in anticipo che i codici forse non funzioneranno perfettamente in quanto li ho scritti in fretta ma adesso sai almeno cosa andare a cerca su google e/o dove andare a modificare.
EDIT: GRAZIE MILLE FUNZIONAAAAAA!Al form load fai caricare la pagine da dove devi prendere il link. Poi crei un button e all'evento click aggiungi il primo codice, poi aspetti che finisce di navigare e fai eseguire l'altro pezzo di codice
Fatto, però ho sempre lo stesso errore.Al posto di textbox1.text devi inserire il messaggio che vuoi immettere nel commento. Altrimenti crei una textbox nel form e all'interno di essa ci metti il commento.
Ma sinceramente da li non capisco l'errore che ti da. Prova a sostituire al posto di textbox1.text la scritta "ciao123" con gli apici compresi se no non te lo prende come testo. Se ti da ancora problemi allora direi che sbagli l'ID dell'oggetto o il value non esiste (strano)
Ma sinceramente da li non capisco l'errore che ti da. Prova a sostituire al posto di textbox1.text la scritta "ciao123" con gli apici compresi se no non te lo prende come testo. Se ti da ancora problemi allora direi che sbagli l'ID dell'oggetto o il value non esiste (strano)