Script VB : requete sqlite

[solo]

Bonjour,

J'aimerai me faire une macro VB pour aller compter dans l'historique le nombre de fois que j'ai éteint et allumé les radiateurs dans une journée, afin de calculer avec les dates le temps moyen et total d'allumage des radiateurs au quotidien.

J'ai regardé la base sqlite, j'ai toutes les infos, hélas dès que je mets du code lié à sqlite la macro ne s'exécute pas

Mon code lié à sqlite :

Code: Tout sélectionner

Imports System.Data
...
Dim maQuery As String = "SELECT dateheure, valeur FROM historiques WHERE device_id=""4a7a0f7f-2664-4c48-ac62-b3b711c4c783"" AND date(dateheure) >= date('now', '-1 day')"
Dim retourQuery As System.Data.DataTable = Serveur.RequeteSqLHisto("123456789", maQuery)


Et le retour :

Code: Tout sélectionner

ERREUR   SCRIPT   ExecuteScript   Erreur lors de l'execution du script: Line>12, L'espace de noms ou le type spécifié dans les Imports 'System.Data' ne contient aucun membre public ou est introuvable.

La ligne 12 correspond à Imports System.Data

Si j'enlève cette ligne, ça donne :

Code: Tout sélectionner

Erreur lors de l'execution du script: Line>41, Type 'System.Data.DataTable' non défini.

La ligne 41 correspond à Dim retourQuery As System.Data.DataTable = Serveur.RequeteSqLHisto("123456789", maQuery)

Quelqu'un aurait une idée ?

Merci !

[Néo32]

Bonsoir Solo,

Je viens de posé la question au dév, il devrait revenir vers toi rapidement

Pascal

[solo]

Bonsoir et merci

J'ai tenté aussi de tout déclarer en objet, mais ça ne passe pas non plus :

Code: Tout sélectionner

SCRIPT   ExecuteScript   Erreur lors de l'execution du script: Line>41, Une référence à l'assembly 'System.Data, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' contenant le type 'System.Data.DataTable' est requise. Ajoutez-en une à votre projet.

Ligne 41 étant :

Code: Tout sélectionner

Dim retourQuery As Object = Serveur.RequeteSqLHisto("123456789", maQuery)

[davidinfo]

Je viens d'envoyer en release une nouvelle version de homidom.dll, peux tu essayer stp ?
Pour info, les imports, ca doit être fait du coté du serveur, les scripts VB ne peuvent le faire... J'ai donc rajouter le system.data pour pouvoir utiliser les datatables.

Je n'ai pas fait de tests donc je te laisse vérifier cela et me tenir au courant stp ?

[solo]

J'ai testé, ça ne marche pas, en fait les macros VB ne marchent plus : Erreur Line>0, impossible de trouver la bibliothèque 'System.data'

[davidinfo]

Oups, erreur de ma part, peux tu retester stp avec la version en release (1743) ?

[solo]

Pas de souci je teste ce soir.

[solo]

Nickel ça marche parfaitement, merci beaucoup

Je n'ai plus qu'à finir ma macro.

[davidinfo]

Cool amuse toi bien
Et n'hésite pas a partager ton script sur un nouveau post avec quelques explications, ca interressera d'autres utilisateurs à coup sur.