Beitrag von Gerrit (81 Beiträge) am Freitag, 9.Mai.2003, 15:57.
Url als Link ausgeben
Hallo.
Für das Suchfeld habe ich den unten stehenden Code eingegeben. Suche ich mittels des Suchfeldes, dann wird die URL als Text ausgegeben. Ich möchte die URL aber als Link ausgeben. Wie sieht dann der Code aus?
Danke. Gerrit.
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data">
<input type="hidden" name="htx=" value="$htx">
Freie Suche: <input type="text" name="_fullsearch~~" value="$_fullsearch">
<input type="submit" value="Suchen">
</form>
<perl>
return if $_fullsearch eq "";
get "fullsearch_match=10";
while(get_next)
{
$out= <<EOF;
<b>$Titel</b><br>$Beschreibung - $URL: $_put{"URL"}<p>
EOF
$out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g;
out $out;
}
my $newrange=$_fullsearch_range+$_fullsearch_range_length;
my $txt;
if($_fullsearch_match_pos<$newrange)
{
$txt="Suche nach weiteren Treffern";
$newrange=$_fullsearch_match_pos;
} else
{
out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1;
$txt="Suche in weiteren Datensätzen";
}
if($newrange<$_amount_all)
{
out "Es wurde noch nicht in allen Datensätzen gesucht: ";
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
} else
{
out "Die Datenbank wurde komplett durchsucht.";
}
</perl>
Antworten
Beitrag von Gerrit (81 Beiträge) am Freitag, 9.Mai.2003, 16:01.
Re: Url als Link ausgeben - Kompletter Code
Hallo.
Für das Suchfeld habe ich den unten stehenden Code eingegeben. Suche ich mittels des Suchfeldes, dann wird die URL als Text ausgegeben. Ich möchte die URL aber als Link ausgeben. Wie sieht dann der Code aus?
Danke. Gerrit.
<do action=all sort^=Titel range^=0,20 pagebrowse=top buttonbrowse=no indexfield=Titel listtype=list listfields=Titel,Beschreibung,URL input=link>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data">
<input type="hidden" name="htx=" value="$htx">
Freie Suche: <input type="text" name="_fullsearch~~" value="$_fullsearch">
<input type="submit" value="Suchen">
</form>
<perl>
return if $_fullsearch eq "";
get "fullsearch_match=10";
while(get_next)
{
$out= <<EOF;
<b>$Titel</b><br>$Beschreibung - $URL: $_put{"URL"}<p>
EOF
$out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g;
out $out;
}
my $newrange=$_fullsearch_range+$_fullsearch_range_length;
my $txt;
if($_fullsearch_match_pos<$newrange)
{
$txt="Suche nach weiteren Treffern";
$newrange=$_fullsearch_match_pos;
} else
{
out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1;
$txt="Suche in weiteren Datensätzen";
}
if($newrange<$_amount_all)
{
out "Es wurde noch nicht in allen Datensätzen gesucht: ";
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
} else
{
out "Die Datenbank wurde komplett durchsucht.";
}
</perl>
Antworten
Beitrag von Gerrit (81 Beiträge) am Freitag, 9.Mai.2003, 19:21.
Re: Url als Link ausgeben - Kompletter Code + Fragen
Hallo.
Für das Suchfeld habe ich den unten stehenden Code eingegeben. Suche ich mittels des Suchfeldes, dann wird die URL als Text ausgegeben. Ich möchte die URL aber als Link ausgeben. Wie sieht dann der Code aus?
Gut, dass noch keiner geantwortet hat. Mir sind nämlich noch zwei Fragen eingefallen:
1. Wie bekomme ich die Karteikarten weg? (Registerkarten von A bis Z im Kopf der Seite)
2. Wie bekomme ich es hin, dass die Ausgabe im Schriftformat font face="Arial" size="2" ist?
Danke. Gerrit.
<do action=all sort^=Titel range^=0,20 pagebrowse=top buttonbrowse=no indexfield=Titel listtype=list listfields=Titel,Beschreibung,URL input=link>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data">
<input type="hidden" name="htx=" value="$htx">
Freie Suche: <input type="text" name="_fullsearch~~" value="$_fullsearch">
<input type="submit" value="Suchen">
</form>
<perl>
return if $_fullsearch eq "";
get "fullsearch_match=10";
while(get_next)
{
$out= <<EOF;
<b>$Titel</b><br>$Beschreibung - $URL: $_put{"URL"}<p>
EOF
$out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g;
out $out;
}
my $newrange=$_fullsearch_range+$_fullsearch_range_length;
my $txt;
if($_fullsearch_match_pos<$newrange)
{
$txt="Suche nach weiteren Treffern";
$newrange=$_fullsearch_match_pos;
} else
{
out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1;
$txt="Suche in weiteren Datensätzen";
}
if($newrange<$_amount_all)
{
out "Es wurde noch nicht in allen Datensätzen gesucht: ";
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
} else
{
out "Die Datenbank wurde komplett durchsucht.";
}
</perl>
Antworten
Beitrag von Gerrit (81 Beiträge) am Freitag, 9.Mai.2003, 21:20.
Re: Url als Link ausgeben - Fast gelöst
Hab ein bischen getüftelt und mich in den Musterlösungen rumgeblättert.
1. URL wird jetzt als Link ausgegeben
2. Und die Schrift wird jetzt auch im gewünschten Format ausgegeben.
Muss jetz nur noch sehen, wie ich die Karteikarten wegbekomme.
Gerrit.
Antworten
Beitrag von Gerrit (81 Beiträge) am Freitag, 9.Mai.2003, 21:54.
Re: Url als Link ausgeben - Fast gelöst
Jetzt habe ich die Registerkarte auch rausgeschmissen.
Nun habe ich noch folgendes Problem: Ich möchte auf der Seite nur das Suchfeld haben und sonst gar nichts. Jetzt sind da noch folgende Felder: Wie bekomme ich die noch weg?
------------------------------------
Alles Suchen Auswahl Detail
1 Eintrag gesamt:
Titel Beschreibung URL
-------------------------------------
Hier der Quelltext:
<do action=all sort^=Titel range^=0,20 pagebrowse=top buttonbrowse=no listtype=list input=link>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data">
<input type="hidden" name="htx=" value="$htx">
Freie Suche: <input type="text" name="_fullsearch~~" value="$_fullsearch">
<input type="submit" value="Suchen">
</form>
<perl>
return if $_fullsearch eq "";
get "fullsearch_match=10";
while(get_next)
{
$out= <<EOF;
<font face="Arial" size="3" color="#0000FF">
<b>$Titel</b></font><br><font face="Arial" size="2"><b>$Beschreibung</b></font><br><font face="Arial" size="2"><a href="$URL" target="_blank"><b>$URL</b></a>
</font>
<p><p>
EOF
$out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g;
out $out;
}
my $newrange=$_fullsearch_range+$_fullsearch_range_length;
my $txt;
if($_fullsearch_match_pos<$newrange)
{
$txt="Suche nach weiteren Treffern";
$newrange=$_fullsearch_match_pos;
} else
{
out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1;
$txt="Suche in weiteren Datensätzen";
}
if($newrange<$_amount_all)
{
out "Es wurde noch nicht in allen Datensätzen gesucht: ";
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
} else
{
out "Die Datenbank wurde komplett durchsucht.";
}
</perl>
<br>
Antworten
Beitrag von Gerrit (81 Beiträge) am Freitag, 9.Mai.2003, 21:57.
Re: Url als Link ausgeben - Fast gelöst
Hab ein bischen getüftelt und mich in den Musterlösungen rumgeblättert.
1. URL wird jetzt als Link ausgegeben
2. Und die Schrift wird jetzt auch im gewünschten Format ausgegeben.
Muss jetz nur noch sehen, wie ich die Karteikarten wegbekomme.
Gerrit.
Antworten
Beitrag von Gerrit (81 Beiträge) am Samstag, 10.Mai.2003, 00:53.
Re: Url als Link ausgeben - Ihr könnt euch wieder hinlegen
...denn ich hab's geschafft (dank eurer Bibliothek). Aber schaut mal auf die Uhr wie lange ich daran rumgedoktort habe.
Dann mach ich jetzt mal den Sittich und wünsch euch gute Nacht.
Gerrit
Antworten
Beitrag von Christoph Bergmann (8110 Beiträge) am Samstag, 10.Mai.2003, 08:17.
Re: Url als Link ausgeben - Ihr könnt euch wieder hinlegen
Antworten
