0

Per Button Nummern anlegen

Hallo Hat jemand eine Idee für einen Code für folgende Situation:

Zahlenfeld --> Startnummer

Zahlenfeld --> Anzahl

Button--> fortlaufende Nummern erstellen

Mehrzeiliges Textfeld --> Hier soll nach dem Klick auf dem Button alle Fortlaufenden Nummern drin stehen beginnend mit der Startnummer immer + 1

 

vielen Dank bereits

 

gruß Johannes
 

9 Antworten

null
    • Leonid_Semik
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Hallo Johannes;

    ---

    'Mehrzeiliges Textfeld':=join(((select 'DEINE TABELLE') order by Startnummer).text(Startnummer), "
    ")

    ---

    Leo

    • Johannes_B
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Hallo Leo, ich glaube dann habe ich mich falsch ausgedrückt.

    Wenn ich in das Feld Startnummer 1000 eintrage und in das Feld Anzahl 5 soll nach dem Buttonklick in dem Textfeld 1000 1001 1002 1003 1004 stehen

    Gruss Johannes

    • Torsten_Stang.1
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Hallo Johannes,

     

    'Mehrzeiliges Textfeld' := null;
    for i from 0 to Anzahl do
       'MehrzeiligesTextfeld' := 'Mehrzeiliges Textfeld' + " " + text(Startnummer + i)
    end

     

    lg, Torsten

    • Torsten_Stang.1
    • vor 3 Jahren
    • Gemeldet - anzeigen

    ... erm, ein Typo, sorry:

     

    'Mehrzeiliges Textfeld' := null;
    for i from 0 to Anzahl do
       'Mehrzeiliges Textfeld' := 'Mehrzeiliges Textfeld' + " " + text(Startnummer + i)
    end

    • Leonid_Semik
    • vor 3 Jahren
    • Gemeldet - anzeigen

    'Mehrzeiliges Textfeld' :=join( for i in range(Anzahl) do

    Startnummer+i

    end, "

    ")

    • Leonid_Semik
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Oh, da war der Torsten schneller. So geht natürlich auch

    • Torsten_Stang.1
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Deins ist dafür schicker, Leo ;-)

    • Johannes_B
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Hallo ihr beiden ich habe es mal folgendermaßen Umgesetzt:

    let SZ := Startzahl;
    let AZ := Anzahl;
    let Abfrage := dialog("Barcodes erstellen", "Sollen jetzt " + text(round(AZ / 3) * 3) + " Barcodes, beginnend mit " + SZ + " per Mail an Sie versendet werden?

    Hinweis: Ihre Anzahl wurde auf den nächstmöglichen 3er Block auf- bzw. abgerundet.", ["Ja", "Nein"]);
    if Abfrage = "Ja" then
    let html1 := "<div style='text-align: center;'>";
    let html3 := "<img alt='Barcode Generator TEC-IT'
    src='https://barcode.tec-it.com/barcode.ashx?data=Nr.";
    let html2 := "&code=Code128&multiplebarcodes=false&translate-esc=true&unit=Fit&dpi=96&imagetype=Gif&rotation=0&color=%23000000&bgcolor=%23ffffff&codepage=Default&qunit=Mm&quiet=0'/>&ensp;&ensp;";
    let html4 := "<div style='padding-top:8px; text-align:center; font-size:15px; font-family: Source Sans Pro, Arial, sans-serif;'></div>";
    let myHTML := for i from 0 to round(AZ / 3) do
    html1 + html3 + text(SZ + 3 * i) + html2 + " " + html3 + text(SZ + 3 * i + 1) + html2 + " " + html3 + text(SZ + 3 * i + 2) + html2 + html4
    end;
    sendEmail({
    from: "xxx",
    to: "yyy",
    subject: AZ + " Barcodes beginnend mit " + SZ,
    text: text(html(myHTML)),
    html: html(myHTML)
    })
    else
    alert("Es wurden keine Barcodes erstellt")
    end

     

    Bei Leo's Version kommt die Fehlermeldung die Funktion ist nicht definiert:join([number],string)

     

    Trodtzdem vielen Dank für die Hilfe

    • Leonid_Semik
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Ja, join() braucht einen String im Array also:

    'Mehrzeiliges Textfeld' :=join( for i in range(Anzahl) do

    text(Startnummer+i)

    end, "

    ")

Anmelden, um zu antworten

Content aside

Kategorien

Alle Themen anzeigen
  • vor 3 JahrenZuletzt aktiv
  • 9Antworten
  • 530Ansichten