Re: Zeitdiff. in Tagen,Stunden,Minuten,Sekunden - 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 olaf (59 Beiträge) am Sonntag, 5.Oktober.2003, 19:28. WWW: kleclan.de
    Re: Zeitdiff. in Tagen,Stunden,Minuten,Sekunden

      hallo hddu,

      brauchst doch eigentlich "nur" ;-) eine möglichkeit ein datum in sekunden umzuwandeln. beide daten in sekunden umwandeln - diff. bilden und in das umrechenen was du brauchst. das ist eigentlich keine frage für das bp-forum sondern eher eins für das perl-forum bzw. für ein mathe-forum.

      falls du andere perl-module hinzuladen kannst, dann schau dir doch mal das modul Time::Local an.

      und dann hast du auch noch die möglichkeit dir ohne module was in perl zu stricken, was dir ein datum in sek umrechnet. warte mal, da fällt mir ein, ich hatte mal ein ähnliches prob. mit der sub da unten kannste ein datum in sekunden bezogen auf 1970 umwandeln. 1970 deswegen, damit man die sekunden auch wieder mit gmtime() zurück in datum umwandeln kann. die sub ist mit sicherheit nicht die beste und schnellste. aber sie tuts.

      damit bekommst du die diff wie folgt in sekunden:

      $sek=DateToSek( $heute )-DateToSek( $früher );

      $heute und $früher sind dabei wie folgt aufgebaut: "$jahr,$monat,$tag,$stunde,$minute,$sekunde". z.b. "2003,10,5,16,27,38". ich hab deswegen nur einen scalar als übergabe wert genommen, damit man sich das datum auch mittels datum() von bp holen bzw zusammenbasteln kann. kann man aber auch ändern. man muss halt nur schauen, das die werte dahin kommen wo sie hingehören ;-). zu bedenken ist, das fehler in den angaben nicht abgefangen werden.

      das umwandeln der sek in tage, stunden, minuten und sekunden dürfte dann nicht mehr das prob sein.

      gruss
      olaf

      sub DateToSek{
 my ($j,$m,$t,$std,$min,$sek)=split /,/,$_[0];

       my @mon;
 $mon[1]=0;
 $mon[2]=31;
 $mon[3]=59;
 $mon[4]=90;
 $mon[5]=120;
 $mon[6]=151;
 $mon[7]=181;
 $mon[8]=212;
 $mon[9]=243;
 $mon[10]=273;
 $mon[11]=304;
 $mon[12]=334;
 my $sjb=$j/4;
 my $sja=int($sjb-492.25);
 if ($sjb==int($sjb) and $m>2) { $sja++; }

       $sek=$sek+$min*60+$std*3600+($mon[$m]+$t-1)*86400+($j-1970)*31536000+$sja*86400;
      }


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von hddue (37 Beiträge) am Sonntag, 5.Oktober.2003, 17:27.
    Zeitdiff. in Tagen,Stunden,Minuten,Sekunden

      Hallo zusammen,

      wie gebe ich eine Zeitdiff. aus?

      Beispiel:

      Startzeit: 04.10.2003 13:05:13

      Endzeit: 07.10.2003 16:03:20

      Wie erhalte ich den Unterschied in Tagen,Stunden,Minuten und Sekunden
      bis zur Endzeit.

      Gruß

      hddue

     Antworten

    Beitrag von olaf (59 Beiträge) am Sonntag, 5.Oktober.2003, 19:28. WWW: kleclan.de
    Re: Zeitdiff. in Tagen,Stunden,Minuten,Sekunden

      hallo hddu,

      brauchst doch eigentlich "nur" ;-) eine möglichkeit ein datum in sekunden umzuwandeln. beide daten in sekunden umwandeln - diff. bilden und in das umrechenen was du brauchst. das ist eigentlich keine frage für das bp-forum sondern eher eins für das perl-forum bzw. für ein mathe-forum.

      falls du andere perl-module hinzuladen kannst, dann schau dir doch mal das modul Time::Local an.

      und dann hast du auch noch die möglichkeit dir ohne module was in perl zu stricken, was dir ein datum in sek umrechnet. warte mal, da fällt mir ein, ich hatte mal ein ähnliches prob. mit der sub da unten kannste ein datum in sekunden bezogen auf 1970 umwandeln. 1970 deswegen, damit man die sekunden auch wieder mit gmtime() zurück in datum umwandeln kann. die sub ist mit sicherheit nicht die beste und schnellste. aber sie tuts.

      damit bekommst du die diff wie folgt in sekunden:

      $sek=DateToSek( $heute )-DateToSek( $früher );

      $heute und $früher sind dabei wie folgt aufgebaut: "$jahr,$monat,$tag,$stunde,$minute,$sekunde". z.b. "2003,10,5,16,27,38". ich hab deswegen nur einen scalar als übergabe wert genommen, damit man sich das datum auch mittels datum() von bp holen bzw zusammenbasteln kann. kann man aber auch ändern. man muss halt nur schauen, das die werte dahin kommen wo sie hingehören ;-). zu bedenken ist, das fehler in den angaben nicht abgefangen werden.

      das umwandeln der sek in tage, stunden, minuten und sekunden dürfte dann nicht mehr das prob sein.

      gruss
      olaf

      sub DateToSek{
 my ($j,$m,$t,$std,$min,$sek)=split /,/,$_[0];

       my @mon;
 $mon[1]=0;
 $mon[2]=31;
 $mon[3]=59;
 $mon[4]=90;
 $mon[5]=120;
 $mon[6]=151;
 $mon[7]=181;
 $mon[8]=212;
 $mon[9]=243;
 $mon[10]=273;
 $mon[11]=304;
 $mon[12]=334;
 my $sjb=$j/4;
 my $sja=int($sjb-492.25);
 if ($sjb==int($sjb) and $m>2) { $sja++; }

       $sek=$sek+$min*60+$std*3600+($mon[$m]+$t-1)*86400+($j-1970)*31536000+$sja*86400;
      }

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Sonntag, 5.Oktober.2003, 19:49.
    Re: Zeitdiff. in Tagen,Stunden,Minuten,Sekunden

      Schau mal in die Bibliothek, da gibt es von Pouraga ein Tool zum Zeit-Differenz-Ermitteln... ;-)

     Antworten


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