Beitrag von Michael Koch (344 Beiträge) am Donnerstag, 23.August.2001, 20:35.
Suchwörter in Extra Datenbank speichern.
Hallo,
ich möchte gern wissen was in meiner Datenbank gesucht wird.
Ist es möglich die einegebenen Suchwörter auch gleich in eine Extra Datenbank zu schreiben ?
Und wenn ja wie?
Hier der Quelltext der such Seite:
<html>
<head>
<title>Hier kann gezielt nach Brücken gesucht werden</title>
<link href="http://www.brueckenbau-links.de/bblinks.css" rel=styleSheet type=text/css>
</head>
<body>
<form action="bbeta.pl?htx=/brueckenbau/suchergebnis&cmd=search" method="post" enctype="multipart/form-data" name="suche">
<input type=hidden name="htx=" value="/brueckenbau/suchergebnis">
<input type=hidden name="cmd=" value="search">
<input type=hidden name="range=" value="0,10">
<table border="0" width="600" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" colspan="2">
<h2>Hier kann gezielt nach Brücken gesucht werden.</h2>
</td>
</tr>
<tr>
<td colspan="2"></td>
</tr>
<tr>
<td align="right" width="200">Brückenname : </td>
<td width="400"><input type="text" name="Brueckenname~=" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200">Land : </td>
<td width="400"><input type="text" name="Land~=" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200">Stadt : </td>
<td width="400"><input type="text" name="Stadt~=" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200">Verkehrsweg oben : </td>
<td width="400"><input type="text" name="VerkehrswegOben~=" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200">Verkehrsweg unten : </td>
<td width="400"><input type="text" name="VerkehrswegUnten~=" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200">Seiten Eigentümer : </td>
<td width="400"><input type="text" name="SeitenEigentuemer~=" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200"> </td>
<td width="400"> </td>
</tr>
<tr>
<td align="right" width="200">Volltext Suche : </td>
<td width="250" colspan="2"><input type="text" name="_fullsearch==" size=40 value=""></td>
</tr>
<tr>
<td align="right" width="200"> </td>
<td width="400"> </td>
</tr>
<tr>
<td align="right" width="200">Ausgabe : </td>
<td width="400">
<table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#E1E1E1">
<tr>
<td><input type="radio" name="mode=" value="nopictures" checked
onclick="document.suche.elements['range='].value='0,10'">Tabelarisch</td>
<td>10 Datensätze / Seite</td>
</tr>
<tr>
<td><input type="radio" name="mode=" value="pictures"
onclick="document.suche.elements['range='].value='0,5'">Mit Bildvorschau</td>
<td> 5 Datensätze / Seite</td>
</tr>
<tr>
<td><input type="radio" name="mode=" value="bigpictures"
onclick="document.suche.elements['range='].value='0,1'">Größte Bild der Brücke</td>
<td> 1 Datensatz / Seite</td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="right" width="200"> </td>
<td width="400"> </td>
</tr>
<tr>
<td align="center" width="600" colspan="2">
<input type=submit value="Suchen">
<input type=reset value="Zurücksetzen">
</td>
</tr>
</table>
</form>
<p align="center"> </p>
<include src=links>
<include src=hinweis>
</body>
</html>
Antworten
Beitrag von Sander (32 Beiträge) am Donnerstag, 23.August.2001, 22:36.
Re: Suchwörter in Extra Datenbank speichern.
Antworten
Beitrag von Michael Koch (344 Beiträge) am Donnerstag, 23.August.2001, 22:46.
Re: Suchwörter in Extra Datenbank speichern.
Hallo,
das verstehe ich nicht.
Ich denke ich muß erst eine neue Datenbank eröffnen,
aber mit welchen Feldern:
Suchwort und Datum denke ich,
Hier der Quelltext der Ausgabedatei:
<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") {
out <<EOF;
<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>
<loop db=brueckenbau code=perl>
if($mode eq "nopictures") {
out <<EOF;
<tr align="center">
<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;
<tr>
<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>
<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>
<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>
<tr>
<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") {
out <<EOF;
<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";
</perl>
<include src=hinweis>
</div>
</body>
</html>
Antworten
Beitrag von Sander (8133 Beiträge) am Donnerstag, 23.August.2001, 23:05.
Re: Suchwörter in Extra Datenbank speichern.
Antworten
Beitrag von Michael Koch (344 Beiträge) am Montag, 27.August.2001, 20:38.
Re: Suchwörter in Extra Datenbank speichern.
Antworten
Beitrag von Sander (32 Beiträge) am Montag, 27.August.2001, 20:52.
Re: Suchwörter in Extra Datenbank speichern.
dein code: $_put{Brueckenname} if $_sel {Brueckenname};
mein vorschlag war: $_put{Brueckenname}=$_sel{Brueckenname} if $_sel{Brueckenname};
was fällt dir auf? ;-)
Sander
Antworten
Beitrag von Michael Koch (344 Beiträge) am Montag, 27.August.2001, 21:17.
Re: Suchwörter in Extra Datenbank speichern.
Antworten
Beitrag von Sander (8133 Beiträge) am Montag, 27.August.2001, 21:41.
Re: Suchwörter in Extra Datenbank speichern.
lass dir mal $_sel{Brueckenname} vor if (%_sel) anzeigen, nachdem du danach gesucht hast.
Sander
Antworten
Beitrag von Michael Koch (344 Beiträge) am Montag, 27.August.2001, 22:03.
Re: Suchwörter in Extra Datenbank speichern.
Antworten
Beitrag von Sander (8133 Beiträge) am Montag, 27.August.2001, 23:54.
Re: Suchwörter in Extra Datenbank speichern.
Die Felder in der db heißen auch genauso? - dann wirds an der beta liegen.
Probiers mal so:
if (%_sel || $_fullsearch)
{
$speichern.="\"Brueckenname\",$_sel{Brueckenname}," if $_sel{Brueckenname};
$speichern.="\"SeitenEigentuemer\",$_sel{SeitenEigentuemer}," if $_sel {SeitenEigentuemer};
$speichern.="\"Land\",$_sel{Land}," if $_sel{Land};
$speichern.="\"Stadt\",$_sel{Stadt}," if $_sel{Stadt};
$speichern.="\"VerkehrswegUnten\",$_sel{VerkehrswegUnten}," if $_sel{VerkehrswegUnten};
$speichern.="\"VerkehrswegOben\",$_sel{VerkehrswegOben}," if $_sel{VerkehrswegOben};
$speichern.="\"Volltext\",$_fullsearch," if $_fullsearch;
$speichern.="\"Datum\",".datum("jetzt");
put [$speichern],"suche_bruecke";
hoffe mal, das das klappt - is nicht getestet
Sander
Antworten
Beitrag von Michael Koch (344 Beiträge) am Dienstag, 28.August.2001, 18:13.
Re: Suchwörter in Extra Datenbank speichern.
Antworten
Beitrag von Sander (32 Beiträge) am Dienstag, 28.August.2001, 22:15.
Re: Suchwörter in Extra Datenbank speichern. - geht jetzt
Antworten
Beitrag von Michael Koch (344 Beiträge) am Mittwoch, 29.August.2001, 19:00.
Re: Suchwörter in Extra Datenbank speichern. - geht jetzt
Danke,
fast geschaft.
Das Suchwort bei Volltext Eingabe wird nicht abgespeichert.
Das krigst du bestimmt auch noch hin.
In der suche_bruecke Datenbank habe ich für das Suchwort für die Volltextsuche
"Volltext" vorgesehen.
Antworten
Beitrag von Michael Koch (344 Beiträge) am Mittwoch, 29.August.2001, 19:46.
Re: jetzt geht alles
Antworten