Re: Datumwert in Formular einlesen - 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 Oliver ;-) (500 Beiträge) am Donnerstag, 2.Mai.2002, 10:06.
    Re: Datumwert in Formular einlesen

      Hallo Klaus,

      versuche es mal in der Form (hat mir mal Sander bei geholfen):

      <perl>
out "<select name=\"_Anfang_Tag:=\">";
for (1..31)
{
out "<option";
out " selected" if $_ == datum($Anfang,"Tag");
out ">".(length($_)==1?"0":"")."$_</option>"; #wenn länge = 1 ist, wird ne 0 davorgeschrieben
}
out "</select><select name=\"_Anfang_Monat:=\">";
for ("Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember")
{
out "<option";
out " selected" if $_ eq datum($Anfang,"Monatname");
out ">$_</option>";
}
out "</select><select name=\"_Anfang_Jahr:=\">";
for (2001..2010)
{
out "<option";
out " selected" if $_ == datum($Anfang,"Jahr");
out ">$_</option>";
}
out "</select>";
</perl>


      Grüße
      Oliver ;-)


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Klaus S. (11 Beiträge) am Dienstag, 30.April.2002, 22:55.
    Datumwert in Formular einlesen

      Wer kann mir helfen?

      Bastle gerade an einem Formular, in welchem auch ein Datum mittels Dropdown-Menü veränderbar sein soll. Das Ändern in der Datenbank klappt schon, aber leider wird der Inhalt des Datumfeldes nicht aus der Datenbank in das Formular eingelesen. Was mache ich falsch? Der Code sieht an den betreffenden Stellen so aus:

      if ($_Anfang_Tag eq "1")
      { $at1_select="selected";}
      elsif ($_Anfang_Tag eq "2")
          { $at2_select="selected";}
      elsif ($_Anfang_Tag eq "3")
          { $at3_select="selected";}
      elsif ($_Anfang_Tag eq "4")
          { $at4_select="selected";}
      elsif ($_Anfang_Tag eq "5")
          { $at5_select="selected";}
      ........
      
      elsif ($_Anfang_Tag eq "29")
          { $at29_select="selected";}
      elsif ($_Anfang_Tag eq "30")
          { $at30_select="selected";}
      else 
          { $at31_select="selected";}

           ..............

      <TD bgcolor="$farbe1" ><FONT face=arial,helvetica size=2>
<SELECT name=x_Anfang_Tag=>
<OPTION $at1_select>1
<OPTION $at2_select>2
<OPTION $at3_select>3
<OPTION $at4_select>4
<OPTION $at5_select>5

      ..............

      <OPTION $at28_select>28
<OPTION $at29_select>29
<OPTION $at30_select>30
<OPTION $at31_select>31
</OPTION></SELECT>.

      Beispiel ist unter http://ferienrevue.de/baseportal/datumtest/dat01
      zusehen

      Für schnelle Hilfe wäre ich dankbar!!

      Gruß Klaus

     Antworten

    Beitrag von Oliver ;-) (500 Beiträge) am Donnerstag, 2.Mai.2002, 10:06.
    Re: Datumwert in Formular einlesen

      Hallo Klaus,

      versuche es mal in der Form (hat mir mal Sander bei geholfen):

      <perl>
out "<select name=\"_Anfang_Tag:=\">";
for (1..31)
{
out "<option";
out " selected" if $_ == datum($Anfang,"Tag");
out ">".(length($_)==1?"0":"")."$_</option>"; #wenn länge = 1 ist, wird ne 0 davorgeschrieben
}
out "</select><select name=\"_Anfang_Monat:=\">";
for ("Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember")
{
out "<option";
out " selected" if $_ eq datum($Anfang,"Monatname");
out ">$_</option>";
}
out "</select><select name=\"_Anfang_Jahr:=\">";
for (2001..2010)
{
out "<option";
out " selected" if $_ == datum($Anfang,"Jahr");
out ">$_</option>";
}
out "</select>";
</perl>


      Grüße
      Oliver ;-)

     Antworten

    Beitrag von Klaus S. (11 Beiträge) am Donnerstag, 2.Mai.2002, 21:10.
    Re: Datumwert in Formular einlesen

      Hallo Oliver,

      besten Dank!!! für Deinen Tip ich glaube es funktioniert. Und dabei ist der Code sogar noch viel kürzer als meiner.
      Werde Ihn jetzt mal komplett einbauen und ausgiebig testen. Falls dann noch Probleme auftreten, melde ich mich wieder.

      Gruß Klaus

     Antworten


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