2009-05-12 3 views
0

기존 양식을 수정하여 .oft 파일로 내 바탕 화면에 저장했습니다. 이 양식을 보낼 때마다 이전 서명이 있습니다.Outlook 양식에서 이전 서명을 제거하려면 어떻게합니까?

.oft 파일을 두 번 클릭하면 해당 본문의 본문과 그 아래의 최신 본문이 표시됩니다. 본문에 갇혀있는 오래된 서명을 삭제하고 싶습니다. 나 혼란 스러울 때 Outlook 양식에서 파일을 열면 메시지에 서명이 포함되지 않습니다. 따라서 양식을 실행하면 보낼 때를 제외하고이 서명이 보이지 않습니다. 내가 열 때 미리 볼 수 있습니다. Outlook 양식이 있어야하는 메시지가 표시됩니다.


파일을 html로 저장했습니다. 페이지 하단에 서명이 표시됩니다.

html 파일을 제거하거나 수정하여 해당 서명을 제거하고 원본 oft 파일을 다시 가져 오는 방법은 무엇입니까?

나는 또한 HTML을 저장하고, 서명을 제거하고, 저장 한 다음 매크로를 사용하여 HTML을로드하려고 시도했다. 그러나 다시는 저장할 수 없습니다.

Sub MakeHTMLMsg() 
Set objMsg =3D Application.CreateItem(olMailItem) 
Set fso =3D CreateObject("Scripting.FileSystemObject") 
Set ts =3D fso.OpenTextFile("c:\testfile.htm", 1)=20 
strText =3D ts.ReadAll 
objMsg.HTMLBody =3D strText 
objMsg.Display 
Set fso =3D Nothing 
Set ts =3D Nothing=20 
Set objMsg =3D Nothing 
End Sub 

답변

0

, 메시지 상자 추가. 그런 다음이 양식을 실행하십시오. 및 voila. 원치 않는 서명을 제거하십시오. 저장

당신을 감사

+0

이 솔루션을 꽤 많이 시도했지만 문제가 해결되지 않았습니다. 필자는 컨트롤을 복사하여 새 양식에 붙여 넣는 작업을 마쳤습니다 (메일 설정에서 자동 서명을 사용하지 않도록 설정 한 후였습니다). 이렇게하면 내 필드가 이전되었습니다. – nardnob

1

경우 또는 공동 작업자가 실수로 메시지 본문에 RTF (서명 포함)이 서식있는 텍스트 영원히 같이을 .oft에 갇혀됩니다 가진을 .oft Outlook 양식을 저장 내가 말할 수있는 한 멀리 (16 진수 편집기에서 해킹하기로 결정하지 않는 한). 웹의 어두운 부분에서 다른 사람들이 제안하는 것처럼 양식을 실행하고 메시지 본문을 삭제하고 .oft로 저장할 수 있습니다.하지만 불행히도 RTF에서는 작동하지 않습니다. RTF가 멈췄습니다. 이 텍스트를 숨기려면이 VBScript Outlook 매크로를 사용하여 MailItem의 BodyFormat 형식을 일반 텍스트로 변경해야합니다. RTF 바이트는 .oft에 남아 있지만 최소한 아무도 그것을 볼 수 없습니다.

Sub ChangeToPlainTextAndPublishForm() 
    Dim objOL  ' As Outlook.Application 
    Dim objItem  ' As Outlook.ContactItem 
    Dim objFD  ' As Outlook.FormDescription 
    Const olPersonalRegistry = 2 
    Const olDiscard = 1 

    Set objOL = CreateObject("Outlook.Application") 
    Set objItem = objOL.CreateItemFromTemplate("C:\MyPath\MyForm.oft") 
    Set objFD = objItem.FormDescription 

    objItem.BodyFormat = OlBodyFormat.olFormatPlain 

    'Publish to personal forms library 
    With objFD 
     .DisplayName = "myForm" 
     .PublishForm olPersonalRegistry 
    End With 
    objItem.Close olDiscard 

    Set objFD = Nothing 
    Set objItem = Nothing 
    Set objOL = Nothing 
End Sub