私はpythonを使用してメールを送信し、現在のスクリプトに付属するTITUS CLASSIFICATIONポップアップをバイパスする必要があります。ポップアップは自動送信からそれを停止します。むしろVBAマクロを作成するよりもPythonはTITUS分類のOutlook電子メールを送信します
PYTHON
olMailItem = 0x0
obj = win32com.client.Dispatch("Outlook.Application")
newMail = obj.CreateItem(olMailItem)
newMail.Subject = "My Subject"
newMail.Body = "My Body"
newMail.To = "[email protected]"
newMail.send()
VBA
私はautoにVBAソリューションを持っている電子メールを送信するが、Pythonスクリプトですべてを持っているために、より簡単かつ直感的になりますし、それを呼び出す。
Dim AOMSOutlook As Object
Dim AOMailMsg As Object
Set AOMSOutlook = CreateObject("Outlook.Application")
Dim objUserProperty As Object
Dim OStrTITUS As String
Dim lStrInternal As String
Set AOMailMsg = AOMSOutlook.CreateItem(0)
Set objUserProperty = AOMailMsg.UserProperties.Add("TITUSAutomatedClassification", 1)
objUserProperty.Value = "TLPropertyRoot=ABCDE;Classification=For internal use only;Registered to:My Companies;"
With AOMailMsg
.To = "[email protected]"
.Subject = "My Subject"
.Body = "My Body"
.Send
End With
Set AOMailMsg = Nothing
Set objUserProperty = Nothing
Set AOMSOutlook = Nothing
Set lOMailMsg = Nothing
Set objUserProperty = Nothing
Set lOMSOutlook = Nothing
大変助かりました!
は、あなたが本当にOutlook'がメールを送信するために '必要がありますか? 'smtplib'を使って直接送ることはできません。 – furas
smtplibを試しましたが、サーバーに接続する際にエラーが発生しました。Outlookを使用するとより便利になります – Ariel