baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
<html>
<title>neue Ausgabeseite</title> <link href="http://www.brueckenbau-links.de/bblinkss.css" rel=styleSheet type=text/css> </head>
<perl>
@suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_.",+"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2); }
<perl> $append = "&Brueckenname~=$Brueckenname" if $Brueckenname ne ""; $append = $append."&Land~=$Land" if $Land ne ""; $append = $append."&Stadt~=$Stadt" if $Stadt ne ""; $append = $append."&VerkehrswegOben~=$VerkehrswegOben" if $VerkehrswegOben ne ""; $append = $append."&VerkehrswegUnten~=$VerkehrswegUnten" if $VerkehrswegUnten ne ""; $append = $append."&SeitenEigentuemer~=$SeitenEigentuemer" if $SeitenEigentuemer ne ""; $append = $append."&BrueckenTyp~=$BrueckenTyp" if $BrueckenTyp ne ""; $append = $append."&Baustoff~=$Baustoff" if $Baustoff ne ""; $append = $append."&IDE~=$IDE" if $IDE ne ""; $append = $append."&_fullsearch~~$_sel{'_fullsearch'}" if $_sel{"_fullsearch"} ne ""; $append = $append."&suchbegriffe=".convert_url($suchbegriffe) if $suchbegriffe ne ""; $append = $append."&mode=$mode"; </perl>
my $newrange=$_range+$_range_length; my $oldrange=$_range-$_range_length; $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length; out "<a href=\"$_link&range=$oldrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/zurueck.gif\" border=0 alt=\"zurück\"></a> " if $oldrange>=0; out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/weiter.gif\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl>
$Beschreibung_m=$Beschreibung ; $_amount_query_m=$_amount_query ; $Idm=$_id ; $Land_m=$Land ; get "IDE==!$IDE", "links"; $SeitenEigentuemer_m=$SeitenEigentuemer ; $EigentuemerLink_m=$EigentuemerLink ; $_amount_query=$_amount_query_m ; # ab hier soll nur noch die db brueckenbau abgefragt werden
if($xxx > 9) {
<tr><td> <div align="center"><center>
<tr> <td width="100%"><p align="center"><font color="#FF0000">Bei diesem Datensatz geht wohl der Link zum Foto oder der Link zur Seite des Bildes nicht mehr.<br> <a href="$EigentuemerLink_m" target="_blank">Versuchen Sie es auf der Startseite des Seiteneigentümers</a>.</font></td> </tr> </table> </center></div> </tr></td> EOF }
out <<EOF; <div align="center"><center> <table border="0" width="100%"> <tr> <td valign="top"><h3>$Brueckenname</h3> <p><strong>
out "$Stadt, " if $Stadt ne ("" || "-"); out "$Lage, " if $Lage ne ("" || "-"); out "$Land_m" if $Land_m ne ("" || "-"); out <<EOF;
<table border="0" cellspacing="0"> EOF out "<tr><td><strong>Brückentyp: </td><td>$BrueckenTyp</strong></td></tr>" if $BrueckenTyp ne ""; out "<tr><td><strong>Baustoff: </td><td>$Baustoff</strong></td></tr>" if $Baustoff ne ""; out "<tr><td><strong>Verkehrsweg oben: </td><td>$VerkehrswegOben</strong></td></tr>" if $VerkehrswegOben ne ("" || "-"); out "<tr><td><strong>Verkehrsweg unten: </td><td>$VerkehrswegUnten</strong></td></tr>" if $VerkehrswegUnten ne ("" || "-"); out <<EOF; </strong></table>
<p>$Beschreibung_m</td> <td valign="top"><p align="right"><table border="0" valign="top" align="right"> <tr>
EOF out "<a href='http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/brueckenbau/suchergebnis&mode=bigpictures&range=0,1&Id==$Idm\'>" if $BildLink ne ""; out "<img src='$BildvorschauLink' alt='$Brueckenname' border=0 align=right width='250'>"; out "</a>" if $BildLink ne ""; out <<EOF; </td>
<tr> <td width="100%" valign="top"><p align="left"><font size="1">Bild und Text von <strong> <a href="$EigentuemerLink_m" target="_blank">$SeitenEigentuemer_m</a></font> <p><a href="$BildLinkSeite" target="_blank">Hier kommt das Bild her.</a></strong> </p></td> </tr> </table> </td> </tr> </table> </center></div>
} if($mode eq "bigpictures") { out <<EOF; <div align="center"><center> <table> <tr> <td width="100%"> EOF $BildLink=$BildvorschauLink if $BildLink eq ""; out <<EOF; <tr align="center"> <tr align="center"> <td> <a align="center" valign="top"><strong><font size="4">$Brueckenname</font></strong></a><p> EOF out "$Stadt, " if $Stadt ne ("" || "-"); out "$Lage, " if $Lage ne ("" || "-"); out "$Land_m" if $Land_m ne ("" || "-"); out <<EOF; </td> </tr> <tr> <td><p align="center"> <img src="$BildLink" alt="$Brueckenname" border="0"></a></td> </tr> <tr> <td width="100%"><p align="center"><font size="2">Bild und Text von <a href="$EigentuemerLink_m">$SeitenEigentuemer_m</a></font></td>
<td><p align="center"> $Beschreibung_m<br> <p align="center"><a href="$BildLinkSeite" target="_blank">Hier kommt das Bild her.</a></strong></td> </tr></tr> </table>
<table border="0" cellspacing="0">
out "<tr><td><strong>Brückentyp: </td><td>$BrueckenTyp</strong></td></tr>" if $BrueckenTyp ne ""; out "<tr><td><strong>Baustoff: </td><td>$Baustoff</strong></td></tr>" if $Baustoff ne ""; out "<tr><td><strong>Verkehrsweg oben: </td><td>$VerkehrswegOben</strong></td></tr>" if $VerkehrswegOben ne ("" || "-"); out "<tr><td><strong>Verkehrsweg unten: </td><td>$VerkehrswegUnten</strong></td></tr>" if $VerkehrswegUnten ne ("" || "-"); out <<EOF; </strong></table> </center></div> EOF } if($mode eq "nopictures") { out <<EOF; <div align="center"><center> <table> <tr align="center">
<span class=mengentext><a href=\"http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/brueckenbau/suchergebnis&mode=pictures&range=0,1&Id==$Idm\">$Brueckenname</a></span> </td> <td align=left> <span class=mengentext>$SeitenEigentuemer_m</span> </td> <td align=left> <span class=mengentext>$Stadt</span> </td> <td align=left> <span class=mengentext>$Land_m</span> </td> <td align=left> <span class=mengentext>$VerkehrswegOben</span> </td> <td align=left> <span class=mengentext>$VerkehrswegUnten</span> </td> </tr> </table> </center></div> EOF } out <<EOF; <hr size="3" color="#449B74"> EOF </loop>
my $newrange=$_range+$_range_length; my $oldrange=$_range-$_range_length; $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length; out "<a href=\"$_link&range=$oldrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/zurueck.gif\" border=0 alt=\"zurück\"></a> " if $oldrange>=0; out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/weiter.gif\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; out "<br>Bei dieser Suchanfrage wurden $_amount_query Datensätze gefundem"; </perl> <include src=links>
</html>
Alle Einträge zum Thema: | Zur Liste |
Datenbank 1 -> Name, haltl_1, zeit_1, halt_2, zeit_2 Datenbank 2 -> Name, x, y
<loop db=brueckenbau code=perl _fullsearch~~$suchbegriffe sort^=-Datum fullsearch_match=200 range ^=0,10> $Beschreibung_m=$Beschreibung ; $_amount_query_m=$_amount_query ; $Idm=$_id ; $Land_m=$Land ; get "IDE==!$IDE", "links"; $SeitenEigentuemer_m=$SeitenEigentuemer ; $EigentuemerLink_m=$EigentuemerLink ; $_amount_query=$_amount_query_m ; # ab hier wird nur noch die db brueckenbau abgefragt werden
get "IDE==!$IDE", "links";
get "name==!$name", "datenbank_2"; $x1=x; $y1^=y;
<loop db=1 >
$x1=$x; $y1=$y;
</loop>
<html>
<title>neue Ausgabeseite</title> <link href="http://www.brueckenbau-links.de/bblinkss.css" rel=styleSheet type=text/css> </head>
<perl>
@suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_.",+"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2); }
<perl> $append = "&Brueckenname~=$Brueckenname" if $Brueckenname ne ""; $append = $append."&Land~=$Land" if $Land ne ""; $append = $append."&Stadt~=$Stadt" if $Stadt ne ""; $append = $append."&VerkehrswegOben~=$VerkehrswegOben" if $VerkehrswegOben ne ""; $append = $append."&VerkehrswegUnten~=$VerkehrswegUnten" if $VerkehrswegUnten ne ""; $append = $append."&SeitenEigentuemer~=$SeitenEigentuemer" if $SeitenEigentuemer ne ""; $append = $append."&BrueckenTyp~=$BrueckenTyp" if $BrueckenTyp ne ""; $append = $append."&Baustoff~=$Baustoff" if $Baustoff ne ""; $append = $append."&IDE~=$IDE" if $IDE ne ""; $append = $append."&_fullsearch~~$_sel{'_fullsearch'}" if $_sel{"_fullsearch"} ne ""; $append = $append."&suchbegriffe=".convert_url($suchbegriffe) if $suchbegriffe ne ""; $append = $append."&mode=$mode"; </perl>
my $newrange=$_range+$_range_length; my $oldrange=$_range-$_range_length; $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length; out "<a href=\"$_link&range=$oldrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/zurueck.gif\" border=0 alt=\"zurück\"></a> " if $oldrange>=0; out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/weiter.gif\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl>
$Beschreibung_m=$Beschreibung ; $_amount_query_m=$_amount_query ; $Idm=$_id ; $Land_m=$Land ; get "IDE==!$IDE", "links"; $SeitenEigentuemer_m=$SeitenEigentuemer ; $EigentuemerLink_m=$EigentuemerLink ; $_amount_query=$_amount_query_m ; # ab hier soll nur noch die db brueckenbau abgefragt werden
if($xxx > 9) {
<tr><td> <div align="center"><center>
<tr> <td width="100%"><p align="center"><font color="#FF0000">Bei diesem Datensatz geht wohl der Link zum Foto oder der Link zur Seite des Bildes nicht mehr.<br> <a href="$EigentuemerLink_m" target="_blank">Versuchen Sie es auf der Startseite des Seiteneigentümers</a>.</font></td> </tr> </table> </center></div> </tr></td> EOF }
out <<EOF; <div align="center"><center> <table border="0" width="100%"> <tr> <td valign="top"><h3>$Brueckenname</h3> <p><strong>
out "$Stadt, " if $Stadt ne ("" || "-"); out "$Lage, " if $Lage ne ("" || "-"); out "$Land_m" if $Land_m ne ("" || "-"); out <<EOF;
<table border="0" cellspacing="0"> EOF out "<tr><td><strong>Brückentyp: </td><td>$BrueckenTyp</strong></td></tr>" if $BrueckenTyp ne ""; out "<tr><td><strong>Baustoff: </td><td>$Baustoff</strong></td></tr>" if $Baustoff ne ""; out "<tr><td><strong>Verkehrsweg oben: </td><td>$VerkehrswegOben</strong></td></tr>" if $VerkehrswegOben ne ("" || "-"); out "<tr><td><strong>Verkehrsweg unten: </td><td>$VerkehrswegUnten</strong></td></tr>" if $VerkehrswegUnten ne ("" || "-"); out <<EOF; </strong></table>
<p>$Beschreibung_m</td> <td valign="top"><p align="right"><table border="0" valign="top" align="right"> <tr>
EOF out "<a href='http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/brueckenbau/suchergebnis&mode=bigpictures&range=0,1&Id==$Idm\'>" if $BildLink ne ""; out "<img src='$BildvorschauLink' alt='$Brueckenname' border=0 align=right width='250'>"; out "</a>" if $BildLink ne ""; out <<EOF; </td>
<tr> <td width="100%" valign="top"><p align="left"><font size="1">Bild und Text von <strong> <a href="$EigentuemerLink_m" target="_blank">$SeitenEigentuemer_m</a></font> <p><a href="$BildLinkSeite" target="_blank">Hier kommt das Bild her.</a></strong> </p></td> </tr> </table> </td> </tr> </table> </center></div>
} if($mode eq "bigpictures") { out <<EOF; <div align="center"><center> <table> <tr> <td width="100%"> EOF $BildLink=$BildvorschauLink if $BildLink eq ""; out <<EOF; <tr align="center"> <tr align="center"> <td> <a align="center" valign="top"><strong><font size="4">$Brueckenname</font></strong></a><p> EOF out "$Stadt, " if $Stadt ne ("" || "-"); out "$Lage, " if $Lage ne ("" || "-"); out "$Land_m" if $Land_m ne ("" || "-"); out <<EOF; </td> </tr> <tr> <td><p align="center"> <img src="$BildLink" alt="$Brueckenname" border="0"></a></td> </tr> <tr> <td width="100%"><p align="center"><font size="2">Bild und Text von <a href="$EigentuemerLink_m">$SeitenEigentuemer_m</a></font></td>
<td><p align="center"> $Beschreibung_m<br> <p align="center"><a href="$BildLinkSeite" target="_blank">Hier kommt das Bild her.</a></strong></td> </tr></tr> </table>
<table border="0" cellspacing="0">
out "<tr><td><strong>Brückentyp: </td><td>$BrueckenTyp</strong></td></tr>" if $BrueckenTyp ne ""; out "<tr><td><strong>Baustoff: </td><td>$Baustoff</strong></td></tr>" if $Baustoff ne ""; out "<tr><td><strong>Verkehrsweg oben: </td><td>$VerkehrswegOben</strong></td></tr>" if $VerkehrswegOben ne ("" || "-"); out "<tr><td><strong>Verkehrsweg unten: </td><td>$VerkehrswegUnten</strong></td></tr>" if $VerkehrswegUnten ne ("" || "-"); out <<EOF; </strong></table> </center></div> EOF } if($mode eq "nopictures") { out <<EOF; <div align="center"><center> <table> <tr align="center">
<span class=mengentext><a href=\"http://koch.netpure.de/cgi-bin/baseportal.pl?htx=/koch/brueckenbau/suchergebnis&mode=pictures&range=0,1&Id==$Idm\">$Brueckenname</a></span> </td> <td align=left> <span class=mengentext>$SeitenEigentuemer_m</span> </td> <td align=left> <span class=mengentext>$Stadt</span> </td> <td align=left> <span class=mengentext>$Land_m</span> </td> <td align=left> <span class=mengentext>$VerkehrswegOben</span> </td> <td align=left> <span class=mengentext>$VerkehrswegUnten</span> </td> </tr> </table> </center></div> EOF } out <<EOF; <hr size="3" color="#449B74"> EOF </loop>
my $newrange=$_range+$_range_length; my $oldrange=$_range-$_range_length; $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length; out "<a href=\"$_link&range=$oldrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/zurueck.gif\" border=0 alt=\"zurück\"></a> " if $oldrange>=0; out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/weiter.gif\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; out "<br>Bei dieser Suchanfrage wurden $_amount_query Datensätze gefundem"; </perl> <include src=links>
</html>
<loop db=linie code=perl>
$x $y </loop>
out <<EOF; <loop db=linie code=perl>
out <<EOF;
EOF </loop>
Liste der Einträge von 44550 bis 44700: | Einklappen | Zur Eingabe |
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |