baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
|
Alle Einträge zum Thema: | Zur Liste |
<perl> @suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_." +"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2); </perl>
$suchbegriffe=$suchbegriffe.$_." +";
<html> <head> <title>Ausgabe mit oder ohne Bilder</title> <link href="http://www.brueckenbau-links.de/bblinks.css" rel=styleSheet type=text/css> </head> <body> <perl> if($mode eq "pictures") {
<p align="center"><b><span class="mengentext">Suchergebnisse, Ausgabe mit Bildern:</span></b></p> EOF } if($mode eq "nopictures") { out <<EOF; <p align="center"><b><span class="mengentext">Suchergebnisse:</span></b></p> <table border="1" width="100%" cellpadding="2" cellspacing="1"> <tr> EOF } if($mode eq "bigpictures") { out <<EOF; <p align="center"> <table border="1" width="100%" cellpadding="2" cellspacing="1"> <tr> EOF } </perl> <perl> if($mode eq "pictures") { out <<EOF; <table border="0" width="100%" cellpadding="2" cellspacing="1"> <tr> <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "bigpictures") { out <<EOF; <table border="0" width="100%" cellpadding="2" cellspacing="1"> <tr> <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "nopictures") { out <<EOF; <td width="100%" valign="top" colspan="6" valign="middle" align="center" > EOF } </perl> <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."&mode=$mode"; </perl> <loop code=perl db=brueckenbau> out ""; </loop> <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/links.gif\" width=\"40\" height=\"40\" 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/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl> </td> </tr>
if($mode eq "nopictures") { out <<EOF;
<td align=left > <span class=mengentext><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</a></span> </td> <td align=left> <span class=mengentext>$SeitenEigentuemer</span> </td> <td align=left> <span class=mengentext>$Stadt</span> </td> <td align=left> <span class=mengentext>$Land</span> </td> <td align=left> <span class=mengentext>$VerkehrswegOben</span> </td> <td align=left> <span class=mengentext>$VerkehrswegUnten</span> </td> </tr> EOF } if($mode eq "pictures") { out <<EOF;
<td width="100%"><div align="left"><table border="0" valign="top" align="left"> <tr> <td> EOF out "<a href='$BildLink'>" if $BildLink ne ""; out "<img src='$BildvorschauLink' alt='$Brueckenname' border=0 align=left hspace=5 vspace=5>"; out "</a>" if $BildLink ne ""; out <<EOF; </td>
<tr> <td width="100%" valign="top"><p align="left"><font size="1">Bild und Text von<br> <a href="$EigentuemerLink" target="_blank">$SeitenEigentuemer</a></font> <p><a href="$BildLinkSeite" target="_blank">Hier kommt das Bild her.</a> </p></td> </tr> </table></div> <a valign="top"><strong><font size="4"><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</font></strong></a>, $Stadt, $Land, <p>$Beschreibung </tr>
<td width="100%" colspan="1"> <hr noshade size="3" color="#008080"> </td> </tr> EOF } if($mode eq "bigpictures") { out <<EOF; <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"><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</font></strong></a><p> $Stadt, $Land </td> </tr> <tr> <td><p align="center"> <a href="$BildLinkSeite"> <img src="$BildLink" alt="$Brueckenname" border="0"></a></td> </tr> <tr> <td width="100%"><p align="center"><font size="1">Bild und Text von <a href="$EigentuemerLink">$SeitenEigentuemer</a></font></td> </tr><tr> <td><p align="center"> $Beschreibung</td> </tr></tr> EOF }
</loop>
<perl> if($mode eq "pictures") { out <<EOF; <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "bigpictures") { out <<EOF; <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "nopictures") {
<td width="100%" valign="top" colspan="6" valign="middle" align="center"> EOF } </perl> <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/links.gif\" width=\"40\" height=\"40\" 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/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl> </td> </tr> </table> <div align="center"> <perl> out "Bei dieser Suchanfrage wurden $_amount_query Datensätze gefundem"; if (%_sel || $_fullsearch) { $_put{_amount}=1; $_put{Anzahl}=$_amount_query; $_put{Brueckenname}=$_sel{Brueckenname} if $_sel{Brueckenname}; $_put{SeitenEigentuemer}=$_sel{SeitenEigentuemer} if $_sel{SeitenEigentuemer}; $_put{VerkehrswegUnten}=$_sel{VerkehrswegUnten} if $_sel{VerkehrswegUnten}; $_put{VerkehrswegOben}=$_sel{VerkehrswegOben} if $_sel{VerkehrswegOben}; $_put{Stadt}=$_sel{Stadt} if $_sel{Stadt}; $_put{Land}=$_sel{Land} if $_sel{Land}; $_put{Volltext}=$_sel{'_fullsearch'} if $_sel{"_fullsearch"}; $_put{Datum}=datum("jetzt");
}
<include src=hinweis> </div> </body> </html>
$append = $append."&_fullsearch==$_sel{'_fullsearch'}" if $_sel{"_fullsearch"} ne "";
<html> <head> <title>Ausgabe mit oder ohne Bilder (Test mit UND Verknüpfung)</title> <link href="http://www.brueckenbau-links.de/bblinks.css" rel=styleSheet type=text/css> </head> <body> <perl> @suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_.",+"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2);
<perl> if($mode eq "pictures") {
<p align="center"><b><span class="mengentext">Suchergebnisse, Ausgabe mit Bildern:</span></b></p> EOF } if($mode eq "nopictures") { out <<EOF; <p align="center"><b><span class="mengentext">Suchergebnisse:</span></b></p> <p align="center"><b><span class="mengentext">Suchwörter bei der Volltextsuche: $suchbegriffe</span></b></p> <table border="1" width="100%" cellpadding="2" cellspacing="1"> <tr> EOF } if($mode eq "bigpictures") { out <<EOF; <p align="center"> <table border="1" width="100%" cellpadding="2" cellspacing="1"> <tr> EOF } </perl> <perl> if($mode eq "pictures") { out <<EOF; <table border="0" width="100%" cellpadding="2" cellspacing="1"> <tr> <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "bigpictures") { out <<EOF; <table border="0" width="100%" cellpadding="2" cellspacing="1"> <tr> <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "nopictures") { out <<EOF; <td width="100%" valign="top" colspan="6" valign="middle" align="center" > EOF } </perl> <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."&suchbegriffe==$suchbegiffe" if $suchbegiffe ne ""; $append = $append."&mode=$mode"; </perl> <loop code=perl db=brueckenbau range=0,1> _fullsearch==$suchbegriffe out ""; </loop> <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/links.gif\" width=\"40\" height=\"40\" 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/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl> </td>
<loop db=brueckenbau code=perl _fullsearch==$suchbegriffe>
<html> <head> <title>Ausgabe mit oder ohne Bilder (Test mit UND Verknüpfung)</title> <link href="http://www.brueckenbau-links.de/bblinks.css" rel=styleSheet type=text/css> </head> <body> <perl> @suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_.",+"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2);
<perl> if($mode eq "pictures") {
<p align="center"><b><span class="mengentext">Suchergebnisse, Ausgabe mit Bildern:</span></b></p> EOF } if($mode eq "nopictures") { out <<EOF; <p align="center"><b><span class="mengentext">Suchergebnisse:</span></b></p> <p align="center"><b><span class="mengentext">Suchwörter bei der Volltextsuche: $suchbegriffe</span></b></p> <table border="1" width="100%" cellpadding="2" cellspacing="1"> <tr> EOF } if($mode eq "bigpictures") { out <<EOF; <p align="center"> <table border="1" width="100%" cellpadding="2" cellspacing="1"> <tr> EOF } </perl> <perl> if($mode eq "pictures") { out <<EOF; <table border="0" width="100%" cellpadding="2" cellspacing="1"> <tr> <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "bigpictures") { out <<EOF; <table border="0" width="100%" cellpadding="2" cellspacing="1"> <tr> <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "nopictures") { out <<EOF; <td width="100%" valign="top" colspan="6" valign="middle" align="center" > EOF } </perl> <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==$suchbegiffe" if $suchbegiffe ne ""; $append = $append."&mode=$mode"; </perl> <loop code=perl db=brueckenbau range=0,1> out ""; </loop> <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/links.gif\" width=\"40\" height=\"40\" 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/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl> </td> </tr>
if($mode eq "nopictures") { out <<EOF;
<td align=left > <span class=mengentext><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</a></span> </td> <td align=left> <span class=mengentext>$SeitenEigentuemer</span> </td> <td align=left> <span class=mengentext>$Stadt</span> </td> <td align=left> <span class=mengentext>$Land</span> </td> <td align=left> <span class=mengentext>$VerkehrswegOben</span> </td> <td align=left> <span class=mengentext>$VerkehrswegUnten</span> </td> </tr> EOF } if($mode eq "pictures") { out <<EOF;
<td width="100%"><div align="left"><table border="0" valign="top" align="left"> <tr> <td> EOF out "<a href='$BildLink'>" if $BildLink ne ""; out "<img src='$BildvorschauLink' alt='$Brueckenname' border=0 align=left hspace=5 vspace=5>"; out "</a>" if $BildLink ne ""; out <<EOF; </td>
<tr> <td width="100%" valign="top"><p align="left"><font size="1">Bild und Text von<br> <a href="$EigentuemerLink" target="_blank">$SeitenEigentuemer</a></font> <p><a href="$BildLinkSeite" target="_blank">Hier kommt das Bild her.</a> </p></td> </tr> </table></div> <a valign="top"><strong><font size="4"><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</font></strong></a>, $Stadt, $Land, <p>$Beschreibung </tr>
<td width="100%" colspan="1"> <hr noshade size="3" color="#008080"> </td> </tr> EOF } if($mode eq "bigpictures") { out <<EOF; <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"><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</font></strong></a><p> $Stadt, $Land </td> </tr> <tr> <td><p align="center"> <a href="$BildLinkSeite"> <img src="$BildLink" alt="$Brueckenname" border="0"></a></td> </tr> <tr> <td width="100%"><p align="center"><font size="1">Bild und Text von <a href="$EigentuemerLink">$SeitenEigentuemer</a></font></td> </tr><tr> <td><p align="center"> $Beschreibung</td> </tr></tr> EOF }
</loop>
<perl> if($mode eq "pictures") { out <<EOF; <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "bigpictures") { out <<EOF; <td width="100%" valign="top" colspan="1" valign="middle" align="center"> EOF } if($mode eq "nopictures") {
<td width="100%" valign="top" colspan="6" valign="middle" align="center"> EOF } </perl> <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/links.gif\" width=\"40\" height=\"40\" 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/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query; </perl> </td> </tr> </table> <div align="center"> <perl> out "Bei dieser Suchanfrage wurden $_amount_query Datensätze gefundem"; if (%_sel || $_fullsearch) { $_put{_amount}=1; $_put{Anzahl}=$_amount_query; $_put{Brueckenname}=$_sel{Brueckenname} if $_sel{Brueckenname}; $_put{SeitenEigentuemer}=$_sel{SeitenEigentuemer} if $_sel{SeitenEigentuemer}; $_put{VerkehrswegUnten}=$_sel{VerkehrswegUnten} if $_sel{VerkehrswegUnten}; $_put{VerkehrswegOben}=$_sel{VerkehrswegOben} if $_sel{VerkehrswegOben}; $_put{Stadt}=$_sel{Stadt} if $_sel{Stadt}; $_put{Land}=$_sel{Land} if $_sel{Land}; $_put{suchbegiffe}=$_sel{suchbegiffe} if $_sel{suchbegiffe}; $_put{Volltext}=$_sel{'_fullsearch'} if $_sel{"_fullsearch"}; $_put{Datum}=datum("jetzt");
}
<include src=hinweis> </div> </body> </html>
@suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_.",+"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2);
if (index($suchbegriffe,"+") == -1) { @suchargumente=split(/ /, $suchbegriffe); $suchbegriffe="+"; for (@suchargumente) { $suchbegriffe=$suchbegriffe.$_.",+"; } $suchbegriffe=substr($suchbegriffe,0,length($suchbegriffe)-2); }
$append = $append."&suchbegriffe==$suchbegiffe" if $suchbegiffe ne "";
$append = $append."&suchbegriffe==$suchbegriffe" if $suchbegriffe ne "";
$append = $append."&suchbegriffe=".convert_url($suchbegriffe") if $suchbegriffe ne ""; $__________________________________________________________ ^- Hier ist das Problem...
$append = $append."&suchbegriffe==$suchbegriffe" if $suchbegriffe ne "";
<perl> out "Bei dieser Suchanfrage wurden $_amount_query Datensätze gefundem"; if (%_sel || $_fullsearch) { $_put{_amount}=1; $_put{Anzahl}=$_amount_query; $_put{Brueckenname}=$_sel{Brueckenname} if $_sel{Brueckenname}; $_put{SeitenEigentuemer}=$_sel{SeitenEigentuemer} if $_sel{SeitenEigentuemer}; $_put{VerkehrswegUnten}=$_sel{VerkehrswegUnten} if $_sel{VerkehrswegUnten}; $_put{VerkehrswegOben}=$_sel{VerkehrswegOben} if $_sel{VerkehrswegOben}; $_put{Stadt}=$_sel{Stadt} if $_sel{Stadt}; $_put{Land}=$_sel{Land} if $_sel{Land}; $_put{suchbegiffe}=$_sel{suchbegiffe} if $_sel{suchbegiffe}; $_put{Volltext}=$_sel{'_fullsearch'} if $_sel{"_fullsearch"}; $_put{Datum}=datum("jetzt");
}
$_put{Volltext}=$_sel{'_fullsearch'} if $_sel{"_fullsearch"};
> schon besser - aber noch nicht geschaft.
Liste der Einträge von 53625 bis 53700: | 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 |