- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]WebBrowser传值给ECharts (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174994)
-- 发布时间：2022/2/15 9:25:00
-- [求助]WebBrowser传值给ECharts
大佬救救孩子吧
，InvokeScript函数需要拼接太难了，传值后老是出现data未定义，请问如何把本地json字符串传入js中
，InvokeScript函数需要拼接太难了，传值后老是出现data未定义，请问如何把本地json字符串传入js中本地table.json文件：
{"value": [
44117,
22011,
],
"name": [
"北京",
"上海",
]
}
WebBrowser事件中：
Dim json As String \'定义json
Dim web = e.Form.Controls("WebBrowser1").BaseControl
json = FileSys.ReadAllText("d:\\data\\table.json") \'读取本地json
web.Document.InvokeScript("eval", new String() {"date.push(" & json & ")"})
js文件中：
var data = [];//数据传入
-- 发布时间：2022/2/15 9:40:00
--
web.Document.InvokeScript("eval", new String() {"data.push(" & json.replace("""","\'") & ")"})
-- 发布时间：2022/2/15 19:41:00
--
替换后遇到bug。。。需要前面加上MessageBox.Show(json)后面代码才会生效。。好奇怪
