Jeżeli Me.Requestor.Value = "Barry Sanders" Wtedy
DoCmd.SendObject acSendReport, "WOEmailReport", acFormatPDF, "[email protected]", "Praca Rozkaz" & Me.WOID, Fałszywy
DoCmd.Close acForm, "Praca Rozkazywać", acSaveNo
DoCmd.OpenForm "Utrzymanie Bela", acNormal
ElseIf Me.Requestor.Value = "Miguel Cabrera" Wtedy
DoCmd.SendObject acSendReport, "WOEmailReport", acFormatPDF, "[email protected]", "Praca Rozkaz" & Me.WOID, Fałszywy
DoCmd.Close acForm, "Praca Rozkazywać", acSaveNo
DoCmd.OpenForm "Utrzymanie Bela", acNormal
etc….
Końcówka If |