baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
Nordlohn St. heilig Kreuz heilig@uwe-einhaus.de Nordlohn St. hlg. Kreuz hlg@uwe-einhaus.de Nordlohn leer@uwe-einhaus.de <perl>
$formStammname="St. hlg. Kreuz"; ### formStammname wird Wert zugewiesen. In Realität mit html-Formularfunktion input $formStamm="13"; ### s. o.
$EMailliste=""; $formStammnameoL=$formStammname; ### def. Vergleichsvariabel "ohne Leerzeichen $formOrtoL=$formOrt; ### def. Vergleichsvariabel "ohne Leerzeichen $Leerzeichen=""; ### Unschön, aber ich weiss keine Alternative für mod bzw. get Befehl, ggf."" ? $formStammnameoL=~ s/ /\\ /g; ### Präparieren der Leerzeichen für get Befehl (Vergleich) $formOrtoL=~ s/ /\\ /g; ### Präparieren der Leerzeichen für get Befehl (Vergleich)
get "Stammnummer==$Leerzeichen & Ort==$formOrtoL & Stammname==$formStammnameoL","Adrl"; while(get_next("Adrl")) { $EMailliste="$EMail, $EMailliste"; out "Stammname $ Stammname in Adrl angegeben: $formStammnameoL<br>";
} get "Stammnummer==$Leerzeichen & Ort==$formOrtoL & Stammname==$Leerzeichen","Adrl"; while(get_next("Adrl")) { $EMailliste="$EMail, $EMailliste"; } mod "Stammnummer==$Leerzeichen and Ort==$formOrtoL and Stammname==$formStammnameoL", ["Stammnummer", "$formStamm"], "Adrl"; mod "Stammnummer==$Leerzeichen and Ort==$formOrtoL and Stammname==$Leerzeichen", ["Stammname", "$formStammname", "Stammnummer", "$formStamm"], "Adrl";
<\perl>
|
Alle Einträge zum Thema: | Zur Liste |
Nordlohn St. heilig Kreuz heilig@uwe-einhaus.de Nordlohn St. hlg. Kreuz hlg@uwe-einhaus.de Nordlohn leer@uwe-einhaus.de <perl>
$formStammname="St. hlg. Kreuz"; ### formStammname wird Wert zugewiesen. In Realität mit html-Formularfunktion input $formStamm="13"; ### s. o.
$EMailliste=""; $formStammnameoL=$formStammname; ### def. Vergleichsvariabel "ohne Leerzeichen $formOrtoL=$formOrt; ### def. Vergleichsvariabel "ohne Leerzeichen $Leerzeichen=""; ### Unschön, aber ich weiss keine Alternative für mod bzw. get Befehl, ggf."" ? $formStammnameoL=~ s/ /\\ /g; ### Präparieren der Leerzeichen für get Befehl (Vergleich) $formOrtoL=~ s/ /\\ /g; ### Präparieren der Leerzeichen für get Befehl (Vergleich)
get "Stammnummer==$Leerzeichen & Ort==$formOrtoL & Stammname==$formStammnameoL","Adrl"; while(get_next("Adrl")) { $EMailliste="$EMail, $EMailliste"; out "Stammname $ Stammname in Adrl angegeben: $formStammnameoL<br>";
} get "Stammnummer==$Leerzeichen & Ort==$formOrtoL & Stammname==$Leerzeichen","Adrl"; while(get_next("Adrl")) { $EMailliste="$EMail, $EMailliste"; } mod "Stammnummer==$Leerzeichen and Ort==$formOrtoL and Stammname==$formStammnameoL", ["Stammnummer", "$formStamm"], "Adrl"; mod "Stammnummer==$Leerzeichen and Ort==$formOrtoL and Stammname==$Leerzeichen", ["Stammname", "$formStammname", "Stammnummer", "$formStamm"], "Adrl";
<\perl>
mod und get auf NULL geht nicht so, das muß etwa so aussehen und alle deine probleme sollten weg sein: mod ["Stammnummer","==","","and","Ort","==",$formOrtoL,"and","Stammname","==",$formStammnameoL],["Stammnummer", "$formStamm"], "Adrl";
get "Stammnummer>( & Ort==$formOrtoL & Stammname==$Leerzeichen","Adrl";
out "vor chop: EMailliste: $EMailliste"; chop $EMailliste; out "nach chop: EMailliste: $EMailliste";
$EMailliste="$EMail, $EMailliste";
substr($EMailliste,-2)="";
substr($EMailliste,-2)="";
Liste der Einträge von 44400 bis 44550: | 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 |