Parser til at hente skema

Hvordan skal info deles op?
Her er en start:

<?php

function line_number($var, $start=0) {
global $url;
    for($i = $start; $i < count($url); $i++) {
        if(preg_match($var, $url[$i])) {
        return $i;
        }
    }
}

$url_page = "http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940";
$url = @file($url_page);

    if($url) {

    $start = line_number("<span id=\"skemaspanSkema1\">");
    $slut = line_number("</span>", $start);

        for($i = $start; $i < $slut; $i++) {
        echo $url[$i];
        }

    }else{
    echo"Fejl! <b>". $url_page ."</b> kan ikke læses!";
    }
?>

Hver time skal sættes i en tabel i en MySQL database. En time sammen med det modul den ligger i, sammen med dag og tidspunkt.

Det ser jo rigtig godt ud.. Er du interesseret i at lave parseren færdig? Så er de 300 kr dine:)

Bjarne, kik om funktionen "lectio" under lektieportal er noget for dig
www.plazm.dk

Hehe, så lige, du går da to klasser under mig ;)

plazm> tak for tilbudet, men det har umiddelbart ikke nogen interesse. Jeg er interesseret i en parser til lektioskemaet:)

bjarne, det er jo netop det der er, hvis du kikkede efter ;)
men her kommer koden om ikke andet.
Jeg ved godt min databasestruktur kunne være bedre, men det var nu engang sådan jeg fik lyst til at lave det :p

<?php
  include("../../include/config.php");
  if (!isset($_SESSION["brugerid"])) return true;
  $lines = file($_POST["uri"]);
  $dag=1;
  include("timeoversigt.php");
  foreach ($lines as $line_num => $line) {
    if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
      $linie = explode(" ",strip_tags($line));
      $fag = explode("-",$linie[1]);
      $skema[$dag][count($skema[$dag])] = $fag[0];
      $laerer[$dag][count($laerer[$dag])] = $fag[1]; // Indeholder laerer IKKE I BRUG
      $lokale[$dag][count($lokale[$dag])] = $fag[2]; // Indeholder lokale IKKE I BRUG
      $dag++;
      if ($dag == 6) $dag=1;
    }
    elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
      $linie = explode(" ",str_replace("modul","",strip_tags($line)));
      $klokken = explode("-",$linie[1]);
      $start[] = $klokken[0];
      $slut[] = $klokken[1];
    }
  }
  opendb();
  $sqlquery = "SELECT * FROM skoleskema WHERE brugerid='".$_SESSION["brugerid"]."'";
  $result = mysql_query($sqlquery) or die(mysql_error());
  $info = mysql_fetch_array($result);
  if (!$info["brugerid"]) {
    $sqlquery = "INSERT INTO skoleskema (brugerid) VALUES ('".$_SESSION["brugerid"]."')";
    mysql_query($sqlquery);
  }
  $update = "UPDATE skoleskema set ";
  $dage = Array("mandag","tirsdag","onsdag","torsdag","fredag");
  for($time=1;$time<10;$time++){
    $update .= "`start-".$time."` = '".addslashes($start[($time - 1)])."', ";
    $update .= "`slut-".$time."` = '".addslashes($slut[($time - 1)])."', ";
    for($dag=0;$dag<5;$dag++) {
      $update .= "`".$dage[$dag]."-".$time."` = '".addslashes(fkt2fag($skema[($dag + 1)][($time - 1)]))."', ";
    }
  }
  $update = substr($update, 0, -2);
  $update .= " WHERE brugerid = '".$_SESSION["brugerid"]."'";
  mysql_query($update);
  header("location: ../../lektie/vis-skema/");
?>


timeoversigt.php indeholder følgende:
<?php
$timer = array(
"Fri" => array(""),
"Matematik" => array("MAx","MA","maA"),
"Samfundsfag" => array("SAx","saC"),
"Musik" => array(" "),
"Salg og Service" => array(" "),
"Dansk" => array("dax","daA"),
"Fysik" => array("FYx","fyB"),
"Psykologi" => array("Ps"),
"Drama" => array("Dr"),
"Engelsk" => array("ENx","enB"),
"Kemi" => array("KEx","KEM","keB"),
"Filosofi" => array("Fi"),
"Billedkunst" => array(" "),
"Byggeri og Energi" => array("TKbx"),
"Tysk" => array("TYx"),
"Biologi" => array("BIx","biB"),
"Historie" => array(" "),
"Film og Tv" => array(" "),
"Informations- Teknologi" => array("Inx"),
"Fransk" => array(" "),
"Naturfag" => array(" "),
"Oldtids- Kundskab" => array(" "),
"Astronomi" => array(" "),
"Erhvervs- Økonomi" => array(" "),
"Latin" => array(" "),
"Geografi" => array(" "),
"Religion" => array(""),
"Tværfag" => array(" "),
"Afsætning" => array(" "),
"Spansk" => array(" "),
"Teknologi" => array("TEx"),
"Teknologi- Historie" => array("Hix"),
"Service og Kommunikation" => array("TKsx"),
"Datalogi" => array("Dl"),
"National- Økonomi" => array("N&#248;x"),
"Andet" => array(" ")
);
function fkt2fag($fkt) {
  global $timer;
  foreach($timer as $time => $navne) {
    if(in_array($fkt, $navne)) { $var = $time; break; }
  }
  if (isset($var)) return $var;
  else return $fkt;
}
?>

$lines = file($_POST["uri"]);
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    $skema[$dag][count($skema[$dag])] = $fag[0];
    $laerer[$dag][count($laerer[$dag])] = $fag[1]; // Indeholder laerer IKKE I BRUG
    $lokale[$dag][count($lokale[$dag])] = $fag[2]; // Indeholder lokale IKKE I BRUG
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}

er sådan set det eneste du skal bruge :)

plazm: Undskyld, jeg misforstod dig komplet. Jeg har siddet og leget med din kode i en times tid nu. Jeg kan simpelthen ikke få den til at virke. Jeg må indrømme at jeg ikke umiddelbart kan gennemskue koden. Og det virker selvfølgelig ikke bare at copy ´n' paste koden. Får bare en lang række errors Undefined variable: skema, Undefined offset: 2 osv.
Hvordan får du koden til at "se" fx ændringer i skemaet?

Eller sagt på en anden måde: Kunne du ikke have lyst til at ligge en lille forklaring ved koden:)

Hej Bjarne.
Har du tjekket at du har noget i $_POST["uri"], da det er i den variabel lectios addresse vil være. Prøv at skifte den til om ikke andet.
$lines = file("http://lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362671335");

Scriptet løber så hele den side igennem efter et tabel-felt med enten et "fag" eller et klokkeslet.
Når du vil give noget info ud fra scriptet så kan du hente mandagens timer i
$skema[1][0] = 1. time mandag
$skema[1][0] = 2. time mandag
$skema[2][0] = 1. time tirsdag
hvis du har forstået systemet.
Starttidspunktet og sluttidspunktet af 1. Modul vil du så kunne hente i henholdsvis
$start[0]
$slut[0]

Du kan evt. kontakte mig via msn på nittebarn _ at _ gmail _ com

ja ok. de fejl jeg får er notice fejl:)

Der er et lille problem med parseren:

Hvis jeg skriver $skema[1][2] får jeg iv. Og det er jo faktisk forkert da timen er ændret til bi

Det havde jeg faktisk overset :)
Ændret nu:
$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?$fag[0]:$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[0] == ""?$fag[1]:$altfag[1]);
    $lokale[$dag][count($lokale[$dag])] = ($altfag[0] == ""?$fag[2]:$altfag[2]);
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}

hmm, det er lige ved at være der, men der er alligevel lidt fejl:

<?php
$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    @$linie = explode(" ",strip_tags($line));
    @$fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">")) {
    @$linie = explode(" ",strip_tags($lines[$line_num + 2]));
    @$altfag = explode("-",$linie[1]); }
    @$skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?$fag[0]:$altfag[0]);
    @$laerer[$dag][count($laerer[$dag])] = ($altfag[0] == ""?$fag[1]:$altfag[1]);
    @$lokale[$dag][count($lokale[$dag])] = ($altfag[0] == ""?$fag[2]:$altfag[2]);
    @$dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    @$linie = explode(" ",str_replace("modul","",strip_tags($line)));
    @$klokken = explode("-",$linie[1]);
    @$start[] = $klokken[0];
    @$slut[] = $klokken[1];
  }
}

echo '1. '.$skema[1][0].'<br />';
echo '2. '.$skema[1][1].'<br />';
echo '3. '.$skema[1][2].'<br />';
echo '4. '.$skema[1][3].'<br />';
echo '5. '.$skema[1][4].'<br />';
echo '6. '.$skema[1][5].'<br />';
echo '7. '.$skema[1][6].'<br />';
echo '8. '.$skema[1][7].'<br />';
echo '9. '.$skema[1][8].'<br />';

?>

giver:
1. saC
2. saC
3. biB
4. biB
5. biB
6. keB
7. fyB
8. vp
9. vp

Der burde stå:
1. saC
2. saC
3. biB
4. DaA
5. biB
6. fyB
7. fyB
8.
9.

$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    unset($altfag);
    unset($fag);
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=changedlesson")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=lektionCls")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $fag2 = explode("-",$linie[1]); }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && strstr($lines[$line_num + 2],"<div")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 4]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 6]));
      $altfag[2] = strip_tags($lines[$line_num + 8]);
    }
    if (strstr($line,"class=lektionCls") && strstr($lines[$line_num + 2],"<td valign=middle nowrap align=center>")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 2]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 4]));
      $altfag[2] = strip_tags($lines[$line_num + 6]);
    }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?($fag2[0] == ""?$fag[0]:$fag[0]." ".$nyfag[0]):$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[1] == ""?($fag2[1] == ""?$fag[1]:$fag[1]." ".$nyfag[1]):$altfag[1]); // Indeholder laerer IKKE I BRUG
    $lokale[$dag][count($lokale[$dag])] = ($altfag[2] == ""?($fag2[2] == ""?$fag[2]:$fag[2]." ".$nyfag[2]):$altfag[2]); // Indeholder lokale IKKE I BRUG
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}

så tror jeg vi er der :)

nej, var vi ikk :( 2sek.

Jo, det var vi :)

sad og kikkede på forkerte skema her til sidst ;)

hehe, ok... Jeg kan også kun finde en fejl.. Scriptet medtager timer som er blevet aflyst. Ellers virker det da bare helt perfekt.

$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    unset($altfag);
    unset($fag);
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=changedlesson")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=lektionCls")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $fag2 = explode("-",$linie[1]); }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && strstr($lines[$line_num + 2],"<div")) {
    echo $line_num."<br>";
      $temp = explode(" ",strip_tags($lines[$line_num + 4]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 6]));
      $altfag[2] = strip_tags($lines[$line_num + 8]);
    }
    if (strstr($line,"class=lektionCls") && strstr($lines[$line_num + 2],"<td valign=middle nowrap align=center>")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 2]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 4]));
      $altfag[2] = strip_tags($lines[$line_num + 6]);
    }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && !strstr($lines[$line_num + 2],"<div")) {
      unset($fag);   
    }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?($fag2[0] == ""?$fag[0]:$fag[0]." ".$nyfag[0]):$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[1] == ""?($fag2[1] == ""?$fag[1]:$fag[1]." ".$nyfag[1]):$altfag[1]); // Indeholder laerer IKKE I BRUG
    $lokale[$dag][count($lokale[$dag])] = ($altfag[2] == ""?($fag2[2] == ""?$fag[2]:$fag[2]." ".$nyfag[2]):$altfag[2]); // Indeholder lokale IKKE I BRUG
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}
foreach($skema as $dagnr => $dag) {
  echo "<br />".$dagnr."<br>";
  foreach($dag as $timenr => $time) {
    echo $time."<br>".$laerer[$dagnr][$timenr]."<br>".$lokale[$dagnr][$timenr]."<br><br>";
  }
}

$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    unset($altfag);
    unset($fag);
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=changedlesson")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=lektionCls")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $fag2 = explode("-",$linie[1]); }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && strstr($lines[$line_num + 2],"<div")) {
    echo $line_num."<br>";
      $temp = explode(" ",strip_tags($lines[$line_num + 4]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 6]));
      $altfag[2] = strip_tags($lines[$line_num + 8]);
    }
    if (strstr($line,"class=lektionCls") && strstr($lines[$line_num + 2],"<td valign=middle nowrap align=center>")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 2]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 4]));
      $altfag[2] = strip_tags($lines[$line_num + 6]);
    }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && !strstr($lines[$line_num + 2],"<div")) {
      unset($fag); 
    }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?($fag2[0] == ""?$fag[0]:$fag[0]." ".$nyfag[0]):$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[1] == ""?($fag2[1] == ""?$fag[1]:$fag[1]." ".$nyfag[1]):$altfag[1]); // Indeholder laerer IKKE I BRUG
    $lokale[$dag][count($lokale[$dag])] = ($altfag[2] == ""?($fag2[2] == ""?$fag[2]:$fag[2]." ".$nyfag[2]):$altfag[2]); // Indeholder lokale IKKE I BRUG
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}

er egentligt det eneste du skal bruge, det andet var bare noget debug :)

Der var lige sneget sig en lille fejl mere ind.

$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    unset($altfag);
    unset($fag);
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=changedlesson")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=lektionCls")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $fag2 = explode("-",$linie[1]); }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && strstr($lines[$line_num + 2],"<div")) {
    echo $line_num."<br>";
      $temp = explode(" ",strip_tags($lines[$line_num + 4]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 6]));
      $altfag[2] = strip_tags($lines[$line_num + 8]);
    }
    if (strstr($line,"class=lektionCls") && strstr($lines[$line_num + 2],"<td valign=middle nowrap align=center>")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 2]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 4]));
      $altfag[2] = strip_tags($lines[$line_num + 6]);
    }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && !strstr($lines[$line_num + 2],"<div")) {
      unset($fag);
    }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?($fag2[0] == ""?$fag[0]:$fag[0]." ".$fag2[0]):$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[1] == ""?($fag2[1] == ""?$fag[1]:$fag[1]." ".$fag2[1]):$altfag[1]);
    $lokale[$dag][count($lokale[$dag])] = ($altfag[2] == ""?($fag2[2] == ""?$fag[2]:$fag[2]." ".$fag2[2]):$altfag[2]);
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}

dit sidste bugfix har desværre ført lidt fejl med sig. Det udskriver vp ved de steder, hvor der ikke er påsat timer

$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    unset($altfag);
    unset($fag);
    unset($fag2);
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=changedlesson")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=lektionCls")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $fag2 = explode("-",$linie[1]); }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && strstr($lines[$line_num + 2],"<div")) {
    echo $line_num."<br>";
      $temp = explode(" ",strip_tags($lines[$line_num + 4]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 6]));
      $altfag[2] = strip_tags($lines[$line_num + 8]);
    }
    if (strstr($line,"class=lektionCls") && strstr($lines[$line_num + 2],"<td valign=middle nowrap align=center>")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 2]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 4]));
      $altfag[2] = strip_tags($lines[$line_num + 6]);
    }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && !strstr($lines[$line_num + 2],"<div")) {
      unset($fag);
    }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?($fag2[0] == ""?$fag[0]:$fag[0]." ".$fag2[0]):$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[1] == ""?($fag2[1] == ""?$fag[1]:$fag[1]." ".$fag2[1]):$altfag[1]);
    $lokale[$dag][count($lokale[$dag])] = ($altfag[2] == ""?($fag2[2] == ""?$fag[2]:$fag[2]." ".$fag2[2]):$altfag[2]);
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}

Sådan, nu burde den være der :)

tror nu der er en lille fejl stadig:)
Dagene er forrykkede. Jeg kan godt rykke dem, men jeg kan ikke få scriptet til at vise mandag

Øhh, er du sikker på det? for jeg har lige c/p'et det og det virker fint:

<?php
$lines = file("http://www.lectio.dk/lectio/263/SkemaGenerator.aspx?type=elev&id=1362670940");
$dag=1;
foreach ($lines as $line_num => $line) {
  if (strstr($line,"<td valign=\"top\" align=\"center\" bgcolor=\"#ffffff\"")) {
    unset($altfag);
    unset($fag);
    unset($fag2);
    $linie = explode(" ",strip_tags($line));
    $fag = explode("-",$linie[1]);
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=changedlesson")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $altfag = explode("-",$linie[1]); }
    if (strstr($lines[$line_num + 2],"<div title=\"\">") && strstr($lines[$line_num + 2],"class=lektionCls")) { $linie = explode(" ",strip_tags($lines[$line_num + 2])); $fag2 = explode("-",$linie[1]); }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && strstr($lines[$line_num + 2],"<div")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 4]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 6]));
      $altfag[2] = strip_tags($lines[$line_num + 8]);
    }
    if (strstr($line,"class=lektionCls") && strstr($lines[$line_num + 2],"<td valign=middle nowrap align=center>")) {
      $temp = explode(" ",strip_tags($lines[$line_num + 2]));
      $altfag[0] = $temp[1];
      $altfag[1] = strip_tags(str_replace("<br>"," ",$lines[$line_num + 4]));
      $altfag[2] = strip_tags($lines[$line_num + 6]);
    }
    if (strstr($line,"class=changedaflystlesson") && $altfag[0] == "" && !strstr($lines[$line_num + 2],"<div")) {
      unset($fag);
    }
    $skema[$dag][count($skema[$dag])] = ($altfag[0] == ""?($fag2[0] == ""?$fag[0]:$fag[0]." ".$fag2[0]):$altfag[0]);
    $laerer[$dag][count($laerer[$dag])] = ($altfag[1] == ""?($fag2[1] == ""?$fag[1]:$fag[1]." ".$fag2[1]):$altfag[1]);
    $lokale[$dag][count($lokale[$dag])] = ($altfag[2] == ""?($fag2[2] == ""?$fag[2]:$fag[2]." ".$fag2[2]):$altfag[2]);
    $dag++;
    if ($dag == 6) $dag=1;
  }
  elseif(strstr($line,"<td bgcolor=\"#f8f8f8\" valign=\"top\">")) {
    $linie = explode(" ",str_replace("modul","",strip_tags($line)));
    $klokken = explode("-",$linie[1]);
    $start[] = $klokken[0];
    $slut[] = $klokken[1];
  }
}
foreach($skema as $dagnr => $dag) {
  echo "<br />".$dagnr."<br>";
  foreach($dag as $timenr => $time) {
    echo $time."<br>".$laerer[$dagnr][$timenr]."<br>".$lokale[$dagnr][$timenr]."<br><br>";
  }
}

?>

Husk at mandag = 1 og time 1 = 0

jeg prøver lige igen så. Jeg må jo have lavet en fejl af en slags:)

hvis jeg skriver echo $skema[1][0]; får jeg maA hvor jeg burde få saC?

kan du ikk lige smide alt den kode du bruger ? for jeg tror der er noget som forstyrer koden, da jeg får saC som jeg skal.

Du kan evt. adde mig til msn, da det vil gå lidt hurtigere med hjælp derad, og så kan vi poste løsning bagefter.

jo, helt enig.. var lige ved at foreslå det samme

Problem løst via msn, han havde glemt at c/p $dag = 1; ;)

lukker

Kan vi genoptage dette spg? Nogen der har en opdatering?

Jeg tror ikke scriptet er blevet opgraderet de sidste 3 år, jeg har i hvert fald ikke selv brugt tid på at gøre det.

Men tror en evt. opdatering vil kræve noget mere end bare en omskrivning af det crapkode jeg fik kastet af mig sidst, det ser ud til at de har omstruktureret en del.

Skal jeg oprette et nyt spg? Vil du så hjælpe med at programmere en ny parser?

Først af alt, jeg har ikke tiden til at sætte mig ind i hvordan det nye Lectio er opbygget lige nu, så min hjælp vil være absolut minimal på selve parsing delen.

Derudover så syns jeg du skal gå i gang med at programmere den selv, der er masser af måder at gøre det på, og ovenfor finder du sågar et eksempel på hvordan det kunne gøres, og jeg ved at der er masser af guides til parsing af data rundt omkring på nettet, så hvis det snask jeg har lavet ikke er forståeligt så er de guides jeg fandt på nettet dengang jeg skulle lave en, der højst sandsynligvis stadig.

Så nej, jeg vil ikke hjælpe dig med at programmere en, og slet ikke for nogle point her, men hvis du går i gang og løber ind i nogle problemmer, så skal jeg da gerne hjælpe hvis du stiller spørgsmålet med al relevant info.