So sieht mein Quelltext aus,
du mußt natürlich noch viel rausschweißen und Felder und Datenbanken anpassen.
Das ist zwar die englische Version, aber die verstehe sogar ich.
Du kannst ja meine Homepage mal besuchen, da hab ich faßt alles mit Datenbanken gemacht.
www.brueckenbau-links.de
<html>
<head>
<title>Index for the companies, - bridging and book data base</title>
<link rel="stylesheet" type="text/css" href="http://www.brueckenbau-links.de/bbstart600.css">
</head>
<body>
<h2 align="center">Index</h2>
<p align="center">For the companies, - bridging and book data base</p>
<p align="center"><img src="http://www.brueckenbau-links.de/stichwort-en.jpg" alt="Erläuterung der Einträge."></p>
<table border="2" width="100%" bordercolor="#7EB8FF" cellspacing="0" cellpadding="0" bordercolorlight="#7EB8FF" bordercolordark="#7EB8FF">
<perl>
$ende=84;
$i=0;
get " Id=* sort=Suchwort_e", "Suchwort";
while (get_next(Suchwort))
{
$i++;
out "<td width='25%' valign='top'>" if $i==1;
$Laenge = length($Suchwort);
$suche=$Suchwort;
$suche_a=$Suchwort_e;
# hier kommt die Ausgabe
out "<li><strong><font face='Arial' size='4' color='#000000'><strong>$suche</font></strong></li>" if $Laenge==1;
out "<li><strong>$suche_a" if $Laenge>1;
get "_fullsearch~~$suche fullsearch_match=300 range=0,1", "links" if $Laenge>1;
out " " if $_amount_query>0;
get "_fullsearch~~$suche fullsearch_match=300 range=0,1", "links" if $Laenge>1;
out "<a href='http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/brueckenbau/linkliste&cmd=all&_fullsearch~~$suche&fullsearch_match=300
&db=links'
target='_self'><font color='#FF00FF'> -$_amount_query-</a></strong></font></li>" if $Laenge>1 & $_amount_query>0;
out " " if $_amount_query>0;
get "_fullsearch~~$suche fullsearch_match=300 range=0,1", "brueckenbau" if $Laenge>1;
out "<a href='http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/brueckenbau/ergebnis&cmd=all&mode=pictures&range=0,5&_fullsearch~~$suche&fullsearch_match=300&db=brueckenbau'
target='_blank'><font color='#8000FF'> -$_amount_query-</a></strong></font></li>" if $Laenge>1 & $_amount_query>0;
out " " if $_amount_query>0;
get "_fullsearch~~$suche fullsearch_match=300 range=0,1", "../buecher/buecher" if $Laenge>1;
out "<a href='http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/buecher/buecher_3sp&cmd=all&_fullsearch~~$suche&fullsearch_match=300&db=../buecher/buecher'
target='_self'><font color='#008000'> -$_amount_query-</a></strong></font></li>" if $Laenge>1 & $_amount_query>0;
#hier wird geprüft ob die Spalte voll ist
if ($i>=$ende)
{
out "</td>" ;
$i=0;
}else
{
out "<br>";
}
}
out "</td>" if $i!=0;
$Anzahl=int($ende)+1;
</perl>
<p align="center"><img src="http://www.brueckenbau-links.de/stichwort-en.jpg" alt="Erläuterung der Einträge."></p>
<p align="center">Here if a keyword is missing, or you is not found here, write me <a href="mailto:mkburg@gmx.net">a Mail</a>.</p>
</body></html>
