这是我在运行脚本

时要遵循的逻辑

查找发件人电子邮件ID 解析获取域名（我被困在这里）

将域名添加到特定邮件规则“Addedfilter”作为条件（如果我可以自动执行此部分，这是可选的）

我打算通过邮件服务使用它，以便将发件人ID的域名收集到我的邮件规则中。

tell application "Mail"
   set theSelection to selection
   set theMessage to item 1 of theSelection
   set theSender to sender of theMessage
   --set theDomain to (do shell script "cut -f1 -d'@' $1" & quoted form of theSender)
   set theDomain to (do shell script "awk -F\"@\" '{print $2}'" & quoted form of theSender)

   display dialog theDomain
end tell

PS：标记“垃圾邮件”没有帮助。此外，我有一些动机来捕获垃圾邮件域ID。

Answer 1

尝试此操作以获取域名：

set theDomain to (do shell script "echo  " & quoted form of rich text 1 through -2 of theSender & " | awk " & quoted form of "{split($0,a,\"@\"); print a[2]}")

或者这个：

set theDomain to (do shell script "echo  " & quoted form of rich text 1 through -2 of theSender & " | awk -F \"@\" '{print $2}' $1")

然后，如果要将域条件添加到规则中，请执行以下操作：

set r to rule "Addedfilter"
tell r
   make new rule condition at end of rule conditions with properties {expression:theDomain, qualifier:does contain value, rule type:from header}
end tell

Answer 2

另一种获取域的方法：

    set theSelection to selection
    set theMessage to item 1 of theSelection
    set theEmail to extract address from sender of item 1 of theMessage
    set AppleScript's text item delimiters to "@"   
    set theDomain to text item 2 of theEmail

在这里找到： https://forum.keyboardmaestro.com/t/extract-domain-name-from-current-email-and-open-in-safari/2904/5

AppleScript查找邮件发件人的域并将其添加到规则中

这是我在运行脚本

将域名添加到特定邮件规则“Addedfilter”作为条件（如果我可以自动执行此部分，这是可选的）

2 个答案: