webForumDet fria alternativet

Angående admin funktion

12 svar · 345 visningar · startad av GrAnD

GrAnDMedlem sedan juni 200119 inlägg
#1

Jag har skrivit ett script som skall låta en admin kolla igenom en gästbok och därefter ändra i kommentarerna där något olämpligt står. När jag väljer vilket inlägg jag skall editera så får jag rätt rad. Jag ändrar det jag vill att det skall stå istället, därefter skall jag spara och då hittar han inte den rad som jag har sagt att det skall vara på inlägget och då sparas det någonstans där man inte kan se

GrAnDMedlem sedan juni 200119 inlägg
#2

=== Koden för att välja inlägg ===

#!/usr/local/bin/perl

open (FILE, 'book.html');

@lista = (<FILE> );

print "Content-type: text/html\n\n";

print qq~
<HTML>
<HEAD></HEAD>
<BODY><FONT SIZE='2'>
~;

$i = 0;
foreach $rad (@lista)
{
print $rad . " <A HREF='edit.cgi?rad=$i'>Edit</A><BR>\n";
$i++;
}

print qq~
</BODY>
</HTML>
~;

GrAnDMedlem sedan juni 200119 inlägg
#3

=== Koden för att ändra inlägg ===

#!/usr/local/bin/perl

@lista = split(/&/,$rad{'comments'});
$editcomments = $Query{'rad'};
($comments) = split(/-/,$lista[$editcomments]);

print "Content-type: text/html\n\n";

print qq~
<html>
<head></head>
<body><font size='3'>
<form action='saved.cgi?rad=$editcomments' method='post'>
Comment: <input type='textarea' name='comments' value='$comment'>
<input type='submit' value='Save changes'>
</form>
</body>
</html><br>
~;

GrAnDMedlem sedan juni 200119 inlägg
#4

=== Koden för att spara inlägg ===

#!/usr/local/bin/perl

@lista = split(/&/,$rad{'comments'});
$editcomments = $Query;
$lista[$rad]=$fdata{''};

print "Content-type: text/html\n\n";

print qq~
<HTML>
<HEAD></HEAD>
<BODY><FONT SIZE='2'>
<A HREF="/b069/book.html">Back to guestbook entries!</A>
</BODY>
</HTML><BR>
~;

emissionMedlem sedan dec. 19996 721 inlägg
#5

Hänger inte med...

Det finns ju överhuvud taget ingen kod som sparar något i en fil.

Var definieras $rad{'comments'} i den andra kodsnutten?

Vad är <input type='textarea'> för något? :)
Det finns inte någon sådan input-type.

Hur fungerar det hela? Den första kodsnutten ser helt OK ut, men resten förstår jag inte alls.

webmasterMedlem sedan aug. 2000190 inlägg
#6

[Redigerat av webmaster den 05 aug 2001]

GrAnDMedlem sedan juni 200119 inlägg
#7

Asså, $rad{'comments'} hänvisar till ett html dokument som innehåller alla input types. I detta html dokument finns en ruta som du skriver in kommentarerna i. Den är då av typen textarea. Denna "textarea" har då namnet "comments" och det är därifrån jag hämtar raden plus kommentaren mha $rad{'comment'}

emissionMedlem sedan dec. 19996 721 inlägg
#8

Men koden kan väl inte se ut så som du visar?

Ligger allt i samma fil, eller är det tre filer?

$rad{'comments'} hänvisar till ett html dokument

Var finns den hänvisningen?

Den är då av typen textarea

Det finns ingen sådan input-type. Däremot finns <TEXTAREA>

[Redigerat av emission den 06 aug 2001]

GrAnDMedlem sedan juni 200119 inlägg
#9

Det är 3 filer.

Det är hänvisningen som jag måste jobba med. Men jag vet inte hur jag skall fixa den, sidan kan ses på http://aton.udd.htu.se/b069/cgi-bin/admin.cgi Jag har fixat så att textarea är ändrat.

[Redigerat av GrAnD den 07 aug 2001]

emissionMedlem sedan dec. 19996 721 inlägg
#10

Okidoki! :)

Men, gästboken bygger på att varje inlägg bara är en enda rad. Ska det vara så (bäst att börja med den frågan)?

GrAnDMedlem sedan juni 200119 inlägg
#11

Menar du allt. namn, stad, email osv?
lr menar du endast kommentaren?

Varje inlägg blir några rader, när sedan ett nytt inlägg kommer läggs det nedanför det som "postades" före.

Om det var så du tänkte :)

emissionMedlem sedan dec. 19996 721 inlägg
#12

Ja, men som det är nu så ligger varje inlägg på bara en rad.

GrAnDMedlem sedan juni 200119 inlägg
#13

Jo det är helt ok.
Det är så jag vill ha det =)

139 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
137 ms — hämta tråd, inlägg och bilagor (db)