{"url":"https://blog.systemjp.net/entry/2020/11/18/124000","type":"rich","blog_title":"shikaku's blog","published":"2020-11-18 12:40:00","blog_url":"https://blog.systemjp.net/","height":"190","categories":[],"author_url":"https://blog.hatena.ne.jp/shikaku/","description":"Option Explicit On Error Resume Next Dim objWshShell ' WshShell \u30aa\u30d6\u30b8\u30a7\u30af\u30c8 Set objWshShell = WScript.CreateObject(\"WScript.Shell\") If Err.Number = 0 Then ' \u5024\u3092\u524a\u9664\u3059\u308b\u5834\u5408\u306f\u3001\u6700\u5f8c\u306b \\ \u3092\u4ed8\u3051\u306a\u3044 objWshShell.RegDelete(\"HKCU\\Hoge\\Test1\") ' \u30ad\u30fc\u5168\u4f53\u3092\u524a\u9664\u3059\u308b\u306b\u306f\u6700\u5f8c\u306b \\ \u3092\u4ed8\u3051\u308b objWshShell.RegDelete(\"HKCU\\Hoge\\\") WScript.Echo \"\u30ec\u30b8\u30b9\u30c8\u30ea\u3092\u524a\u9664\u3057\u307e\u3057\u2026","provider_url":"https://hatena.blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fblog.systemjp.net%2Fentry%2F2020%2F11%2F18%2F124000\" title=\"vbs\u3067\u30ec\u30b8\u30b9\u30c8\u30ea\u306e\u524a\u9664 - shikaku&#39;s blog\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_name":"Hatena Blog","image_url":null,"author_name":"shikaku","version":"1.0","width":"100%","title":"vbs\u3067\u30ec\u30b8\u30b9\u30c8\u30ea\u306e\u524a\u9664"}