Tag: dns

VBAfunction连接到WHOIS服务器并返回.com.au域的可用性: 我正在为希望快速检查数十个域的可用性的客户创build一个模板。模板必须保持为excel文件。我已经安装并使用了SEOToolsForExcel，它允许我查询服务器，并使用isdomainregistered（）函数检查特定域是否可用。然而，不幸的是，该函数将始终返回所有投向它的澳大利亚（'.com.au'）域的“真实”（即域）。我已经尝试更改xmlconfiguration文件中的TLD查找，如本页所示： http : //seotoolsforexcel.com/how-to-setup-tlds-in-seotools-config-xml/ 我尝试了以下几点： <Tld Name="au" WhoIsServer="whois.aunic.net" WhoIsNotFoundRegex="(no match)|(no data found)|(not found)|(no entries found)|(error for)|(invalid pattern)|(illegal question)" WhoIsCreatedRegex="" WhoIsUpdatedRegex="(?:Last Modified:\s*(\d{2}-[Az]{3}-)\d{4})" WhoIsExpiresRegex="" WhoIsDelayMs="1000" /> 和这个： <Tld Name="au" WhoIsServer="whois-check.ausregistry.net.au" WhoIsNotFoundRegex="is free" WhoIsCreatedRegex="" WhoIsUpdatedRegex="" WhoIsExpiresRegex="" WhoIsDelayMs="1000" /> 但似乎都没有奏效。我已经检查了其他服务，清楚地表明域名可用，但SEOTool保持返回错误的结果（只在“.com.au”域名，.com域名工作正常）。因此，我的下一个尝试是在excel中编写一个自定义函数，将其发送到Ausregistry.com.au服务器的域可用性工具。 Ausregistry解释了如何在他们的页面中完成这个工作： http ://www.ausregistry.com.au/tools/domain-availability 他们解释说：该服务将根据域名的可用性，以string“可用”或“不可用”进行响应。例如要检查ausregistry.net.au的可用性，请按照下列步骤操作：连接到：地址：whois-check.ausregistry.net.au，端口：43 将string“ausregistry.net.au \ r \ n”发送到服务器 […]

无法在64位VBA中查找IP地址: 我的基本问题是，我有一个电子表格，其中有10个数以千计的FQDN（完全合格的域名）条目，我需要检查FQDN是否是公共Internet上的有效DNS条目。我正在做每个FQDN的DNS查询，并想指定一个公共的DNS服务器。如果对DNS的调用返回一个IP地址，我将假定FQDN是有效的。我在Excel 64位工作，但需要一个解决scheme，也将编译和工作在32位，所以我想要相同的源代码能够被编译在两个。由于电子表格中有很多行，所以我不想使用为每个查找创build一个临时文件的函数。（当系统调用可用时，我是关于不需要的临时文件的OCD）。我相信函数“getaddrinfoex”提供了指定什么名字服务器被查询的能力，但是我一直没能find任何使用getaddrinfoex或较小版本的getaddrinfo（不允许指定DNS服务器）的VBA片段。我find几个调用gethostbyname的例子，但都是32位的Excel。此外，微软已经发布，gethostbyname已被弃用（ https://msdn.microsoft.com/en-us/library/windows/desktop/ms738524(v=vs.85).aspx ），所以我试图使用build议更换getaddrinfo 如何使用Microsoft Access与Visual Basic进行networking连接？在上面链接的问题中，@david在答案中发布的代码片段看起来具有32位和64位兼容的正确语法。但是这个例子并没有包含对gethostbyname的调用，它只提供了函数的声明。 getaddrinfoex在VBA中可用吗？有人有一个使用getaddrinfoex的例子，这将在32位和64位工作？我将不胜感激任何帮助。我有很多年没有编码，所以我的技能非常过时。因此，我正在进行大量search以find我所需要的东西。这里是我通过在线结合各种search创build的代码。 Private Type HOSTENT hName As LongPtr hAliases As LongPtr hAddrType As Integer hLen As Integer hAddrList As LongPtr End Type #if Not VBA7 then ' used by 32-bit compiler Private Declare Function […]

Powershell将IP转换为已parsing的DNS – 导出到Excel: 我的脚本有一些问题。它所做的是读取包含阻止IP的Outlook文件夹。这表示它将这些IPparsing为它们的DNS名称。（如果有人知道在PowerShell中的一个更好的方法，那么在脚本中请让我知道，因为现在很多时候它不解决IP）一旦知识产权得到解决，他们应该分成三类; Cat1：匹配filter的已parsing的IP Cat2：已解决的IP，不匹配filterCat3：无法parsing的IP。就这样，你可以跳过整个邮件部分，我已经包括了一个你可以testing的IP列表，看看我的意思。（脚本执行应该需要大约1分钟）现在对于问题（S）类别：（由疯狂的技术人员解决）他们不能正常工作，因为他们应该… Cat1和2会混合起来。猫3甚至不显示… 类别的:( 由疯狂的技术人员解决）我有一些未解决的DNS地址在我的filter，我知道是好的。是否有可能自己给它一个主机名，所以它显示在Excel表？例如141.101.105.12应该有主机名CloudFlare我个人知道这是Cloudflare，但是其他人不知道。 Excel 1 🙁 解决，范围设置不正确） Excel应该制作一个不错的工作表，它看起来像****，它把猫扔在错误的地方，使工作表变形。 Excel 2 🙁 由疯狂的技术人员解决）我也非常想创build一个链接到每个IP的方法，这应该是唯一的，如果你看到脚本，你会明白我在说什么，我是什么试图做…我希望。 testingIP列表:(应该在.txt文件中） 199.27.128.103 173.245.53.70 173.245.53.137 173.245.53.121 173.245.53.104 173.245.53.103 173.245.51.69 141.101.105.12 141.101.105.121 141.101.105.14 141.101.105.15 141.101.105.170 108.162.254.116 127.0.0.1 64.39.103.176 0.0.0.0 111.111.311.25 254.254.254.254 187.159.165.1 – 显然有些IP应该显示在未解决的类别中。至于脚本： #Get current date $Date = […]