Exploitation des données

› Forums › Serveur WES › Installation & Configuration › Exploitation des données

  • Post
    • 12 juin 2020 à 15 h 24 min
    Bill_Baroud
    Participant

      Bonjour,

      je souhaiterai pouvoir exploiter un peu plus finement les données collectées par la WES et je me demandais si une manip « simple » existait pour extraire ces données.
      A la manière de ce que l’on peut trouver en page d’accueil (image en pj).
      Ces données sont parfaites mais il me faut les collecter manuellement jour par jour pour chaque période, ce qui est très long…

      Je connais les fichier CSV de données, je m’en sert régulièrement mais ils sont un peu lourd quand l’analyse concerne un mois ou une année.
      En fait ce que j’aimerai c’est avoir pour chaque jour d’une période :
      conso HP
      conso HC
      conso de chaque pince
      conso pulse

      Quelqu’un a une idée ?

      Petite parenthèse :
      – sur les relevés des pinces en csv on trouve : l’heure, la valeur à l’instant de chaque pince et la valeur d’index de chaque pince (le cumulé)
      – alors que sur les relevés pulse il n’y a que l’heure et la valeur à l’instant, il n’y a pas le cumul. Du coup si on ouvre un fichier on ne sait pas quelle est la valeur de fin de journée, il faut faire une somme des valeurs de la journée.

      Attachments:
      You must be logged in to view attached files.
      0
      0
    Vous lisez 3 fils de discussion
    • Replies
        • 13 juin 2020 à 0 h 06 min
        Bill_Baroud
        Participant

          Problème réglé, artisanalement mais réglé.

          J’ai récupéré les fichiers csv de 2019/2020, j’ai fait une macro VBA sous Excel et les données ont été compilées en quelques minutes.
          Ce n’est pas le plus écologique en temps mais ça fonctionne.

          Je n’y avait pas pensé au départ mais les fichiers csv sont gérés comme des fichier txt par VBA.

          Bref, a défaut d’autre chose ça marche.

          0
          0
          • 13 juin 2020 à 10 h 30 min
          cdlog2
          Modérateur

            Bonjour,

            Vous le savez certainement mais dans le cas contraire, vous pouvez automatiser votre macro VBA. Ci-dessous un exemple d’envoi d’une requête au WES sous VBA pour récupérer le contenu d’un fichier type CSV.  Il suffit de construire le fichier à récupérer > Type/Année/ NomFic ( type – mois – jour . csv ) et de lancer la requête. Puis traiter le contenu rendu par le WES dans votre MAcro.

            ‘ envoie une requête au WES
            ‘ argument = Url du fichier CVS
            Function GetWesCSV(UrlCVS As String)

            Dim wq As WinHttp.WinHttpRequest
            Dim strURL As String, strResp As String

            strURL = « http://login:password@192.168.xx.xx/ »   ‘ login : password @ ip du wes
            strURL = strURL & UrlCVS
            strResp = «  »

            On Error GoTo ERRH
            Set wq = New WinHttpRequest

            ‘ Création requêtte HTTP de type GET
            wq.Open « GET », strURL
            ‘ Envoie de la requête
            wq.Send

            If wq.Status = 200 Then
            ‘ Récupérer le corps de la réponse
            strResp = wq.ResponseText
            Else
            MsgBox wq.Status &  »  » & wq.StatusText, , « Statut renvoyé par serveur »
            End If
            GoTo ENDPROC

            ERRH:
            ‘MsgBox ERR.Description
            MsgBox « Erreur No. » & Err.Number &  » :  » & Err.Description

            ENDPROC:
            Set wq = Nothing
            ‘ return la réponse
            GetWesCSV = strResp

            End Function

            ‘ Macro : traitement des fichiers CVS
            Sub macro_cvs()
            Dim valcvs As String

            ‘ exemple lecture d’un fichier csv type PINCE du 12 avril 2020
            ‘ Url du fichier CSV = Type/Année/NomFic.csv ( type – mois – jour . csv )
            valcvs = GetWesCSV(« PCE/2020/PC-04-12.csv »)  ‘Envoie la requête WES

            ‘ traitement du contenu du  cvs reçu du WES > valcvs
            MsgBox valcvs   ‘Affiche le résultat
            ‘ ….

            End Sub

            cdt

             

            0
            0
            • 13 juin 2020 à 10 h 40 min
            cdlog2
            Modérateur

              RE: attention les guillemets  » sont modifié par l’éditeur du blog. Donc si vous utilisez mon code, corriger manuellement tous les guillemets, sinon vous aurez des erreurs sous VBA

              0
              0
              • 13 juin 2020 à 15 h 02 min
              Bill_Baroud
              Participant

                Cool !! 🙂

                Je ne savais pas que l’on pouvait faire ça, faudra que j’essaye.

                Merci beaucoup !

                0
                0
            Vous lisez 3 fils de discussion
            • Vous devez être connecté pour répondre à ce sujet.