Algemeen forum ontrent de ontwikkelng, design en hosting van weergerelateerde websites (dit laatste om een beetje on topic te blijven)
Door tjabine
#63034
Hallo,

Ik heb al een tijdje een melding in Drupal dat er een foutje zit in een script.
De melding is:Notice: Use of undefined constant r - assumed 'r' in include() (regel 3 van /home/deb49595/domains/weerheerhugowaard.nl/public_html/temptrend.php).

Als ik deze r weg haal krijg ik nog meer errors.
Iemand een idee?

Code: Selecteer alles
<?php

$fp = fopen ("rapporten/downld02.txt",r);                        //submap: "rapporten/downld02.txt"
$content = fread ($fp,filesize("rapporten/downld02.txt"));

$separ_1 = explode("----------\\r\\n",$content);
$separ_2 = explode("\\r\\n----------",$separ_1[1]);
$table =$separ_2[0];                       

//tabel van data begint na de regel met -----

$nb = substr_count($table, "
");                                       //tel aantal regels van downld02.txt

$temparray=array();                       // maak 4 databases
$dauwarray=array();
$baroarray=array();
$vochtarray=array();

#####################################################################################
for ($i=0; $i<$nb+1; $i++)                //lees elke regel 1 voor 1 uit totdat aantal regels is bereikt
{
$line = explode("
",$table);

$temp= substr ($line[$i],17,5);           //variabelen uitlezen : regel,begin,lengte         
array_push($temparray, $temp);            //push van elke regel temperatuur in database
$vocht= substr ($line[$i],39,3);
array_push($vochtarray, $vocht);           
$dauw= substr ($line[$i],44,5);
array_push($dauwarray, $dauw);
$baro= substr ($line[$i],103,6);          //baro staat op pos. 103 met lengte 6
array_push($baroarray, $baro);
}

#####################################################################################

// Lees gewenste data uit databases...
$tijdnu=$i-2;    //nu (regel $tijdnu is de laatste regel van downld02.txt
$tijd5min=$i-3;    //5 min (regel $tijd5min is de een na laatste regel van downld02.txt
$tijd60min=$i-14;    //60 min (regel $tijd60min is de 12e na laatste regel van downld02.txt
//$tijd120min=$i-26;    //120 min (regel $tijd120min is de 24e na laatste regel van downld02.txt
//$tijd180min=$i-38;    //180 min (regel $tijd180min is de 36e na laatste regel van downld02.txt
                  // enz... kies zelf welke regel je wilt!! Verwijder dan de // voor de regel...
                  
#####################################################################################
# Bepaal trend temperatuur (keuze is 5 min)
#####################################################################################

$t1=$temparray[$tijdnu]-$temparray[$tijd5min];     // bereken verschil in temperatuur op gewenste tijd.

//bepaal trend: als temperatuur verschil is kleiner als 0; plaatje is pijlneer. groter als 0 pijlop anders pijlgelijk
 
if($t1 < '0') {$t1pic="pijlneer";}
elseif($t1 > '0') {$t1pic="pijlop";}
else {$t1pic="pijlgelijk";}

#####################################################################################
# Bepaal trend vocht(keuze is 5 min)
#####################################################################################

$t2=$vochtarray[$tijdnu]-$vochtarray[$tijd5min];     // bereken verschil in vocht op gewenste tijd.

//bepaal trend: als vocht verschil is kleiner als 0; plaatje is pijlneer. groter als 0 pijlop anders pijlgelijk
 
if($t2 < '0') {$t2pic="pijlneer";}
elseif($t2 > '0') {$t2pic="pijlop";}
else {$t2pic="pijlgelijk";}

#####################################################################################
# Bepaal trend dauw(keuze is 5 min)
#####################################################################################

$t3=$dauwarray[$tijdnu]-$dauwarray[$tijd5min];     // bereken verschil in vocht op gewenste tijd.

//bepaal trend: als vocht verschil is kleiner als 0; plaatje is pijlneer. groter als 0 pijlop anders pijlgelijk
 
if($t3 < '0') {$t3pic="pijlneer";}
elseif($t3 > '0') {$t3pic="pijlop";}
else {$t3pic="pijlgelijk";}


#####################################################################################
# Bepaal trend baro(keuze is 60 min)
#####################################################################################

$t4=$baroarray[$tijdnu]-$baroarray[$tijd60min];     // bereken verschil in vocht op gewenste tijd.

//bepaal trend: als vocht verschil is kleiner als 0; plaatje is pijlneer. groter als 0 pijlop anders pijlgelijk
 
if($t4 < '0') {$t4pic="pijlneer";}
elseif($t4 > '0') {$t4pic="pijlop";}
else {$t4pic="pijlgelijk";}


?>