Frage : Fallaussage basiert auf Frage

Ich bin traurig, dass ich keinen Code habe, zum eines Beispiels von zu nennen, weil ich nicht sicher bin, wo man beginnt. Ist hier, was ich versuche, zu tun. Ich habe eine Tabelle mit zwei Spalten. Name und eMail. Ich habe ungefähr 25 Namen in dieser Tabelle. Ich habe ein combobox auf einer Form, die der Benutzer einen Namen vorwählen und einen Knopf schlagen kann. Gegründet auf diesem Namen tue ich dann ein sendobject und verschicke einen Report zu dieser Person. Ich kann ihn mit einer Tonne von tun wenn dann Aussagen. 

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

Wenn Me.Requestor.Value = „Barry Sanders“ dann
    DoCmd.SendObject acSendReport, „WOEmailReport“, acFormatPDF, „[email protected]“, „Arbeitsauftrag“ u. Me.WOID, falsch
    DoCmd.Close acForm, „Arbeitsaufträge“, acSaveNo
    DoCmd.OpenForm „Wartungs-Maschinenbordbuch“, acNormal

ElseIf Me.Requestor.Value = „Miguel Cabrera“ dann
    DoCmd.SendObject acSendReport, „WOEmailReport“, acFormatPDF, „[email protected]“, „Arbeitsauftrag“ u. Me.WOID, falsch
    DoCmd.Close acForm, „Arbeitsaufträge“, acSaveNo
    DoCmd.OpenForm „Wartungs-Maschinenbordbuch“, acNormal 

usw.….
Ende If


But, das ich hoffte alles heraus schreiben nicht zu müssen. Dank für jede mögliche Hilfe können Sie mich auf diesem geben. Ich wirklich schätze it.

Antwort : Fallaussage basiert auf Frage

Feldlänge festgestellt nicht durch IIF llt, aber die erste Aufzeichnung des Resultats, wenn die ersten Aufzeichnungsresultate in „SoftPak“ das SystemType Feld C sein (7), wenn die erste Aufzeichnung ein „Aufsatz“ das SystemType ist, ist C (5). Die ist die Weise, die foxpro Feldtypen eines Ausdrucks ein Berechnungs- Feld feststellt.

So Form zum Feldtyp und legth, die Sie wünschen:
WERFEN (IIF (...) als C (7)) als SystemType…

oder AUFLAGE:
PADR (IIF (…, „SoftPak“, „Aufsatz“), 7) ALS SystemType…

oder die erforderlichen zwei Räume „Aufsatz“ einfach hinzufügen:
IIF (…, „SoftPak“, „Aufsatz ") ALS SystemType

Tschüss, Olaf.
Weitere Lösungen  
 
programming4us programming4us