Re: Datum holen... (die vierzehnte) - 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 hempelr (1976 Beiträge) am Mittwoch, 11.August.2004, 07:29.
    Re: Datum holen... (die vierzehnte)

      mhm - sorry - aber es scheint nicht so einfach zu gehen, hab grad noch mal in der Doku nachgesehen.
      Da bleibt wahrscheinlich nur der Versuch, alle Datensätze zu holen und im while_get die Ausgabe bedingt zu machen, vielleicht so:

      ---schnipp
      <perl>
      # Einzelteile des aktuellen Datums in Variablen schreiben
      $dag = datum("$startdatum","Tag"); $mon = datum("$startdatum","Monat"); $jar = datum("$startdatum","Jahr");
      # Alle DS holen, sortiert nach Geburtstagsdatum in absteigender Reihenfolge (älteste zuerst)
      get "Geburtstag==* sort=-","../../user/mitglieder","user";
      while(get_next("user")){
        # Einzelteile des Geburtstagsdatums des jeweils aktuelle DS in lok. Vars schreiben
        my $vdag = datum("$Geburtstag","Tag"); my $vmon = datum("$Geburtstag","Monat); my $vjar = datum("$Geburtstag","Jahr");
        
        if ($vmon == $mon && $vdag == $dag){# wenn Monat und Tag gleich aktuellem sind
        my $alter = $vjar - $jar; # Alter  für aktuellen DS ausrechnen
        # Ausgabe in Var "kumulativ" schreiben (Punkt Verkettet mit vorh. Inhalt)
        $geburtstagskinder .=  "$Vorname $Name zum $alter.<br>" ; 
        $cnt_geburtstagskinder++; # Zähler für gefundene Geburtstagskinder erhöhen
      }
      if ($cnt_geburtstagskinder > 0){ # wenn Geburtstagskinder vorh. ausgeben
      out "Wir gratulieren heute folgenden $cnt_geburtstagskinder Usern zum Geburtstag:<br>";
      out "<font size=1>$geburtstagskinder</font>";
      }
      </perl>
      
      ----schnapp
      Hoffe das geht so - nicht getestet!
      Ruben


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von UweS (220 Beiträge) am Dienstag, 10.August.2004, 17:53.
    Datum holen... (die vierzehnte)

      Hallo!

      Ich find nix, die Doku versteh ich nich und hilllfffeee...

      Ich habe einen Kalender mit laufendem Tagesdatum. (Bib>Danke)

      Raus kommt die var $startdatum mit dem Wert (z.B) 2004.08.11,12:00.00#3 .

      Ich möchte aus meiner Mitglieder DB alle Geburtstage holen die an diesem Tag und Monat Geburtstag haben=>

      $gebtag=datum"$startdatum", "Tag.Monat";
      get "Geburtstag==$gebtag", "db", "user"; 
      

      while(get_next("user"))
      {out "<font size=1>$Vorname $Name</font>";}
      

      Wie mache ich das richtig...?

     Antworten

    Beitrag von hempelr (1976 Beiträge) am Dienstag, 10.August.2004, 18:21.
    Re: Datum holen... (die vierzehnte)

      ---schnipp
      <perl>
      $dag = datum("$startdatum","Tag0"); $mon = datum("$startdatum","Monat0");
      get "_Geburtstag_Monat==$mon _Geburtstag_Tag==$dag","db","user";
      out "Wir gratulieren heute zum Geburtstag:<br>" if $_amount_query > 0;
      while(get_next("user")){
      out out "<font size=1>$Vorname $Name</font>";
      }
      
      ---schnapp
      so oder so ähnlich solltes funzen - not testet!

     Antworten

    Beitrag von UweS (220 Beiträge) am Dienstag, 10.August.2004, 22:32.
    Re: Datum holen... (die vierzehnte)

      Danke erstmal...

      Es scheint noch an der Abfrage zu hängen:

      get "_Geburtstag_Monat==$mon _Geburtstag_Tag==$dag","../../user/mitglieder","user";
      

      liefert immer $_amount = 0

      $dag und $ mon werden korrekt befüllt ...
      
      Sortierung auf Geburtstag ist an ...

      <???>
      

     Antworten

    Beitrag von hempelr (1976 Beiträge) am Mittwoch, 11.August.2004, 07:29.
    Re: Datum holen... (die vierzehnte)

      mhm - sorry - aber es scheint nicht so einfach zu gehen, hab grad noch mal in der Doku nachgesehen.
      Da bleibt wahrscheinlich nur der Versuch, alle Datensätze zu holen und im while_get die Ausgabe bedingt zu machen, vielleicht so:

      ---schnipp
      <perl>
      # Einzelteile des aktuellen Datums in Variablen schreiben
      $dag = datum("$startdatum","Tag"); $mon = datum("$startdatum","Monat"); $jar = datum("$startdatum","Jahr");
      # Alle DS holen, sortiert nach Geburtstagsdatum in absteigender Reihenfolge (älteste zuerst)
      get "Geburtstag==* sort=-","../../user/mitglieder","user";
      while(get_next("user")){
        # Einzelteile des Geburtstagsdatums des jeweils aktuelle DS in lok. Vars schreiben
        my $vdag = datum("$Geburtstag","Tag"); my $vmon = datum("$Geburtstag","Monat); my $vjar = datum("$Geburtstag","Jahr");
        
        if ($vmon == $mon && $vdag == $dag){# wenn Monat und Tag gleich aktuellem sind
        my $alter = $vjar - $jar; # Alter  für aktuellen DS ausrechnen
        # Ausgabe in Var "kumulativ" schreiben (Punkt Verkettet mit vorh. Inhalt)
        $geburtstagskinder .=  "$Vorname $Name zum $alter.<br>" ; 
        $cnt_geburtstagskinder++; # Zähler für gefundene Geburtstagskinder erhöhen
      }
      if ($cnt_geburtstagskinder > 0){ # wenn Geburtstagskinder vorh. ausgeben
      out "Wir gratulieren heute folgenden $cnt_geburtstagskinder Usern zum Geburtstag:<br>";
      out "<font size=1>$geburtstagskinder</font>";
      }
      </perl>
      
      ----schnapp
      Hoffe das geht so - nicht getestet!
      Ruben

     Antworten

    Beitrag von UweS (220 Beiträge) am Mittwoch, 11.August.2004, 11:30.
    Re: Datum holen... (die vierzehnte)

      Juhuu! Vielen vielen vielen Dank!

      Noch ein bisserl Feinarbeit, Variablen am Schluss geleert und so und es läuft...

      Jetzt kann ich in Ruhe schlafen... *g*

     Antworten


     
 Liste der Einträge von 28950 bis 29025: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.09s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!