bitmuncher
Senior-Nerd
Ich erstelle gerade für meinen Dad eine Online-Version eines Briefmarkenkatalogs. Dieser enthält eine Bilderliste, in der man die Bilder anklicken kann und dann die gewünschten Daten für eine Briefmarke erhält. (Siehe Screenshot unter http://bitmuncher.blog.de/2010/11/20/wochenende-coden-angesagt-10012944/). Dummerweise springt aber nach jedem Laden eines Datensatzes die Liste wieder an den Anfang zurück. Sie soll aber an der Stelle bleiben, an der der User zuletzt war, wo also das angeklickte Thumbnail zu sehen ist. Hat jemand eine Idee, wie man das (am besten ohne Javascript) umsetzen kann? Der Code für die Liste sieht momentan so aus:
Angezeigt wird sie in einem iFrame, damit die horizontale Scrollleiste genutzt werden kann.
Code:
#!/usr/bin/perl
require "config.pl";
my %config = &config_data();
$out = "Content-Type: text/html\n\n";
$out .= '<html><head><META HTTP-EQUIV="Expires" CONTENT="86400"><base target="_parent"></head><body>'."\n";
my $thisdir = $config{'thumbnaildir'};
opendir(DH, $thisdir) || die "Cannot open $thisdir $!\n";;
my @files = readdir(DH);
$out .= "<table border=\"0\"><tr>\n";
foreach(@files) {
unless($_ eq '.' || $_ eq '..') {
my $number = '';
if($_ =~ /DDR(.*)_small.jpg/) {
$number = $1;
}
$out .= '<td><a href="index.pl?mod=info&nummer='.$number.'"><img src="'.$thisdir.$_.'"></img>'."</a></td>\n";
}
}
$out .= "</tr></table>\n";
closedir DH;
$out .= "\n</body></html>";
print $out;
1;
Angezeigt wird sie in einem iFrame, damit die horizontale Scrollleiste genutzt werden kann.