| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| Ausgewählter Eintrag: | Zur Liste |
| Alle Einträge zum Thema: | Zur Liste |
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center"> <tr>
$loopcnt++; ##entspricht der Anzahl der gefundenen Datensätze
if ($vglfeld ne $Event){
if (loopcnt!=1){## Trenner einfügen - jedoch nicht beim 1 Durchlauf
out "</td></tr><p></p><td align=\"center\" valign=\"middle\"><img src=\"http://deine.domain.com/images/daBild.png\"><p></p></td></tr>";
}
$loopcnt=1;## stelle den Zähler auf 1
$vglfeld=$Event;## gefundenen Wert 1-malig zuweisen
}
if ($Event ne ""){
out "<tr align=\"center\" valign=\"top\"><td><p><b>$Event</b></p>";
}else{
out "<tr align=\"center\" valign=\"top\"><td><p><b>diverse Bilder</b></p>";
}
}
</loop> </td></tr> <table>
get "Ort==*","datenbank"; #ausgabe sortiert nach Ort
while (get_next("datenbank")) {
unless %seen{$Ort}++ { #Orte die noch nicht gesehen,
$Ortliste .= "<option>$Ort" #an liste zur ausgabe anhängen
} #ende unless
} #ende while
#HTML ausgabe des formulars
out <<EOF;
<form usw....
<select name="zeigeort=" size="1">
$Ortliste
</select>
</form>
EOF
<form.... usw> <select name="zeigeort=" size="1"> <loop db=ortindex code=perl> out "<option>$Ort"; </loop> </select> <input type="submit" value="suchen"> </form>
| Liste der Einträge von 54150 bis 54300: | 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 |