Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 12
  1. #1

    Come Estrarre Dati Relativi Ad Una Pagina Meteo con questo mio link

    Buon Giorno a Tutti mi chiamo Maurizio
    E il mio problema e questo:
    Usando un foglio di Excel con Microsoft Office 2007
    Sto tentando di recuperare dei dati da una pagina web inerente alle Previsioni meteo.
    Ora come primo approccio non mi sembra che le cose vadino poi cosi tanto male.
    Però il problema e che non riesco ad estrarre i dati veri e propri
    Come ad Esempio : L'indicazione del tempo attuale ho le (Min e Max) ecc...!
    Potreste voi gentilmente apportare alcune modifiche al mio progetto in modo che io possa capire sulla base pratica dove stò sbagliando.
    Grazie per tutto l'aiuto che vorrete darmi in merito .
    Saluti sinceri da A.Maurizio

    (P.S) Il link Per Scaricare il mio progetto di prova e questo :
    https://app.box.com/s/nx1pbac4r8v87sf0skzhoyf9jnkxwzmw
    A.Maury1704

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    23,875
    Quote Originariamente inviata da A.Maurizio Visualizza il messaggio
    Potreste voi gentilmente apportare alcune modifiche al mio progetto in modo che io possa capire sulla base pratica dove stò sbagliando.
    No, non è questo il modo di porre discussioni all'interno di questo forum: non è corretto indicare la problematica da risolvere, costringere gli utenti a scaricare un documento che magari un domani verrà rimosso e delegare a loro l'azione di modifica del software e la spiegazione in toto delle motivazioni per cui hanno fatto una correzione piuttosto che un'altra.

    Leggi il Regolamento di quest'area del forum e segui le norme descritte al suo interno.

    In particolare, occorre indicare con precisione qual è l'errore ottenuto o il comportamento anomalo e, in secondo luogo, riportare la parte di codice rilevante o quella relativo al problema sul forum, in modo che tutti possano vederlo e dare suggerimenti su come correggerlo, correzioni che dovrai apportare tu aggiornando poi il thread di conseguenza sull'avanzamento della risoluzione del problema.

    Per favore, aggiungi quindi le informazioni mancanti come indicato.

    Ciao!
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Homepage | Blog | Delphi Podcast | Altri link...

  3. #3
    Ciao Marco Chiedo umilmente scusa per l'accaduto
    Ma non era mia intenzione ; E ti prego di credermi
    Creare dei dissensi e malumori nel vostro forum.

    Ho semplicemente Trattato il tutto come in un qualunque altro forum che ho avuto a che fare in passato; Tutto qui !
    Pertanto chiedo nuovamente scusa
    E vi chiedo di spiegarmi bene cosa e meglio che fare in questi casi; In modo tale da non incorrere in altri dissapori nei vostri confronti tutto qui.

    In pratica con questo mio Progetto , mi stò accingendo a voler
    estrappolare con questo codice

    codice:
    Sub m()On Error GoTo 1
        Dim oggCol As Object
        Dim copy As String
        Dim i As Long
        
        x = Foglio1.Range("I1").Value
        
         URL = "https://www.3bmeteo.com/meteo/" & x & ""
            Set IE = CreateObject("InternetExplorer.Application")
    
    
        With IE
           .Visible = 1
           .navigate URL
          While .Busy Or .readyState <> 4
            DoEvents
          Wend
        End With
        
    Dim prima() As String
        Set oggCol = IE.Document.getElementsByClassName("row")
          Sheets("Foglio1").Range("D10").Select
             i = 0: riga = 10: col = 4
           While i < oggCol.Length
            If oggCol(i).className = "row" Then
              copy = oggCol(i).innerText
              prima = Split(copy, " ")
              
              Cells(riga + 1, col) = oggCol(i).Children(1).innerText
              
               n = 2: s = 4: p = 6: o = 8: t = 10
                Cells(riga, col).Value = prima(n - 1)
                Cells(riga + 3, col).Value = prima(s - 2)
                Cells(riga + 4, col).Value = prima(p - 3)
                
                Cells(riga + 5, col).Value = prima(o - 4)
                Cells(riga + 6, col).Value = prima(t - 5)
                
              col = col + 1
            End If
               i = i + 1
            Wend
        
        'ie.Quit
        Set IE = Nothing
        Set oggCol = Nothing
    1:
    I soli dati Reali delle previsioni Meteo del Momento
    Ha me basterebbe anche solo la prima riga di dati ; Come si vede in questa immagine:
    Prev_1_°C_1.jpg
    Tutto qui
    Ciao e nuovamente grazie
    A.Maury1704

  4. #4
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    23,875
    Quote Originariamente inviata da A.Maurizio Visualizza il messaggio
    Ma non era mia intenzione ; E ti prego di credermi
    Creare dei dissensi e malumori nel vostro forum.
    [...]
    Pertanto chiedo nuovamente scusa
    E vi chiedo di spiegarmi bene cosa e meglio che fare in questi casi; In modo tale da non incorrere in altri dissapori nei vostri confronti tutto qui.
    Non è successo niente di grave: sono solo intervenuto per spiegare la modalità corretta di aprire le discussioni all'interno del forum.

    Direi che ora i dettagli ci sono, magari quindi qualcuno sarà anche più incentivato a partecipare.

    Ciao!
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Homepage | Blog | Delphi Podcast | Altri link...

  5. #5
    [QUOTE=alka;25561383]Non è successo niente di grave: sono solo intervenuto per spiegare la modalità corretta di aprire le discussioni all'interno del forum.

    Direi che ora i dettagli ci sono, magari quindi qualcuno sarà anche più incentivato a partecipare.

    Ciao![Marco come sempre sei una persona squisita e sincera; Grazie per la tua puntualizzazione in merito hai miei errori.
    Spero solo che si possa risolvere il tutto nel frattempo io continuerò a provare a porre modifiche al caso ; Chissà che ne possa venire fuori qualche cosa di valido.
    Saluti sinceri e Buona Pasqua a tutti voi da A.Maurizio /QUOTE]
    A.Maury1704

  6. #6
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,347
    Ma non avevi risolto due anni fa

    https://m.pierotofy.it/p/forum/69/10...cel_ho_il_vb6/

    ?

    Ogni tanto torni all'attacco? :-)

    P.S. Sul fatto di "trattare tutto come su qualsiasi altro forum" ti faccio notare che in tanti altri, compreso questo

    https://masterdrive.it/microsoft-acc...89/#post375985

    ti hanno detto che non si lascia il codice da scaricare agli utenti, mollando il problema e basta.
    Ultima modifica di oregon; 27-03-2021 a 17:17
    No MP tecnici (non rispondo nemmeno!), usa il forum.

  7. #7
    [QUOTE=oregon;25561417]Ma non avevi risolto due anni fa

    https://m.pierotofy.it/p/forum/69/10...cel_ho_il_vb6/

    ?

    Ogni tanto torni all'attacco? :-)

    P.S. Sul fatto di "trattare tutto come su qualsiasi altro forum" ti faccio notare che in tanti altri, compreso questo

    https://masterdrive.it/microsoft-acc...89/#post375985

    ti hanno detto che non si lascia il codice da scaricare agli utenti, mollando il problema e basta.[Ciao Oregon
    Scusami ma questa Volta non ti capisco; in quanto.
    !) questo progetto lo voluto riprendere, in quanto Non sono mai Riuscito a Risolverlo:
    E che mi ricorda Io nessuno di voi sia mai riuscito a darmi nel concreto una soluzione Valida.
    2) Non e il primo Forum che condivido i miei lavori o le mie richieste:
    Ma anche qui non ho mai trovato nessuna difficolt� sia nel mettere il mio lavoro di prova; Che semplicemente il codice scritto.
    Per me sinceramente parlando quello che sostienu tu ; Mi giunge nuova.
    4) Detto ci� ieri sono stato ripreso da Marco che tra le altre cose Saluto.
    E pensavo che subito dopo il suo intervento fosse stato risolto tutto il problema.
    Ora posso sapere cosa c'� che non va.
    IOn modo che si possa chiarire una volta per tutte queste tue uscite o dispute nei miei confronti.
    Non penso di averti mai mancato di rispetto.
    Pertanto esigo una spiegazione logica e coerente con quanto detto sino ad ora, Perch� Ripeto : Questo tuo atteggiamento da sovranista nei miei confronti ; Proprio non lo capisco.
    Se non vi interessa aiutarmi nella mia richiesta.
    Non e il caso di farla tanto lunga; Mi basta che mi diciate che non vi interessa.
    E va bene cosi.
    Ma sentirmi sempre Denigrare in questo modo da uno che neppure conosco.
    Il tutto mi sembra un po' troppo /QUOTE]
    Comunque Ciao e Buona Serata a Tutti Voi Dello Staff
    A.Maury1704

  8. #8
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,347
    Ti ho solo scritto che tu avevi detto

    Ho Già risolto da me il mio problema

    e quindi ti chiedevo come mai facessi nuovamente la domanda.

    Per il resto, come altre volte, non ho capito cosa hai detto o chiesto ed è per questo che non ti vengono proposte soluzioni.

    Magari se commentassi le righedel codice per spiegarci cosa fanno e dove hai problemi/errori, quali errori ... forse avresti qualche suggerimento (ovviamente nessuno scriverebbe il codice al posto tuo, il programma lo devi scrivere tu ....).

    Buon lavoro comunque ...
    Ultima modifica di oregon; 27-03-2021 a 18:47
    No MP tecnici (non rispondo nemmeno!), usa il forum.

  9. #9
    Comunque Oregon Ho dato un occhiata al Link che mi hai inserito tu nel post : Ed è come sostenevo io
    E vero che gira che ti rigira Tutti questi Link Sulle Previsioni Meteo si Assomigliano Tutte.
    Però nel mio ultimo caso; non stiamo Parlando dello stesso link.
    Ho delle stesse Previsioni Meteo Tutto qui.
    Comunque non è successo nulla; Non te la Prendere, Se non volete la mia presenza ho non volete più aiutarmi non importa basta dirlo.
    Come si dice in questi casi : Morto un Papa se nè fa un altro no ?
    Ciao e Buona Pasqua a Tutti
    A.Maury1704

  10. #10
    Oregon Ti pare che sè io avessi risolto questo problema ; Lo avrei riproposto ?
    A.Maury1704

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2021 vBulletin Solutions, Inc. All rights reserved.