Re: Leere Felder Probleme mit ; - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von Christoph Bergmann (8110 Beiträge) am Montag, 25.Oktober.2004, 13:57.
    Re: Leere Felder Probleme mit ;

      Äh, Du meintest sicher:

      <loop db=/ sort=- code=perl range=0,900>
if ($_raw{Email} ne ""){
$out.="$Email;";
}
</loop>
<perl>
chop $out; #letztes ; entfernen
out $out;
</perl>

      Alex123: Schöner wärs, die Mails gleich zu verschicken mit dem "mail"-Befehl (kleiner Zaunpfahl-Wink doch zu mieten ;-) )


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Alex123 (3 Beiträge) am Sonntag, 24.Oktober.2004, 20:39.
    Leere Felder Probleme mit ;

      Hallo
      ich möchte diesmal alle Emailadressen meiner Datenbank anzeigen lassen, damit ich die nur noch kopieren muss und allen eine Mail senden kann.
      Nur da brauche ich ja einen ; dazwischen. Denn ich auch schön hinbekomme.
      Aber leider ist es nun so, wenn eine Person keine Email eingetragen hat steht danach auch der ;. So steht dan beispielsweise
      emai1@web.de;;;;;;email2@web.de

      Was mss ich machen um leere Datensätze zu überspringen?

      Die besten Grüße
      Alex

      <loop db=/ sort=- code=perl range=0,900>

      out $Email if $_raw{Email} ne "";
      out ";";

      </loop>
          

      <perl>

                      <P>&nbsp;</P>

     Antworten

    Beitrag von Sander (8133 Beiträge) am Sonntag, 24.Oktober.2004, 20:50.
    Re: Leere Felder Probleme mit ;

      unschön:
      <loop db=/ sort=- code=perl range=0,900>
if ($_raw{Email} ne ""){
out "$Email;";
}
</loop>
 
konform:

      <loop db=/ sort=- code=perl range=0,900>
      if ($_raw{Email} ne ""){
$out="$Email;";
}
chop $out;     #letztes ; entfernen
out $out;
</loop>

     Antworten

    Beitrag von Alex123 (3 Beiträge) am Montag, 25.Oktober.2004, 11:03.
    Re: Fehler nicht behoben

      Hallo
      Danke Sander für den Tipp, aber nun sind zwar die leeren Felder nicht mit drin, aber es hängt jede Email an der anderen.

      also so: ddd@web.devvvv@web.dejjj@web.de

      Nun hab ich mir gedacht, es könnte ja auch so klappen:

      if ($_raw{Email} ne ""){
$out="$Email;";
out ";";
}
chop $out; #letztes ; entfernen
out $out;
 

      Nun siehts aber so aus:
      www@web.de;eee@web.de;fehler@gmx.defehler@gmx.dfehler@gmx.;fff@web.de....

      also er bringt mir die 3. Email 3 mal und zwar immer anders.
      Email nur 5 zeigt er 6 mal an auch immer ohne ; ....

      Was kann es sein?

      Danke schon mal
      Alex

     Antworten

    Beitrag von Old Eagle Eye (148 Beiträge) am Montag, 25.Oktober.2004, 11:55. WWW: www.bigmountain.at
    Re: Fehler nicht behoben

      Hallo Alex,

      ich bin zwar jetzt nicht der absolute Perl Spezialist, aber dein Code erscheint mir dann doch eigenartig und kann imho so auch nicht funzen.

      Du weisst der Variable $out (offensichtlich innerhalb einer Schleife [loop]) jeweils den Wert von $EMail zu und gibts anschliessend mit dem Befehl out etwas (nämlich einen Strichpunkt) aus?!?

      Das kann, so wie du es geschrieben hast, eigentlich kein vernünftiges Ergebnis produzieren.

      Ich würde mir jedenfalls eine Variable innerhalb der Schleife füllen und diese dann erst zum Ende ausgeben - also in etwa so

      [Code Fragment in Perl]
      $eMailTo=""; ## Variable [leer] Definieren
$Parameter="Hier steht die Abfrage Bedingung, also z.B. $raw{Email ne "")";
$Orderby="Falls du Sortierung haben möchtest, also z.B. aufsteigend nach Email-Adresse";
get "$Parameter sort=$Orderby", "Deine Datenbank", "Aufrufname";
while (get_next("Aufrufname")){
$eMailTo.="$Email\;";
}
chop $eMailTo; ##letzten Strichpunkt wegschmeissen
out $eMailTo;
      [ENDE Code Fragment in Perl]

      lg
      OEE

     Antworten

    Beitrag von Sander (8133 Beiträge) am Montag, 25.Oktober.2004, 12:12.
    Re: Fehler nicht behoben

      du hast meinen code bestimmt nicht richtig übernommen, hinter $Email ist ein ; dabei

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Montag, 25.Oktober.2004, 13:57.
    Re: Leere Felder Probleme mit ;

      Äh, Du meintest sicher:

      <loop db=/ sort=- code=perl range=0,900>
if ($_raw{Email} ne ""){
$out.="$Email;";
}
</loop>
<perl>
chop $out; #letztes ; entfernen
out $out;
</perl>

      Alex123: Schöner wärs, die Mails gleich zu verschicken mit dem "mail"-Befehl (kleiner Zaunpfahl-Wink doch zu mieten ;-) )

     Antworten

    Beitrag von Sander (8133 Beiträge) am Montag, 25.Oktober.2004, 15:13.
    Re: Leere Felder Probleme mit ;

      ähja, ähm, äh.... sorry ;-)

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Montag, 25.Oktober.2004, 15:27.
    Re: Leere Felder Probleme mit ;

      Äh... ;-)

     Antworten

    Beitrag von Alex123 (3 Beiträge) am Dienstag, 26.Oktober.2004, 07:51.
    Re:SO nun gehts

      Oh ja, nun klappts.


      "Alex123: Schöner wärs, die Mails gleich zu verschicken mit dem "mail"-Befehl (kleiner Zaunpfahl-Wink doch zu mieten ;-) )"

      Das habe ich noch nie gehört, werde mich aber gleich mal ran machen.
      Nur ob ich hier auch sagen kann, nur alle mit der PLZ9
      und so weiter.


      Aber ihr habt mir schon super geholfen und für meine Zwecke reicht das.


      Die besten Wünsche
      Alex

     Antworten


     
 Liste der Einträge von 27451 bis 27601: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

Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.05s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!