news-nknskn https://blog.hatena.ne.jp/news-nknskn/ nknskn ネタ置き場 https://news-nknskn.hatenablog.com/ タイトルが全て. 見た方が早いので能書きなし Sample code Function CreateDnsQuery(domain) ' https://www.atmarkit.co.jp/ait/articles/1601/29/news014_2.html Dim xmldoc, node Set xmldoc = CreateObject("Msxml2.DOMDocument") Set node = xmldoc.CreateElement("binary") node.DataType = "bin.hex" ' ID |QR |QDCNT|ANCNT|NSCNT|ARCNT '… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fnews-nknskn.hatenablog.com%2Fentry%2F2020%2F09%2F12%2F112803" title="VBScriptでDoHを使った話 - DNSクエリ作ってdns\.googleにバイナリデータをPOSTする - nknskn ネタ置き場" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/n/news-nknskn/20200912/20200912111633.png Hatena Blog https://hatena.blog 2020-09-12 11:28:03 rich https://news-nknskn.hatenablog.com/entry/2020/09/12/112803 1.0 100%