как можно добавить ссылку в notetext на интерет адресс в mailsession ?


string ls_pdf_path
string ls_pdf_filename
mailSession mSes
mailReturnCode mRet
mailMessage mMsg
mailFileDescription mAttch


ls_pdf_path = f_get_general_parameter("pdf_path")
ls_pdf_filename = f_get_general_parameter("pdf_filename")

mSes = create mailSession
mRet = mSes.mailLogon(mailNewSession!)

IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
RETURN
END IF

// Populate the mailMessage structure
mMsg.Subject = 'invoice'
mMsg.NoteText = '2 invoices was created . link to ... '
mMsg.Recipient[1].name = sle_email.Text
mAttch.Pathname = ls_pdf_path + ls_pdf_filename
mAttch.Filename = ls_pdf_filename
mMsg.AttachmentFile[1] = mAttch


mRet = mSes.mailSend(mMsg)

IF mRet <> mailReturnSuccess! THEN
MessageBox("Invoice Mail", 'Mail not sent.')
else
MessageBox("Invoice Mail", 'Mail sent successfully.')
End if

mSes.mailLogoff()
DESTROY mSes