{"id":1515,"date":"2012-03-16T15:21:01","date_gmt":"2012-03-16T06:21:01","guid":{"rendered":"http:\/\/www.ka-net.org\/blog\/?p=1515"},"modified":"2021-10-25T22:49:09","modified_gmt":"2021-10-25T13:49:09","slug":"mayhemrss%e3%83%95%e3%82%a3%e3%83%bc%e3%83%89%e3%81%8c%e6%9b%b4%e6%96%b0%e3%81%95%e3%82%8c%e3%81%9f%e3%82%89%e6%9c%80%e6%96%b0%e8%a8%98%e4%ba%8b%e3%82%92evernote%e3%81%ab%e5%8f%96%e3%82%8a%e8%be%bc","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=1515","title":{"rendered":"[Mayhem]RSS\u30d5\u30a3\u30fc\u30c9\u304c\u66f4\u65b0\u3055\u308c\u305f\u3089\u6700\u65b0\u8a18\u4e8b\u3092Evernote\u306b\u53d6\u308a\u8fbc\u3080\u3002"},"content":{"rendered":"

\u300cMayhem\u3068\u81ea\u4f5c\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u7d44\u307f\u5408\u308f\u305b\u3066\u4f7f\u3046\u3002<\/a>\u300d\u3067Mayhem\u3068\u81ea\u4f5c\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u7d44\u307f\u5408\u308f\u305b\u308c\u3070\u3001RSS Feed Alert\u30a4\u30d9\u30f3\u30c8\u3067\u66f4\u65b0\u3092\u77e5\u3063\u305f\u30d6\u30ed\u30b0\u306e\u8a18\u4e8b\u3092Evernote\u306b\u53d6\u308a\u8fbc\u3080\u3053\u3068\u304c\u3067\u304d\u308b<\/em>\u3001\u3068\u66f8\u3044\u305f\u306e\u3067\u5b9f\u969b\u306b\u3084\u3063\u3066\u307f\u307e\u3057\u305f\u3002
\n<\/p>\n

    \n
  1. Mayhem\u3092\u8d77\u52d5\u3057\u3001Choose Event\u304b\u3089\u300cRSS Feed Alert<\/span>\u300d\u3092\u9078\u629e\u3057\u307e\u3059\u3002<\/li>\n

    \"\"<\/a><\/p>\n

  2. \u66f4\u65b0\u3092\u30c1\u30a7\u30c3\u30af\u3057\u305f\u3044RSS\u30d5\u30a3\u30fc\u30c9\u306eURL\u3092\u6307\u5b9a\u3057\u307e\u3059\u3002<\/li>\n

    \"\"<\/a><\/p>\n

  3. Choose Reaction\u304b\u3089\u300cRun Program<\/span>\u300d\u3092\u9078\u629e\u3057\u307e\u3059\u3002<\/li>\n

    \"\"<\/a><\/p>\n

  4. \u300cFile:<\/strong>\u300d\u306b\u306f\u4e0b\u8a18\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u6307\u5b9a\u3057\u3001\u300cArguments:<\/strong>\u300d\u306b\u306f\u66f4\u65b0\u3092\u30c1\u30a7\u30c3\u30af\u3057\u305f\u3044RSS\u30d5\u30a3\u30fc\u30c9\u306eURL\u3092\u6307\u5b9a\u3057\u307e\u3059\u3002<\/li>\n

    \"\"<\/a><\/p>\n

    \u203b \u4e0b\u8a18\u30b3\u30fc\u30c9\u306f\u30c6\u30b9\u30c8\u3067\u4f7f\u7528\u3057\u305fRSS\u30d5\u30a3\u30fc\u30c9\u300cYahoo!\u30cb\u30e5\u30fc\u30b9\u30fb\u30c8\u30d4\u30c3\u30af\u30b9<\/a>\u300d\u306b\u5408\u308f\u305b\u305f\u30b3\u30fc\u30c9\u306b\u306a\u3063\u3066\u3044\u307e\u3059\u306e\u3067\u3001\u5b9f\u969b\u306b\u306f\u6271\u3044\u305f\u3044RSS\u30d5\u30a3\u30fc\u30c9\u306b\u5408\u308f\u305b\u3066\u30b3\u30fc\u30c9\u3092\u5909\u66f4\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059(\u7279\u306b\u30ea\u30f3\u30af\u53d6\u5f97\u90e8\u5206)\u3002<\/span>
    \n\u203b Evernote Web\u30af\u30ea\u30c3\u30d1\u30fc\u3092\u5229\u7528\u3057\u3066\u3044\u308b\u305f\u3081\u3001\u8981Evernote for Windows\u3002<\/span>
    \n(\u308f\u3056\u308f\u3056Evernote\u306eIE\u7528\u30a2\u30c9\u30a4\u30f3\u3092\u5229\u7528\u3059\u308b\u5fc5\u8981\u3082\u306a\u3044\u306e\u3067\u3059\u304c\u3001\u4ee5\u524d\u306b\u3053\u308c\u3092\u5229\u7528\u3057\u305f    \u30b3\u30fc\u30c9\u3092\u66f8\u3044\u305f\u3053\u3068\u304c\u3042\u3063\u305f<\/a>\u306e\u3067\u518d\u5229\u7528\u3059\u308b\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002)<\/p>\n

    Option Explicit\r\n\r\nDim Args\r\nDim Url\r\nDim Link\r\nDim Sel\r\nDim CurNo\r\nDim d\r\nDim date1, date2\r\nDim i\r\n\r\n'\u5f15\u6570\u53d6\u5f97\r\nSet Args = WScript.Arguments\r\nIf Args.Count > 0 Then\r\n  Url = Args(0)\r\nEnd If\r\nSet Args = Nothing\r\nIf Len(Url) < 1 Then WScript.Quit\r\n\r\n\r\n'XML\u53d6\u5f97\r\nSet d = Nothing '\u521d\u671f\u5316\r\nOn Error Resume Next\r\nWith CreateObject("MSXML2.XMLHTTP")\r\n  .Open "GET", Url, False\r\n  .Send\r\n  If .Status = 200 Then Set d = .responseXML\r\nEnd With\r\nOn Error GoTo 0\r\nIf d Is Nothing Then WScript.Quit\r\n\r\n'\u6700\u65b0\u8a18\u4e8b\u306e\u30ea\u30f3\u30af\u306e\u307f\u53d6\u5f97\r\nd.setProperty "SelectionLanguage", "XPath"\r\nSet Sel = d.SelectNodes("\/rss\/channel\/item")\r\nCurNo = 0:  date1 = Sel.Item(0).SelectSingleNode("pubDate").Text '\u521d\u671f\u5316\r\nFor i = 1 To Sel.Length - 1\r\n  date2 = Sel.Item(i).SelectSingleNode("pubDate").Text\r\n  If ComparePubDate(date1, date2) = 1 Then\r\n    CurNo = i\r\n    date1 = date2\r\n  End If\r\nNext\r\nSet Sel = Nothing\r\nLink = d.SelectNodes("\/rss\/channel\/item")(CurNo).SelectSingleNode("link").Text\r\nSet d = Nothing\r\n\r\n'IE\u7528Evernote\u30a2\u30c9\u30a4\u30f3\u3092\u5229\u7528\u3057\u3066\u8a18\u4e8b\u3092Evernote\u306b\u53d6\u308a\u8fbc\u307f\r\nWith CreateObject("InternetExplorer.Application")\r\n  .Visible = True\r\n  .Navigate Link\r\n  \r\n  '\u8868\u793a\u5f85\u3061\r\n  While .Busy Or .readyState <> 4\r\n    WScript.Sleep 100\r\n  Wend\r\n  \r\n  CreateObject("EvernoteIE.Addin").AddNote .document.Parentwindow '\u975e\u5e38\u306b\u6642\u9593\u304c\u639b\u304b\u308b\r\n  .Quit\r\nEnd With\r\n\r\nPrivate Function ComparePubDate(ByVal date1, ByVal date2)\r\n'pubDate\u306e\u6bd4\u8f03\r\n  Dim d\r\n  Dim elm\r\n  Dim scr\r\n  \r\n  Set d = CreateObject("htmlfile")\r\n  Set elm = d.createElement("span")\r\n  elm.setAttribute "id", "result"\r\n  d.body.appendChild elm\r\n  scr = "var obj=document.getElementById('result');"\r\n  scr = scr & "obj.innerText=1;"\r\n  scr = scr & "var d1=new Date('" & date1 & "');"\r\n  scr = scr & "var d2=new Date('" & date2 & "');"\r\n  scr = scr & "if(d1.getTime()>d2.getTime()){obj.innerText=0};"\r\n  d.parentWindow.execScript scr\r\n  ComparePubDate = elm.innerText\r\n  Set elm = Nothing\r\n  Set d = Nothing\r\nEnd Function<\/pre>\n
  5. \u30b9\u30a4\u30c3\u30c1\u3092\u300cON<\/span>\u300d\u306b\u3057\u3001RSS\u30d5\u30a3\u30fc\u30c9\u304c\u66f4\u65b0\u3055\u308c\u308b\u307e\u3067Mayhem\u3092\u8d77\u52d5\u3057\u305f\u307e\u307e\u306b\u3057\u307e\u3059(\u6700\u5c0f\u5316\u306fOK)\u3002<\/li>\n
    \"\"<\/a><\/p>\n
  6. \u3057\u3070\u3089\u304f\u653e\u3063\u3066\u304a\u304f\u3068\u3001RSS Feed Alert\u30a4\u30d9\u30f3\u30c8\u304c\u767a\u751f\u3057\u305f\u3068\u304d\u306b\u30b9\u30af\u30ea\u30d7\u30c8\u304c\u5b9f\u884c\u3055\u308c\u3001\u6307\u5b9a\u3057\u305fRSS\u30d5\u30a3\u30fc\u30c9\u306e\u8a18\u4e8b\u304cEvernote\u306b\u53d6\u308a\u8fbc\u307e\u308c\u3066\u3044\u308b\u3053\u3068\u304c\u78ba\u8a8d\u3067\u304d\u307e\u3059\u3002<\/li>\n
    \"\"<\/a>\n<\/ol>\n
    \u4ee5\u4e0a\u306e\u3088\u3046\u306b\u3001Mayhem\u3068\u81ea\u4f5c\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u7d44\u307f\u5408\u308f\u305b\u308c\u3070\u69d8\u3005\u306a\u4f5c\u696d\u3092\u81ea\u52d5\u5316\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"\u300cMayhem\u3068\u81ea\u4f5c\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u7d44\u307f\u5408\u308f\u305b\u3066\u4f7f\u3046\u3002\u300d\u3067Mayhem\u3068\u81ea\u4f5c\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u7d44\u307f\u5408\u308f\u305b\u308c\u3070\u3001RSS Feed Alert\u30a4\u30d9\u30f3\u30c8\u3067\u66f4\u65b0\u3092\u77e5\u3063\u305f\u30d6\u30ed\u30b0\u306e\u8a18\u4e8b\u3092Evernote\u306b\u53d6\u308a\u8fbc\u3080\u3053\u3068\u304c\u3067\u304d\u308b\u3001\u3068\u66f8\u3044\u305f\u306e\u3067\u5b9f\u969b […]","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[54],"tags":[141],"class_list":["post-1515","post","type-post","status-publish","format-standard","hentry","category-mayhem","tag-mayhem"],"aioseo_notices":[],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p4UZZr-or","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/1515","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1515"}],"version-history":[{"count":3,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/1515\/revisions"}],"predecessor-version":[{"id":14218,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/1515\/revisions\/14218"}],"wp:attachment":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1515"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1515"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1515"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}