方法1
方法2
复杂点，找一个能解析js 的 COM组件
sJSPath = sPrjPath & "web\js\jsonparser.js"
Set oFS = CreateObject("Scripting.FileSystemObject")
If oFS.FileExists(sJSPath) Then
Set oFile = oFS.OpenTextFile(sJSPath, 1, F
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024