Einzelnen Beitrag anzeigen
  #16 (permalink)  
Alt 16.08.10, 22:04
Benutzerbild von Rubberduck
Rubberduck Rubberduck ist offline
Senior Member
 
Registriert seit: Sep 2007
Ort: Niederösterreich
Beiträge: 301
Standard

Hi teebeutel,

Hier mal ein paar Zeilen als Vorlage

PHP-Code:
<?

    $mon_ger 
= array("Jan" => "Jan""Feb" => "Feb""Mar" => "Mrz""Apr" => "Apr""May" => "Mai""Jun" => "Jun""Jul" => "Jul""Aug" => "Aug""Sept" => "Sep""Oct" => "Okt""Nov" => "Nov""Dec" => "Dez");


   
$filename "C:/Programme/Cumulus/data/".$mon_ger[date("M")].date("y")."log.txt";
   echo (
$filename."\n");

    
//File öffnen
   
$handle fopen($filename,"r");
   
//File nicht gefunden?
   
if (!$handle) echo ("PCE-FWS20 File not found");
   
   
//Gehe alle Datensätze durch
   
while ($line fgets($handle))
   {
      if (
strlen($line) > 10)
        {
          
//Datenzeile zerlegen
          
$parameter explode(";"$line);
          
//Zeile enthält Parameter?
          
if (count($parameter) == 17)
            {
//                echo ($parameter[0]." ".$parameter[1]."\n");
            
}
        }
    }

   
fclose($handle);

    echo (
$parameter[0]." ".$parameter[1]."\n");

    
SetValue(39217 /*[Wetter\PCE-FWS20\Temperatur]*/,$parameter[2]);
    
SetValue(34858 /*[Wetter\PCE-FWS20\Feuchte]*/,$parameter[3]);
    
SetValue(20995 /*[Wetter\PCE-FWS20\Taupunkt]*/,$parameter[4]);
    
SetValue(57106 /*[Wetter\PCE-FWS20\Wind]*/,$parameter[5]);
    
SetValue(10451 /*[Wetter\PCE-FWS20\Wind_max_10]*/,$parameter[6]);
    
SetValue(34142 /*[Wetter\PCE-FWS20\Windrichtung]*/,$parameter[7]);
    
SetValue(52299 /*[Wetter\PCE-FWS20\Regen]*/,$parameter[8]);
    
SetValue(32490 /*[Wetter\PCE-FWS20\Regen_Tag]*/,$parameter[9]);
    
SetValue(42718 /*[Wetter\PCE-FWS20\Luftdruck]*/,$parameter[10]);
//    SetValue(,$parameter[11]);
    
SetValue(46891 /*[Wetter\PCE-FWS20\Temperatur_Innen]*/,$parameter[12]);
    
SetValue(53292 /*[Wetter\PCE-FWS20\Feuchte_Innen]*/,$parameter[13]);
    
SetValue(53981 /*[Wetter\PCE-FWS20\Wind_max_zuletzt]*/,$parameter[14]);
    
SetValue(51278 /*[Wetter\PCE-FWS20\Wind_Chill]*/,$parameter[15]);
    
SetValue(20255 /*[Wetter\PCE-FWS20\Heat_Index]*/,$parameter[16]);


?>
Ist noch ziemlich "quick and dirty". Funktioniert aber ganz gut.

@dac: Ich hab das Ding zwar noch nicht auf einem Mast, sondern samt mitgelieferter Stange in einem Sonnenschirmständer auf der Terrasse stehen, aber die letzten nicht gerade harmlosen Stürme haben das Ding nicht beeindruckt. Und auch der Regen mit einer kurzen Spitze von 86l/qm war kein Problem.
__________________
Vielen Dank für das Lesen dieses Textes. Sie haben ein paar Bytes sehr glücklich gemacht...
Mit Zitat antworten