首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

用VBA实现电子邮件地址的域名查询olFolderSentMail

VBA是一种宏语言,可以在Microsoft Office套件中的应用程序中编写和执行代码,包括Excel、Word和Outlook等。电子邮件地址的域名查询可以通过VBA代码实现,具体步骤如下:

  1. 首先,创建一个新的VBA模块,打开Outlook应用程序并访问已发送邮件文件夹(olFolderSentMail)。
代码语言:txt
复制
Sub EmailDomainLookup()
    Dim olApp As Outlook.Application
    Dim olNs As Outlook.Namespace
    Dim olFolder As Outlook.Folder
    Dim olItem As Object
    Dim email As String
    Dim domain As String
    
    ' 创建Outlook应用程序对象
    Set olApp = New Outlook.Application
    ' 获取当前Outlook命名空间
    Set olNs = olApp.GetNamespace("MAPI")
    ' 访问已发送邮件文件夹
    Set olFolder = olNs.GetDefaultFolder(olFolderSentMail)
  1. 接下来,使用循环遍历已发送邮件文件夹中的每封电子邮件。
代码语言:txt
复制
    For Each olItem In olFolder.Items
        ' 检查邮件项是否为MailItem类型
        If TypeOf olItem Is Outlook.MailItem Then
            ' 获取电子邮件地址
            email = olItem.Recipients.Item(1).Address
            ' 提取域名部分
            domain = Mid(email, InStr(email, "@") + 1)
            
            ' 在Immediate窗口中输出结果(可根据需要进行其他处理)
            Debug.Print email & " 的域名是 " & domain
        End If
    Next olItem
    
    ' 释放对象引用
    Set olItem = Nothing
    Set olFolder = Nothing
    Set olNs = Nothing
    Set olApp = Nothing
End Sub

通过以上VBA代码,你可以实现遍历已发送邮件文件夹中的电子邮件,提取每个邮件的电子邮件地址,并输出域名部分。

值得注意的是,VBA是一种适用于Microsoft Office套件的宏语言,并不直接与特定云计算厂商相关。因此,在这种情况下,不需要提到特定云计算品牌商或产品。但是,如果你需要将电子邮件地址的域名查询与云计算相关联,你可以使用腾讯云的某些服务来实现更多的功能,例如:

  1. 如果你想将电子邮件地址的域名查询与数据库存储相关联,可以使用腾讯云的云数据库MySQL。你可以将电子邮件地址和域名信息存储在MySQL数据库中,并通过VBA代码查询和更新数据。
  2. 如果你希望通过API调用方式进行电子邮件地址的域名查询,可以使用腾讯云的API网关和云函数。你可以创建一个云函数,用于处理域名查询请求,并使用API网关将VBA代码中的HTTP请求发送到云函数。

请注意,以上仅为示例,实际应用的最佳方案取决于具体需求和应用场景。你可以根据实际情况选择适合的腾讯云产品来支持你的电子邮件地址域名查询功能。

页面内容是否对你有帮助?
有帮助
没帮助

相关·内容

怎么VBA删除Power Query生成查询

当然,很多情况下手工删除一下也不复杂,但是,如果这也是一个重复性工作,或者还要跟其他过程也结合起来,那么,通过VBA进一步实现全过程自动化,也是个非常不错主意:既可以利用Power Query对数据处理过程实现自动化简单易用性...,又能利用VBA对Power Query执行过程实现自动化!...---- VBA删除Power Query生成查询,有以下2种情况。 一、删除连接,但不删除查询 即仅删除查询和结果数据表间连接,使数据表不能刷新。...比如有如下查询“表1”: 其连接情况如下(特别要注意是,查询名称为“表1”,查询连接名称为“查询 - 表1”): 那么,要删除查询连接,VBA语句如下:...运行代码后,我们会发现,连接没了,查询还在,如下图所示: 二、删除查询 如果要删除查询VBA语句如下: 但是,要注意是,单独执行删除查询查询没了,连接还在(如果此前没有删除查询连接的话

2.2K30

正则表达式来了,Excel中正则表达式匹配示例

在下面的数据集中,我们将搜索前两组中有3位数字、最后一组中有4位数字10位数字。这些组可以句点、连字符或空格分隔。第一组可以括号括起来,也可以不用括号括起来。...在A2中输入模式,并使用公式: =RegExpMatch(A5, A2, FALSE) 图8 正则表达式以匹配有效电子邮件地址 众所周知,电子邮件地址由4部分组成:用户名、@符号、域名(邮件服务器...要检查电子邮件地址有效性,需要使用正则表达式复制上述结构。 模式:\b[\w\.\-]+@[A-Za-z0-9]+[A-Za-z0-9\.\-]*[A-Za-z0-9]+\....它可以包含2到24个字母(目前存在最长TLD):\[A-Za-z]{2,24} 注意,该模式假定域名包含2个或更多字母数字字符。...]) 例如,如果单元格A5中字符串包含有效电子邮件地址,则返回“Yes”,否则为“No”。

21.2K30
  • 有效电子邮件地址是怎么样?如何用代码筛查

    有效电子邮件地址格式有效电子邮件地址应该包含一个“@”符号,将地址分为两部分:用户名和域名。...用户名部分可以包含字母、数字、下划线和连字符,但不能以连字符开头或结尾,并且不能连续出现两个以上连字符。域名部分包含域名和顶级域名,如.com、.org等。整个电子邮件地址长度不得超过254个字符。...有效电子邮件地址特征有效电子邮件地址应该具备以下特征:- 包含一个且仅有一个“@”符号,将用户名和域名分隔开。- 用户名部分和域名部分都不能包含空格和特殊字符,如!、#、$等。...正则表达式筛查有效电子邮件地址在编写代码筛查有效电子邮件地址时,可以使用正则表达式来匹配符合特定格式电子邮件地址。...有效电子邮件地址应该具备一定格式和规范,包括包含一个“@”符号,用户名和域名部分符合特定规则等。使用正则表达式可以方便地筛查有效电子邮件地址,帮助保证电子邮件发送准确性和有效性。

    34810

    二级域名asp.net 2.0实现方案

    为了实现完全二级域,建两个站点,一个为主站,一个为用户,两个站点目录都指到一个同一网站目录 3....在Web程序中或取URL来源中二级域名主机头,比如:abc.域名.com 中 abc; 4. 获取来二级域名名称,存入Session,方便取用 5....获取来二级域名名称,URL重写地址 实现方法: 域名A记录解析不用说了吧 ^_^,就是做一个*.域名.comA记录解析到你服务器IP 方法一:二级域名URL转向 a....UserID=xxx这样链接                                 return;             }         } 到这里已经可以实现abc.域名.com...,不管输入什么样主机头(www.域名.com 与 域名.com除外,因为这两个域已经绑定到主站点中,优先访问到了主站点),就可以实现 abc.域名.com访问到这个用户目录了,而且浏览器地址栏,出现也是

    2.6K20

    Kali Linux Web渗透测试手册(第二版) - 2.2 - 使用Recon-ng收集信息

    查看我们模块,我们可以键入show modules命令。 3.假设我们要搜索域名所有子域名和DNS服务器不响应区域传输。...完成后,我们可以查询Recon-ng数据库以获取发现主机(show hosts): 它是如何工作… Recon-ng是查询搜索引擎、众多社交工具和API包装器媒体,通过互联网档案和数据库,以获取有关网站...、网络信息、应用程序、服务器、主机、用户、电子邮件地址等。...它工作原理是整合不同功能模块,例如Google、Twitter、LinkedIn或Shodan等,或者对DNS服务器执行查询。...此工具提供图形用户界面显示所有内容元素(电子邮件地址,人员,域名,公司等)在图中,可视地显示元素之间关系。 例如:代表一个人节点将通过一条线连接到该人电子邮件地址以及该电子邮件地址所属域名

    1.1K50

    GOSINT:开源智能(OSINT)方面较新一款工具

    可以看到到目前为止,gOSINT已经实现了以下模块: 1.Git支持使用github API或普通克隆和搜索进行邮件检索 2.在PGP服务器中搜索电子邮件地址,别名和KeyID 3.从hadibeenpawned.com...搜索泄露电子邮件地址 4.检索Telegram公共组消息历史 5.发送查询到shodan.io 6.检索电话号码所有者名称 7.使用crt.sh枚举子域 有些模块功能尚未完善,如前所述gOSINT仍在开发中...让我们来看看已经实现少数几个模块。 PGP MODULE 此模块将会为我们在Pretty Good Privacy(PGP)服务器中搜索电子邮件地址,别名和KeyID。 此模块使用命令格式如下: ....Recon-ng中没有执行该功能模块,但有一个模块能够返回与给定主机或域名关联电子邮件地址和名称列表。如下截图所示: ?...因此,渗透测试人员会建议显示电子邮件地址公司员工,采取更好主动防护措施来保护其电子邮件帐户。 使用命令格式如下: ./gosint pwd 示例: ?

    1.2K20

    乐优项目:使用域名访问本地项目,实现商品分类查询,cors解决跨域,品牌查询(二)

    不要求实现或者查询组件实现,只要求可以参照文档使用该组件即可:2.2.1.url异步请求点击商品管理下分类管理子菜单,在浏览器控制台可以看到:页面中没有,只是发起了一条请求:http://api.leyou.com...3.2.解决跨域问题方案目前比较常用跨域解决方案有3种:Jsonp 最早解决方案,利用script标签可以跨域原理实现。...2..3.3.实现非常简单虽然原理比较复杂,但是前面说过:浏览器端都有浏览器自动完成,我们无需操心服务端可以通过拦截器统一实现,不必每次都去进行跨域判定编写。...事实上,SpringMVC已经帮我们写好了CORS跨域过滤器:CorsFilter ,内部已经实现了刚才所讲判定逻辑,我们直接就好了。...先看看我们要实现效果:点击“品牌管理”菜单:路由路径:/item/brand根据路由文件知,对应页面是:src/pages/item/Brand.vue页面会发送如下请求:4.1.后台提供查询接口前台页面已经准备好

    8210

    【Web攻防】红队外围信息收集【总结】

    外围打点前言 由于红队不同于一般渗透测试,强调更多是如何搞进去拿到相应机器权限或者实现某特定目的,而不局限于你一定要在什么时间,什么技术或者必须通过什么途径去搞,相比传统渗透测试,红队则更趋于真实入侵活动...movie movie提交查询时候,Google会返回跟查询关键词相关电影信息。 phonebook phonebook进行查询时候,Google会返回美国当地跟查询关键词相关电话信息。...11)SellHack:输入名称和域名,然后扫描邮件服务器以查找所有匹配电子邮件地址。...如果老板不在等,请向收件人询问电子邮件地址 提示:通知被叫人紧急情况或作为买方查询老板电子邮件地址;检查与被叫方老板电子邮件地址(按照1a,询问他邮箱是否错误并被退回) c....6) 利用SSL证书寻找真实IP 证书颁发机构(CA)必须将他们发布每个SSL/TLS证书发布到公共日志中,SSL/TLS证书通常包含域名、子域名电子邮件地址

    3.7K10

    电子邮件伪造

    常见伪造技术 攻击者可以通过更改邮件头部中“发件人”地址来伪造邮件地址,使其看起来像是来自其他合法域名或邮箱地址。这种技术常被用于欺骗、诈骗、网络钓鱼等攻击中。...利用未设置SPF或者SPF配置错误 SPF(Sender Policy Framework)是一种用于验证电子邮件发送者身份协议,旨在防止电子邮件地址伪造和垃圾邮件。...SPF 认证: 接收方邮件服务器查询发送邮件域名 SPF 记录,查看该邮件是否来自被授权邮件服务器。...邮件服务器收到邮件后,会查询发送邮件域名 SPF 记录,并根据这些规则来认证邮件合法性。...可以通过swaks(Ubuntu下可以apt直接进行安装)命令来简单测试。

    20600

    使用Postfix,Dovecot和MySQL发送电子邮件

    向virtual_users表中添加电子邮件地址。该domain_id值引用virtual_domain表id值。将电子邮件地址值替换为您希望在邮件服务器上配置地址。...example.com域名替换出现内容: /etc/postfix/main.cf # See /usr/share/postfix/main.cf.dist for a commented,...该password_query变量使用virtual_users表中列出电子邮件地址作为电子邮件帐户用户名凭据。...从外部电子邮件地址向您Linode邮件服务器发送测试电子邮件。...添加新域,电子邮件地址和别名 要向邮件服务器添加新域,电子邮件地址和别名,您需要更新本指南MySQL部分中创建相应MySQL表。 域 要添加新域,请通过SSH连接到您Linode。

    3.8K30

    渗透测试指南-第1部分(OSINT-被动侦察和资产发现)

    Burp Suite被动扫描,像福尔摩斯一样善于观察 DNS爆破,但非常快 Weleakinfo.com Geo2IP -额外工具 反向域名查询服务 不要让“被动”这个词欺骗您。...它抓取谷歌结果,标题,描述,元数据,并寻找类似电子邮件地址东西 ....您可以使用它从名称生成电子邮件地址(我将在第2部分中对此进行更详细讨论),稍后可以将其用于密码破解,即为每个电子邮件地址尝试使用单个密码。...从那里,您可以将这些内容提供给nslookup工具(可以使用aiodns创建您自己),并发现与它们关联所有资产。 反向域名查询服务 您可以用于资产发现另一个工具是反向whois。...现在,您可以使用这些工具输入公司名称、电子邮件地址或注册人名称(从您以前侦察获得),然后通过这些相同步骤,以新获得电子邮件、域名和额外信息。重复,直到你没有更多被动信息可以获取。

    1.1K40

    恶意代码分析:3.利用DNS隧道进行跟踪和扫描

    在DNS隧道技术中,攻击者通过使用DNS流量中域名实现相同效果。 在DNS隧道技术这种应用中,攻击者恶意软件将特定用户及其行为信息嵌入到DNS查询唯一子域名中。...例如,如果受害者打开这些电子邮件,或者受害者可能会点击电子邮件中链接,嵌入内容可能会自动生成DNS查询。...为了追踪目的,攻击者可以从其权威名称服务器查询DNS日志,并将载荷与电子邮件地址哈希值进行比较。通过这种方式,攻击者可以知道特定受害者何时打开他们电子邮件或点击链接,并监控活动效果。...活跃阶段(2至3周) 攻击者积极向相应受害者电子邮件地址分发数千个FQDN(完全限定域名)。 追踪阶段(9至11个月) 受害者查询FQDN,而攻击者通过获取DNS日志来追踪他们行为。...攻击者可以执行以下活动: 测试此解析器查询延迟 检查其域名是否被阻止,并将查询转发到陷阱 利用此解析器漏洞 攻击者通过分析其权威名称服务器日志来实现前两个目标。

    18010

    在Docker上安装Discourse论坛系统

    输入您要用于Discourse主机名,例如,discourse.example.com,其中example.com可以域名替换。您需要使用一个域名,因为发送电子邮件时不能用IP地址。...管理员帐户电子邮件地址? 选择要用于Discourse管理员帐户电子邮件地址。这个电子邮件地址可以与您Discourse域名完全无关,可以是您电子邮件地址。...请注意,当第一个用户注册该电子邮件时,此电子邮件地址将默认成为Discourse管理员。稍后当您从其网络控制面板设置Discourse时,您还需要此电子邮件地址。 SMTP服务器地址?...第三步 - 注册管理员帐户 在您浏览器中访问您Discourse域名,你将看到下面的页面。...您将看到一个名为“注册管理员帐户”页面,其中包含以下字段: 电子邮件:从下拉菜单中选择您之前提供电子邮件地址。 用户名:选择用户名。 密码:设置一个强密码。 然后单击表单上蓝色“注册”按钮提交。

    3.5K30

    独特电子邮件地址

    独特电子邮件地址 一、题目描述: 每个 有效电子邮件地址 都由一个 本地名 和一个 域名 组成,以 ‘@’ 符号分隔。除小写字母之外,电子邮件地址还可以含有一个或多个 ‘.’ 或 ‘+’ 。...例如,在 alice@leetcode.com中, alice 是 本地名 ,而 leetcode.com 是 域名 。 如果在电子邮件地址 本地名 部分中某些字符之间添加句点(‘.’)...,则发往那里邮件将会转发到本地名中没有点同一地址。请注意,此规则 不适用于域名 。...其他人题解是什么,谁效率更好一些?用不同语言实现的话,哪个语言速度最快? 看别人解法听说了有限状态机概念。...独特电子邮件地址 有限状态机需要了解一下!!!!

    76440

    开源情报收集:技术、自动化和可视化

    顾名思义,Email Hunter API 也可用于查找域电子邮件地址。它旨在供销售人员查找潜在客户联系人和销售线索,但任何人都可以使用它并收集电子邮件地址。...超越电子邮件地址 电子邮件地址为网络钓鱼和密码喷洒提供了机会,但可以更进一步。...但是,在发现电子邮件地址同时从 LinkedIn 和 Twitter 获取一些潜在客户并不难。这些可以使用许多与电子邮件地址相同技巧从搜索引擎结果中抓取。...例如,暴雪娱乐以数字命名团队而闻名(例如,Team 1、Team 2、Team 3)。每个数字都与他们一场比赛相关联。他们还喜欢使用经常从他们魔兽争霸和星际争霸传说中提取代号。...ODIN 实现了这一点,使分析师能够对数据做更多事情,同时要求他们做更少工作来获取数据。 ODIN 报告和组织 ODIN 将其收集所有数据存储在 SQLite3 数据库中,以供以后分析。

    2.2K10

    涨姿势:另类表情域名赚钱大法!!

    我们一起来看看他是怎么做到 最初时候,小哥只是想买一个域名netflix.soy. 在花了17美元之后,小哥对域名也有了一定了解,并且突发奇想想着可以emoji表情作为域名。...当时小哥只是觉得有意思,毕竟平时可不太见到emoji表情域名。 所以,小哥做出一个决定,买一个emoji表情域名。...找来找去,小哥先是找到一个网站,可以4种不同TLDs来拓展emoji表情作为域名。(.fm, .ws, .to , .ml) 不过可惜是,几乎都被人买了,看来像这个位小哥一样无聊的人也是不少。...然后小哥建立了一个网站用来创建表情符号电子邮件地址,这个时候一个庞大商业计划在他脑海中浮现,说服别人来买!...于是小哥在TikTok开始卖力宣传自己产品,就是可爱表情邮件地址,慢慢,越来越多的人知道了他表情电子邮件,之后在2天时间里,TikTok视频浏览量达到了20多万次,60个表情符号电子邮件地址销售收入达到了

    89830

    【算法千题案例】每日一练LeetCode打卡——108.独特电子邮件地址

    算法题 ---- 原题样例:独特电子邮件地址 每个 有效电子邮件地址 都由一个 本地名 和一个 域名 组成,以 '@'符号分隔。除小写字母之外,电子邮件地址还可以含有一个或多个 '.'...例如,在 alice@leetcode.com中, alice 是 本地名 ,而 leetcode.com 是 域名 。 如果在电子邮件地址 本地名 部分中某些字符之间添加句点('.')...和 '+' 规则进行处理后得到,本地名称中仅包含小写字母电子邮件地址)。...我们对每一个地址依次进行如下操作: 将电子邮件地址根据'@'分成本地名称 local 和域名 reset 两部分,其中域名部分包含 ‘@’,且不需要进行额外处理; 如果本地名称中有 '+',那么移除...'; 处理完成本地名称和域名进行连接,得到电子邮件地址规范化表示 local + rest。

    81430

    杀器BLUTO:DNS探测+域名猜解+邮箱枚举

    BLUTO是一款信息探测和爆破工具,它功能有DNS探测、暴力猜解、DNS域传送,和电子邮箱枚举。...DNS信息和域传送漏洞探测 BLUTO会利用目标域名来探测MX和NS记录,同时通过NetCraft获取子域名。先说目标域名NS记录,它可以用来探测目标是否存在域传送漏洞。...域名爆破和查询整合 如果没有查询到结果的话,BLUTO会继续并行子进程去取Alex Top 100万中前2万个子域名前缀,来爆破目标的子域名。此外,NetCraft查询结果是单独进行。...爆破结果和NetCraft查询结果会进行自比较,整合并删除重复内容项,高亮显示可能有用结果。 邮箱地址枚举 Bluto也能基于目标域名进行邮件地址枚举,现在用是Bing和Google引擎。...它配置了随机User Agent,随着国家更迭,会选择与出口地址匹配最快Google服务器。每次请求之后都会关闭连接,以免多次连接导致验证码出现。

    1.3K60

    你应该学习正则表达式

    从验证电子邮件地址到执行复杂代码重构器,正则表达式用途非常广泛,是任何软件工程师工具箱中必不可少条目。 ? 什么是正则表达式?...同样脚本在Python中是这样: ? 4 – 电子邮件验证 正则表达式也可用于输入验证。 ? 以上是一个(过于简单)Regex,用来匹配电子邮件地址。...但是一旦你确认输入文本是电子邮件地址,那么你应该始终遵循发送确认/激活电子邮件标准做法。.../\1\{redacted\}/g'——{redacted}替换每个电子邮件地址。 test.txt——对test.txt文件执行操作。...8.2 – 性能密集应用程序 正则表达式匹配速度可以从不是非常快到极慢范围变动,取决于表达式写得怎么样。对于大多数例来说,这很好,特别是如果匹配文本很短(例如电子邮件地址表单)的话。

    5.3K20
    领券