|
LboxString LMailTo;
LboxString LMailFrom;
LboxString LSubject;
LboxString LBody;
Dlg->EditGetText( IDC_TO, &LMailTo );
Dlg->EditGetText( IDC_FROM, &LMailFrom );
Dlg->EditGetText( IDC_SUBJECT, &LSubject );
Dlg->EditGetText( IDC_BODY, &LBody );
BOOL bRet;
bRet = Basp->SendMail( &LMailTo, &LMailFrom, &LSubject, &LBody );
if ( !bRet ) {
Dlg->MsgOk( &(Basp->ErrorDescription) );
}
| |