Google은 관리 대상 교육구의 사용자 관리 요청을 수락 할 수 있도록 설정 한 문서 라이브러리를 보유하고 있습니다. 최근에 요청을 입력하는 데 사용 된 양식과 관리자에게 새 요청을 알리는 데 사용 된 일부 사소한 변경 사항을 업데이트했습니다. 이러한 변경 사항으로 인해 문서 링크가 포함 된 서식있는 텍스트로 수신 된 알림 전자 메일은 이제 일반 텍스트로 제공됩니다. 나는 이전 버전으로 양식과 에이전트를 되돌려 놓았으며 전자 메일 메시지는 일반 텍스트로 남아 있습니다. 에이전트의 코드는 다음과 같습니다. 어떻게 든 원래의 에이전트로 복귀가 작동하지 않는 나타나 에이전트의 서명자 함께 할 수있는 뭔가가처럼서식있는 텍스트를 일반 텍스트로 변환하고 문서 링크를 제거하는 LotusScript 에이전트에서 작성하여 보낸 메모가 왜 발생합니까?
Option Public
Use "Variables"
Dim db As NotesDatabase
Sub Initialize
On Error Goto gotError
Set s = New NotesSession
Dim doc As NotesDocument
Dim kbaseDb As NotesDatabase
Dim kdoc As NotesDocument
Set db = s.CurrentDatabase
Set doc = s.DocumentContext
Dim fromName As NotesName
Dim commName As String
Set fromName = s.CreateName(doc.from(0))
commName = fromName.Common
Dim memo As New NotesDocument(db)
Dim body As NotesRichTextItem
memo.Form = "Memo"
memo.SendTo = techEmail
memo.Subject = doc.categories(0) + " admin request from " + districtName
If doc.priorityflag(0) = "Priority" Then
memo.Subject = doc.Categories(0) + " PRIORITY admin request from " + districtName
memo.DeliveryPriority = "H"
End If
Set body = memo.Createrichtextitem("Body")
Call body.AppendText("Please process this " + doc.action(0) + " request from " + commName + ".")
Call body.AddNewLine(2)
Call body.AppendText("Comment: " + doc.comment(0))
Call body.AddNewLine(1)
Call body.AddNewLine(1)
Call body.AddNewLine(1)
Call body.AppendText("Link to request ")
Call body.AppendDocLink(doc, "Link to request ")
Call memo.send(False)
Call doc.ReplaceItemValue("OwnerNotified", doc.Owner)
Call doc.Save(True, False)
Exit Sub
gotError:
Print "<b><FONT color=red>System Error (" + Str(Err) + "): " + Error
Exit Sub
End Sub
확인 에이전트 서명자의 개인 문서, 그들은 이메일 형식을 보내는 방법을 볼 수 있습니다. –
내가 볼 수있는 유일한 관련 설정은 수신 메일에 대한 것이며 "보낸 사람의 형식으로 보관"으로 설정되어 있습니다. – SOKeefe
Notes 이름 또는 인터넷 스타일 메일 주소로 보내시겠습니까? 인터넷 스타일 주소로 보내는 경우, 주소가 속한다는 것을 서버가 알고 있습니까? 메일이 Notes 시스템으로 보내지기 전에 바깥 쪽 (인터넷에 연결 한 것처럼)으로 나가면 아웃 바운드 변환이 수행됩니다. –