如何解决我有一个powerscript,可以与Outlook很好地发送电子邮件我如何更改它以从我的Gmail帐户发送电子邮件
$x1 = New-Object -comobject Excel.Application
$FilePath = "C:\Desktop\Review.xlsx"
$UserWorkBook = $x1.Workbooks.Open($FilePath)
$UserWorksheet = $UserWorkBook.Worksheets.Item(1)
$UserWorksheet.activate()
$rgeSource=$UserWorksheet.range(“A1”,“D9”)
$rgeSource.Copy() | out-null
$Outlook = New-Object -comObject Outlook.Application
$Mail = $Outlook.CreateItem(0)
$Recipients = 'xyz@Abc.com'|ForEach{$Mail.Recipients.Add($_)}
$Recipients | ForEach{$_.resolve()}
$CC = 'xyz@abc.com'|ForEach{$Mail.Recipients.Add($_)}
$CC | ForEach{$_.resolve()}
$CC | ForEach{$_.Type=2}
$Mail.Subject=“TEST as of $((Get-Date -Format 'dd/MM/yy '))"
$oDoc = $Mail.GetInspector.WordEditor
$oRange = $oDoc.Range()
$oRange.InsertBefore("")
$oRange.InsertParagraph
$oRange.Collapse($wdCollapseStart)
$oRange.Paste()
$oRange.Collapse($wdCollapseEnd)
$oRange.InsertAfter(“Thanks”)
$oRange.InsertParagraphAfter()
$Mail.Display()
$Mail.Send()
这是与Outlook配合使用的代码,它打开excel文件,复制数据并将其粘贴到邮件正文中并发送电子邮件。 现在,我想做同样的事情,但是使用Gmail帐户发送电子邮件。
解决方法
当您使用com对象与Outlook交互时(也可以使用c#或vba进行此操作),是否检查了发件人或senderemailaddress属性?
https://docs.microsoft.com/en-us/office/vba/api/outlook.mailitem.sender https://docs.microsoft.com/en-us/office/vba/api/outlook.mailitem.senderemailaddress
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。