webForumDet fria alternativet

Skriva överst i en .txt-fil

PHP

2 svar · 188 visningar · startad av Madmartigan

Medlem sedan sep. 200315 inlägg
Frågan#1

Jag har gjort en gästbok i php, men problemet är att jag skulle behöva att det som skrivs in, skrivs överst i min .txt-fil.

Som det är nu läggs det in längst ner (append).

<?
$filename = "guestbook.txt";

if ($name) {
$message = str_replace("<", "<", $message);
$message = str_replace(">", ">", $message);
$message = str_replace("\n", "<br>\n", $message);

if (!(substr($url, 0, 7) == "http://"))

$url = "http://" . $url;

if ($fd = (fopen($filename, "a"))) {
// Skriv i filen
fwrite($fd, "<font face=verdana size=1>Namn: <b>$name</b><br>\n");
fwrite($fd, "E-post: <a href=\"mailto:$email\">$email</a><br>\n");
fwrite($fd, "Hemsida: <a href=\"$url\">$url</a><p>\n");
fwrite($fd, $message);
fwrite($fd, "\n<hr>\n");
fclose($fd);
} else {
print("<B>ERROR: cannot open $filename for writing<\/B><\/font>\n");
}

}

// Öppna filen i "read"-läge
if ($fd = (fopen($filename, "r"))) {
$contents = fread ($fd, filesize ($filename));
fclose ($fd);
// Skriv ut filen i html-dokumentet
print($contents);
} else {
print("<B>ERROR: cannot open $filename for reading\n");
}
?>

Hur får jag alltså detta att skriva överst i txtfilen ($filename)?
Vad ska ändras?

Medlem sedan jan. 2003282 inlägg
#2

Är det för att skriva ut posterna med nyaste först som du behöver det?
Då kan du ju sortera meddelandena med nyaste först istället.

<?php
$oppna_filen=fopen($filnamn,'r'); 
while (!feof($oppna_filen)) 
{ 
$rader[]=fgets($oppna_filen,3997); 
} 
fclose($oppna_filen); 
if ($sortering==1){ //här kollar jag vilken sortering som det ska vara på meddelandena
krsort ($rader); //skriver ut resultatet i uppåt gående ordning, senaste först
reset ($rader);
while (list ($rad, $val) = each ($rader)) {
    echo "$val";
}
}
if ($sortering==0){ 
sort ($rader); //skriver ut resultatet i nedfallande ordning, äldsta först
reset ($rader);
while (list ($rad, $val) = each ($rader)) {
    echo "$val";
}
}
?>

I den gb jag använder så finns ett val för att sortera efter nyast eller äldst variabeln $sortering alltså

Mvh
Jan-Olov

Medlem sedan aug. 20002 975 inlägg
548 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
414 ms — ändringar (db)