passer une variable à graphweather

[wleger]

Bonjour

J'ai une WS2300 et pour des raisons pratique, je prends mes mesures toutes les 30 min. l'inconvenient c'est que de cette manière j'ai une vitesse du vent qui n'est pas representative.
Je suis donc en train de terminer un script vbs qui va lire le fichier curdat.lst toute les min , relever les valeurs pendant 30 min puis me sortir une moyenne et une Vmax.
Est ce qu'il y a un moyen pour que graphweather utilise ces valeurs et non celles de mon fichier historique.
Peut être un code spécifique dans le xml?

merci de votre aide...

Wilfried

[wleger]

bon , mon pb a pas l'air d'inspirer grand monde...
Vu que graphweather est compatible avec plusieurs stations, est ce que vous savez si certaines fournissent un fichier de données lisibles (c'est pas le cas de la 2300) comme çà je peux pourrais en générer un avec mon script et le traiter avec Graphweather...

Merci

[COULET]

Ton projet est intéressant mais je ne peux pas t'aider car je suis trop "ignare" en programmation !

BONNE ANNÉE !! JOYEUX NOËL !!

[jturlier]

Bonsoir Wilfried,

bon , mon pb a pas l'air d'inspirer grand monde...
Vu que graphweather est compatible avec plusieurs stations, est ce que vous savez si certaines fournissent un fichier de données lisibles (c'est pas le cas de la 2300) comme çà je peux pourrais en générer un avec mon script et le traiter avec Graphweather...

Merci

GW travaille en direct avec certaines stations, mais il peut traiter des fichiers produits par des logiciels de contrôle pour d'autres : par exemple heavyweather ou vws.
tu peux donc toujours générer des fichiers csv ou alors produire une table dans une base de données accessible avec des pilotes ODBC, ce sont les data les moins compliquées à produire, après tu fais ce que tu veux avec dans GW, soit avec le plugin de base, ou alors avec les 2 optionnels pour produire tous les graphiques que tu souhaites.
J'espère que cela a répondu à ta question.


Joyeuses fêtes à toutes et à tous.

[jturlier]

J'oubliais une chose : même si tu as plusieurs échelles pour les axes Y sur un même graphe, tu ne peux avoir qu'une échelle des X, donc tes valeurs moyennes devront avoir les mêmes dates et heures que celles utilisées par tes autres courbes.

[wleger]

merci pour tes réponses , je vais essayer de generer un csv. je verrais si j'arrive à le faire traiter par graphweather. je te solliciterai peut être plus tard.

[jturlier]

Bonsoir Wilfried, quand tu veux !
Au fait tu dis travailler en VBS -> VB.Net je suppose et quelle version ?

[wleger]

ben je suis désolé çà fait pas longtemps que je m'y suis mis et je sais pas du tout quelle version de vbs çà peut être...
c'est reconnu nativement par xp , et je developpe direct sous notepad...

ci dessous, un petit script qui m'envoi un mail lorsque la temperature est inferieure à 2°C
comme je suis chez orange , je peux recevoir une alerte SMS pour certains mails que j'ai paramètrée, du coup je suis informé sur mon tel qu'il fait froid et que je peux prévoir une bouteille d'eau chaude pour dégeler mon parebrise...


'envoi de mail météo

Dim objFSO,f,i,out_temp,message,tempo,tempo2

Const fichier = "F:\HeavyWeather\currdat.lst"
Const ForReading=1

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set f = objFSO.OpenTextFile(fichier,ForReading)
i=1

Do Until f.AtEndOfStream

ligne = f.Readline


if i=29 Then

tempo=split(ligne,chr(0034))
tempo2=split(tempo(1),chr(0046))
out_temp=tempo2(0)&chr(0044)&tempo2(1)
temp=csng(out_temp)
End If
i=i+1

Loop
if temp<=2 Then
message="La temperature est de " &out_temp& "deg C. Il y a un risque de gel"
With CreateObject("CDO.Message")
.From="meteo@toto.fr"
.To="meteo@orange.fr"
.Subject="gel"
.TextBody= message
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.orange.fr"
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Configuration.Fields.Update
On Error Resume Next
.Send
On Error GoTo 0
end with
End if

[jturlier]

Bonsoir Wilfried,
Merci pour l'info, je n'ai jamais essayé de faire tourner du VB non compilé sous XP ou Vista, je vais regarder.
On peut sans doute utiliser le concept pour écrire des scripts rapides pour traiter des tâches à des heures prédéfinies.