ASP.NET_實踐透過POST方式來開啟另一webform_如何將C#或VB.NET的List透過Json.NET處裡完傳給js

-

此時可能已經填塞了兩個List物件
lsColDataKeyCollection
lsColDataValCollection
然後是透過Grid選取某列時做出傳送的

【發送端】父頁面
後端VB.NET Code

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim XC As New NameValueCollection
        ' ...... do something
        If Page.IsPostBack = False Then '頁面第一次載入只執行一次
            ' ...... do something
            
        End If

        AddHandler GridShipContent.SelectedIndexChanging, AddressOf OnGridViewSelectedIndexChanging
    End Sub
 
 
    Private Sub OnGridViewSelectedIndexChanging(sender As Object, e As GridViewSelectEventArgs)
        If e.NewSelectedIndex < 0 Then Exit Sub

  ' ...... do something
        Me.Page.ClientScript.RegisterStartupScript(Me.GetType(), "PostTest", "DoPostOpen()", True)
    End Sub


前端Js部分
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
        function DoPostOpen() {
            var keys = [];
            var vals = [];
            var rawJsondicKeyStr = '<%=Newtonsoft.Json.JsonConvert.SerializeObject(lsColDataKeyCollection)%>';
            //document.write("RawJsonKey:" + rawJsondicKeyStr + ";" + "<br>");
            var rawJsondicValStr = '<%=Newtonsoft.Json.JsonConvert.SerializeObject(lsColDataValCollection)%>';
            //document.write("RawJsonVal:" + rawJsondicValStr + ";" + "<br>");

            //用json2.js的JSON做parser避免因應IE8,7,6 沒有javascript原生的Json解析API問題
            var listKey = JSON.parse(rawJsondicKeyStr)
            //document.write("listKey:" + listKey + ";" + "<br>");
            var listVal = JSON.parse(rawJsondicValStr)
            //document.write("listVal:" + listVal + ";" + "<br>");



            for (var idxKey = 0; idxKey < listKey.length; idxKey++) {
                keys[idxKey] = listKey[idxKey];
                vals[idxKey] = listVal[idxKey];
                //document.write(listKey[idxKey])
                //document.write("<br>")
            }
            openWindowByPost("EditForm.aspx", "web", keys, vals, 50,50,400,520);
        }

        function openWindowByPost(url, name, keys, values, ArgTop, ArgLeft, ArgWidth, ArgHeight) {
            //alert("openWindowByPost begin");
            var newWindow = window.open(url, name, "top=" + ArgTop + ",left=" + ArgLeft + ",width=" + ArgWidth + ",height=" + ArgHeight + ", toolbar=no, menubar=no, scrollbars=no,location=no,directories=no , status=no");

            if (!newWindow)
                return false;
            //alert("openWindowByPost pass window object check");
            var html = "";
            html += "<html><head></head><body><form id='formid' method='post' action='" + url + "'>";
            if (keys && values && (keys.length == values.length))
                for (var i = 0; i < keys.length; i++)
                    html += "<input type='hidden' name='" + keys[i] + "' value='" + values[i] + "'/>";
            html += "</form><script type='text/javascript'>document.getElementById(\"formid\").submit()";
            html += "<" + "/script>";
            html += "<" + "/body>";
            html += "<" + "/html>";
            newWindow.document.write(html);
            return newWindow;
        }


這裡透過Json.NET 將List物件序列化給 js
前端 js 再引入Json2.js 確保不會因為IE太早期版本而不支援原生js 的JSON API

可透過Nuget來配置安裝
這樣就不需要一個一個指派，可直接Iterate Assign。






【接收端】子頁面(sub.aspx)


 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 Dim lsColName As New List(Of String)
 Dim lsColVal As New List(Of String)
 If Request.Form.AllKeys.ToList().Count > 0 Then
  '全英文數字內容傳輸時候
            For Each postVal In Request.Form.Keys
         lsColName.Add(postVal)
  lsColVal.Add(Request.Form(postVal))
            Next
  '特定某些傳輸欄位包含中文時候，以下示例是Key已經確保是英文(因為是開發者自訂的)
  'lsColName.Add(postVal)
  'If postVal = "unit" Then
  ' Dim strChineseContent As String = "\u" & Request.Form(postVal) '\u4e2a
        '    Dim strUniToOriStrContent As String = UnicodeToStr(strChineseContent) '\u4e2a -> 个
  ' lsColVal.Add(strUniToOriStrContent)
  'Else
  ' lsColVal.Add(Request.Form(postVal))
  'End If
 End If
 
 '.... do something
 
 '如果在此aspx網頁上你想透過按鈕讓父頁面更新傳回內容則可將如下註解掉的取消
 'Step1.父頁面請安置一個按鈕調成style為display:none,並將父頁面更新邏輯寫入是件區塊中。
 'Step2.透過session存內容 後續在父頁面事件可在調用session對應Key獲取子頁面指派的值
 'AddHandler btnSendBack.Click, AddressOf OnBtnSendBack
  
End Sub


Private Sub OnBtnSendBack(sender As Object, e As EventArgs)
 Dim strJs As String = "window.opener.document.getElementById('btnSubTrigger').click();"
 'Dim strJs As String = "window.opener.SetVal(" & Request.Form("txt_ok_qty") & ");" '---> ok_qty: 14
 Session("P_Key1") = Request.Form("Key1")
    Session("P_Key2") = Request.Form("Key2")
 ScriptManager.RegisterStartupScript(Me, Me.GetType(), "ParentButtonClick", strJs, True)

 strJs = "window.close();"
    Me.Page.ClientScript.RegisterStartupScript(Me.GetType(), "CloseWin", strJs, True)
End Sub


Reference:

[JavaScript]window.open的post與get傳遞參數比較
https://dotblogs.com.tw/puma/archive/2008/09/03/5288.aspx
How do I pass a list from aspx to javascript?
https://stackoverflow.com/questions/3415550/how-do-i-pass-a-list-from-aspx-to-javascript
[JavaScript] JSON stringify and parse
https://oawan.me/2016/javascript-json-stringify-and-parse/
如何在Visual Studio項目中安裝Json.Net
https://www.newtonsoft.com/json
https://riptutorial.com/zh-TW/json-net/example/6086/%E5%A6%82%E4%BD%95%E5%9C%A8visual-studio%E9%A0%85%E7%9B%AE%E4%B8%AD%E5%AE%89%E8%A3%9Djson-net
[Day 22] C#中Json的序列化和反序列化的幾種方式(三)
https://ithelp.ithome.com.tw/articles/10195057
jQuery JSON
https://codertw.com/%E5%89%8D%E7%AB%AF%E9%96%8B%E7%99%BC/289501/
https://blog.xuite.net/dizzy03/murmur/44844092-%5BjQuery%5D%5Bjavascript%5D+%E5%88%A9%E7%94%A8jquery+plug-in%E5%B0%87array%E8%BD%89%E6%88%90json
https://github.com/krinkle/jquery-json
Converting a JSON Text to a JavaScript Object
https://www.w3schools.com/js/js_json.asp
https://kingweblife.blogspot.com/2016/03/jsonparse.html
解决IE浏览器兼容性问题：“JSON”未定义
https://blog.csdn.net/liu865033503/article/details/78191521





留言

張貼留言

這個網誌中的熱門文章

何謂淨重(Net Weight)、皮重(Tare Weight)與毛重(Gross Weight)

-
圖片
當談到貨物的重量時，往往會分成所謂的淨重(Net Weight)與毛重(Gross Weight)。 會有以下公式關係存在 淨重=毛重-皮重(包裝物的重量) 毛重=淨重+皮重 淨重( Net Weight 縮寫為N.W.) 指物品本身的重量，不包括容器或包裝材料的重量。 凈重是國際貿易中最常見的計重辦法。 例如，如果運輸原材料，原材料的重量就是所運輸貨物的淨重。包裝原材料的容器或包裝不計入淨重。同樣地，當我們考慮一罐豆子時，罐子內所含物品的重量就算作淨重。因此，淨重將包括豆子、罐頭里的任何液體，以及保存豆子所含的物品。 大多數 以重量為計價的貨物買賣 ，採用此計價方法。 若合同中並未明確規範以何種方式計量和計價時，按慣例以凈重計價。 毛重( Gross Weight 縮寫G.W.) 貨物連同它的包裝的重量，是你托運的所有物品的總重量。 皮重(Tare Weight) 指商品外包裝材料的重量(即運輸包裝的重量)，不包括內包裝材料和襯墊物的重量。 比方一個空的貨櫃、容器、或任何包裝材料的重量。 Net Net Weight純淨重 (指從Net Weight中扣除內包裝後的重量) 進出口商品為了因應運輸及消費需求, 一般都有內包裝與外包裝。 一般在買賣合同與信用狀中,通常只要求於裝箱單上註明Gross Weight和Net Weight即可, 但有些L/C 要求 Net Net Weight,大多是海關徵收從量稅時的依據 運輸重量對於航運業或者航空運輸等各自都通用這些術語 為何特別在意重量? 主要就在於會影響像是傳輸安全乘載限制。 就運輸層面(不同方式的運輸) 航空運輸：對機長而言，毛重包括皮重、產品淨重以及飛機、燃料、乘客和機組人員的重量。 公路/鐵路運輸:對於火車車長而言，毛重包括產品淨重、皮重和運輸車輛的重量。 水路航運運輸：對船長而言，毛重就是淨重和皮重之和。 就公司ERP成本角度 成本一般都會採用 "淨重" 主要是因為若用毛重，可能會有輔材不可控因素存在 比方一個 5cm 固定塑膠件，今天用一個 10cm 紙箱測重，明天用一個 100cm 紙箱測重，那可能就容易導致ERP資料比較會失真。 就物流層面來探討 通常還會有一名詞即所謂「實際重量」(Actual Weight) 根據稱重(過磅)所得到的重量，實際重量分為實際毛重(Gross Weig
閱讀完整內容

Architecture(架構) 和 Framework(框架) 有何不同?_軟體設計前的事前規劃的藍圖概念

-
圖片
一個應用程式(軟體) 不管是  互動拍照 也好、 投影也好、車牌偵測... 舞台演唱會後方電視牆的互動應用程序、 粒子特效、3D或2D遊戲  等等 開發者通常都需要在一開始做規劃 ㄟ  假設我今天要寫 跟影像有關 可能需要偵測、可能需要提取前景、可能需要偵測圓形 之類的 我有  emgucv 、AForge.Net、 opencv 等等可以用 但是 假設我今天要做的應用程序是需要有視窗介面的~~ emgucv 跟 C# windows form 媒合性 就很高 而且直接在 visual studio 做開發 opencv 我可能還需要依賴 Qt 之類等等  framework 假設我今天是要寫一個 演唱會電視牆互動粒子特效 可能就會挑   openframeworks  、 processing 、kinect 來寫互動 Achitecture  --->全稱 :  Software Architecture   軟體架構 Achitecture   由好多 framework 組成 軟體架構（Software Architecture）是一種軟體在開發前的設計藍圖， 用來告訴軟體的結構，功能，介面，用法，與其他系統的構連以及資料交換等等規範， 但它並沒有叫你要用什麼方式實作， 因此軟體架構通常會產生文件，圖樣，原型以及規格等， 就是沒有可用的程式碼，因為那不是軟體架構應該有的東西， 就像蓋房子時是給你藍圖，而不是一幢蓋好的房子。 軟體框架（Framework):是一個已經成形的方法，而且有程式碼實體 （例如鋼構工法也是要有鋼材才能做），並且會告訴你要如何使用它 （即 Framework Documentation，MSDN Library 即為一最佳例子）
閱讀完整內容

(2021年度)駕訓學科筆試準備題庫歸納分析_法規是非題

-
圖片
  若是出現 「必須」、「必需」、「...必...」、「應由」、「應先」、「應...」 則很高機率是圈 是非通常只要是如下字眼 「不必」+動詞 、「不需」「不須」、「可不」、「可以不」、「可立即」 有出現或符合的都選叉 (X)1.違規記點又不登記在駕照上，所以可以 不必理會 而任意違反交通規則。 (X)2.發生重大交通事故，為迅速恢復交通，清除現場，可 不必等待 肇事處理機關之指示，即可進行。 (X)3.道路駕駛練習，行車前 不必實施 車輛安全檢查，因為那是駕駛教練的工作。 (X)4.開車前， 不必檢查 機件安全，但在行駛中要隨時注意儀錶功能顯示，確保行車安全。 (X)5.煞車油若經常低於"MIN"線，只要添加即可， 不必到修理廠檢修 。 (X)6.冷卻系統只要副水箱在滿水位，主水箱 不必檢查 也不會有問題。 (X)7.引擎冷卻水內含有防凍液或防銹劑，可 不必更換 。 (X)8.儀錶板上的「燃油油量錶」之指針高度，已經降低至「E」點，橘色的「低油料警示燈」點亮時， 不必急著加油 ，到達目的地後再行補充燃油即可。 (X)9.有安全氣囊裝備的汽車， 不必繫 安全帶。 (X)10.煞車時有異音，是正常的情況， 不必檢修 。 (X)11.汽車定期檢驗 不必檢驗 車輛故障標誌，所以隨車不一定要帶車輛故障標誌。 (X)12.開車時 不必理會 義交之指揮，一切以號誌為主。 (X)13.汽車經過隧道，因隧道內燈光明亮視線良好，為省電可 不必開亮 頭燈。 (X)14.駕駛人只求技術優良，對遵守交通規則 不必太重視 。 (X)15.在開車前， 不必檢查 機件，以免耽誤行車時間。 (X)16.遇幼童專用車、校車、身心障礙者用特製車或教練車， 不必禮讓 。 (X)17.行車 不必攜帶 隨車工具。 (X)18.行車起駛前進， 不必顯示 方向燈。 (X)19.汽車通過鐵路平交道，前後兩車間， 不必保持 距離。 (X)20.夜間將車輛停放在無燈光設備及照明不清之道路時，亦 不必顯示 停車燈光或反光標識。 (X)21.在夜間或有霧靄、雨雪、風沙及晝晦時，把車輛停在路旁， 不必顯示 停車燈光或反光標識。 (X)22.汽車駕駛人，僅需具有優良駕駛技術， 不需 具備急救的常識和技能。 (X)23.汽車車身、引擎、底盤、電系等重要設備變更或調換時， 不需 向公路主管機關申請臨時檢驗。
閱讀完整內容