Option Explicit Private Sub testParse() Dim url As String url = "http://www.morningstar.co.jp/FundData/common/chart/xml/all/MSCI011010.xml" Application.StatusBar = "Loading: " & url Dim xdoc As New DOMDocument60 xdoc.async = False xdoc.Loa…

var downloadAsTextFile = function(fileName, content) { var bom = new Uint8Array([0xEF, 0xBB, 0xBF]); var blob = new Blob([bom, content]); var url = window.URL || window.webkitURL; var blobURL = url.createObjectURL(blob); var a = document.c…