欧美一区二区三区,国内熟女精品熟女A片视频小说,日本av网,小鲜肉男男GAY做受XXX网站

asp表格每個單元格json

洪振霞2年前7瀏覽0評論

ASP表格中,每個單元格都可以使用JSON格式的數據來存儲和傳遞信息。

<%  
' 初始化數組  
Dim arr(2,2)  
arr(0, 0) = "姓名"  
arr(0, 1) = "年齡"  
arr(0, 2) = "性別"  
arr(1, 0) = "張三"  
arr(1, 1) = 20  
arr(1, 2) = "男"  
arr(2, 0) = "李四"  
arr(2, 1) = 22  
arr(2, 2) = "女"  
' 生成JSON格式數據  
Dim jsonStr  
Set jsonObj = Server.CreateObject("Scripting.Dictionary")  
Dim jsonObjAll  
Set jsonObjAll = Server.CreateObject("Scripting.Dictionary")  
For i = 0 To 2  
Set jsonObj = Server.CreateObject("Scripting.Dictionary")  
jsonObj.Add "name", arr(i, 0)  
jsonObj.Add "age", arr(i, 1)  
jsonObj.Add "sex", arr(i, 2)  
jsonObjAll.Add i, jsonObj.Items  
Next  
jsonStr = JSON.stringify(jsonObjAll.Items)  
Response.Write("<script type='text/javascript'>")  
Response.Write("var data = " & jsonStr & ";")  
Response.Write("</script>")  
%>

在以上代碼中,我們首先初始化了一個二維數組arr,然后使用Scripting.Dictionary類來生成每個單元格的JSON數據,最后使用JSON.stringify()方法來將JSON數據轉化為字符串,并輸出到頁面上。使用JavaScript來獲取該字符串并解析為JS Object后,即可在前端代碼中動態加載ASP表格數據。