Tilføj link script til siden

Jeg kan ikke bruge mysql!

Hvis scriptet skal bruge en tekstfil så behøver du vel ikke et script til at administrere filen - især ikke hvis det kun er dig, som skal ´kunne tilføje.

Jeg gufler lige noget sammen til dig. Øjeblik...

Tekstfilens \"links.txt\" format:

link,target,titel

F.eks:

http://www.sarum.dk,,Se Sarums hjemmeside
test.htm,_blank,En testside
blabla.htm,framenavn,En anden testside


<?php
$linklist = file(\"links.txt\");

reset($linklist);
while (list($key, $val) = each($linklist)) {
    $fields = explode(\",\", $val);
    $s = \"<a href=\\\"${fields[0]}\\\" \";
    if (trim($fields[1]) != \"\")
        $s .= \"target=${fields[1]} \";
    $s .= \">${fields[2]}</a>\";
    echo \"$s<br>\";
}
?>

Kan du bruge det som de bruger på mote.dht.dk ?
(Søgeboksen)(eller søg i kategorier)

Her er en mere udbygget udgave, der kan tilføje og slette links. Husk at mappen hvor \"links.txt\" ligger i skal have write permission for webserver brugeren

linkedit.php
------------------------
<?php
    $linkfile = \"links.txt\";

    $action = $HTTP_GET_VARS[\"action\"];

    function saveList($list) {
        global $linkfile;
        $f = fopen($linkfile, \"w\");
        reset($list);
        while (list($key, $val) = each($list))
            fputs($f, $val);
        fclose($f);
    }

    if ($action == \"add\") {
        // Find næste id i rækken
        $linklist = file($linkfile);
        if (count($linklist) == 0)
            $next_id = 1;
        else {
            $fields = explode(\",\", $linklist[count($linklist)-1]);
            $next_id = $fields[0] + 1;
        }

        // Tilføj det nye link til listen
        $url = $HTTP_POST_VARS[\"url\"];
        $target = $HTTP_POST_VARS[\"target\"];
        $titel = $HTTP_POST_VARS[\"titel\"];
        $s = \"$next_id,$url,$target,$titel\\n\";
        $linklist[] = $s;

        // Gem listen
        saveList($linklist);
    }
   
    if ($action == \"delete\") {
        // Slet linie med id = det valgte
        $id = $HTTP_POST_VARS[\"id\"];

        $linklist = file($linkfile);
        reset($linklist);
        while (list($key, $val) = each($linklist)) {
            $fields = explode(\",\", $val);
            if ($fields[0] == $id)
                unset($linklist[$key]);
        }

        // Gem listen
        saveList($linklist);
    }
?>

<h1>Nuværende liste</h1>

<?php
$linklist = file($linkfile);

reset($linklist);
while (list($key, $val) = each($linklist)) {
    $fields = explode(\",\", $val);
    $s = \"${fields[0]}: <a href=\\\"${fields[1]}\\\" \";
    if (trim($fields[2]) != \"\")
        $s .= \"target=${fields[2]} \";
    $s .= \">${fields[3]}</a>\";
    echo \"$s<br>\\n\";
}
?>

<h1>Tilføj link</h1>
<form name=addlink method=post action=\"linkedit.php?action=add\">
Url <input type=text name=url><br>
Target <input type=text name=target><br>
Titel <input type=text name=titel><br>
<input type=submit value=Gem>
</form>

<h1>Slet link</h1>
<form name=deletelink method=post action=\"linkedit.php?action=delete\">
Id <input type=text name=id><br>
<input type=submit value=Slet>
</form>

Glemte lige at skrive, at nu er formatet for links.txt ændret lidt:

id,link,target,titel

Dvs. der er kommet et id-tal forrest i linien

Tak skal du have. Men url\'en skal helst ikke vises, altså man skal bare klikke på hjemmesiden navn. Jeg håber at det kan lade sig gøre.
Mvh Lasse

Det er da også det, der sker i mit script ikke?

Jo det er det undskyld.
Tusind tak for scriptet
;-)