pbaldy,
I cannot wrap my mind around this, the OpenReport did not work either;
DoCmd.RunCommand acCmdSaveRecord
DoCmd.OpenReport sDocName, acViewPreview, [RequestNo]=Forms![LeaveRequestForm]![Text2]
DoCmd.SendObject acSendReport, sDocName, acFormatSNP, sToName, sCCName,,"Leave Request", sSubject,,False
???