Re[1]: グリッド表示レコードをJSONに変換 - DOBON.NETプログラミング道掲示板

DOBON.NETプログラミング道掲示板

■35402 / 1階層)

　グリッド表示レコードをJSONに変換

□投稿者/ 魔界の仮面弁士大御所(1541回)-(2023/05/01(Mon) 18:32:48)

■No35401に返信(けいさんの記事)
> ここではセキュリティの面もあり、
> 前者を使います。

リファレンス上では、DataContractJsonSerializer クラスではなく
System.Text.Json 名前空間の API の利用が推奨されていますね。

https://learn.microsoft.com/ja-jp/dotnet/api/system.runtime.serialization.json.datacontractjsonserializer?view=netframework-4.8.1

> これですと、｛｝の間にカンマ（,）がついておりません。
それは For ループで
　For i = 0 To 2
　　sw.WriteObject(ms, data(i))
　Next
という出力方法をとっているからですよね。

Array を丸ごと渡しましょう。

　Dim data() As Shohin = {
　　New Shohin With {.商品C = 10000, .商品名 = "商品A"},
　　New Shohin With {.商品C = 10001, .商品名 = "商品B"},
　　New Shohin With {.商品C = 10002, .商品名 = "商品C"}
　}
　Dim serializer As New DataContractJsonSerializer(GetType(Shohin()))
　Dim ms As New MemoryStream()
　serializer.WriteObject(ms, data)
　TextBox1.Text = System.Text.Encoding.UTF8.GetString(ms.ToArray())

違反を報告

上記関連ツリー
前の記事(元になった記事)	次の記事(この記事の返信)
←グリッド表示レコードをJSONに変換 /けい	→Re[2]: グリッド表示レコードをJSONに変換 /けい
グリッド表示レコードをJSONに変換 / けい (23/05/01(Mon) 17:08) #35401
`└` グリッド表示レコードをJSONに変換 / 魔界の仮面弁士 (23/05/01(Mon) 18:32) #35402 ←Now
`└` Re[2]: グリッド表示レコードをJSONに変換 / けい (23/05/01(Mon) 19:31) #35403
`├` Re[3]: グリッド表示レコードをJSONに変換 / けい (23/05/01(Mon) 19:36) #35404
`└` Re[3]: グリッド表示レコードをJSONに変換 / 魔界の仮面弁士 (23/05/01(Mon) 19:48) #35405
`└` Re[4]: グリッド表示レコードをJSONに変換 / けい (23/05/02(Tue) 11:59) #35406 解決済み!
上記ツリーを一括表示 / 上記ツリーをトピック表示
上記の記事へ返信

入力内容にタグは利用できません。
引用部分（行頭に「>」や「■」が付いている部分）が全体の 80% 以上のコメントは投稿できません。

半角カナは使用しないでください。文字化けの原因になります。
削除キーを覚えておくと、自分の記事の編集・削除ができます。
記事中に No*** のように書くとその記事にリンクされます(No は半角英字/*** は半角数字)。
- 使用例)
- No123 → 記事No123の記事リンクになります(指定表示)。
- No123,130,134 → 記事No123/130/134 の記事リンクになります(複数表示)。
- No123-130 → 記事No123～130 の記事リンクになります(連続表示)。

投稿前に必ずお読みください

初めて投稿される方は、必ず「書き込みのルールについて（12/4/2更新）」をお読みください。読むのが面倒、ルールを守りたくないという方は、「お気楽掲示板」へ投稿してください。
質問を投稿する場合は、「質問をする際のアドバイス」を参考にしてください。
投稿は、明記のない限り、パブリックドメインになります。
マルチポストされた投稿を報告する時は匿名で投稿し、マルチポストされている場所を併記してください。以下のリンクをクリックしていただくと、自動で下のフォームが埋まりますので、その後「送信」ボタンを押してご投稿ください。
- マルチポストの報告をする
- マルチポストの報告をするが、マルチポスト先の投稿が嫌がらせである（元の投稿者とは別人が行なっている）可能性が高い（投稿日時に開きがあり、こちらの投稿の方が早い場合は、その可能性が高いです）

Name	/
E-Mail	/
Title	/
URL	/
Comment/ 通常モード->　図表モード-> (適当に改行して下さい/半角10000文字以内) ■No35402に返信(魔界の仮面弁士さんの記事) > > ■No35401に返信(けいさんの記事) >>ここではセキュリティの面もあり、 >>前者を使います。 > > リファレンス上では、DataContractJsonSerializer クラスではなく > System.Text.Json 名前空間の API の利用が推奨されていますね。 > > https://learn.microsoft.com/ja-jp/dotnet/api/system.runtime.serialization.json.datacontractjsonserializer?view=netframework-4.8.1 > > >>これですと、｛｝の間にカンマ（,）がついておりません。 > それは For ループで > 　For i = 0 To 2 > 　　sw.WriteObject(ms, data(i)) > 　Next > という出力方法をとっているからですよね。 > > Array を丸ごと渡しましょう。 > > 　Dim data() As Shohin = { > 　　New Shohin With {.商品C = 10000, .商品名 = "商品A"}, > 　　New Shohin With {.商品C = 10001, .商品名 = "商品B"}, > 　　New Shohin With {.商品C = 10002, .商品名 = "商品C"} > 　} > 　Dim serializer As New DataContractJsonSerializer(GetType(Shohin())) > 　Dim ms As New MemoryStream() > 　serializer.WriteObject(ms, data) > 　TextBox1.Text = System.Text.Encoding.UTF8.GetString(ms.ToArray())
File	/ アップ可能拡張子=> /.gif/.jpg/.png/.zip 1) 太字の拡張子は画像として認識されます。 2) 画像は初期状態で縮小サイズ250×250ピクセル以下で表示されます。 3) 同名ファイルがある、またはファイル名が不適切な場合、　　ファイル名が自動変更されます。 4) アップ可能ファイルサイズは1回20KB(1KB=1024Bytes)までです。 5) ファイルアップ時はプレビューは利用できません。 6) スレッド内の合計ファイルサイズ:[0/300KB] 残り:[300KB]
Icon	/ (画像を選択/サンプル一覧)
削除キー	/ (半角8文字以内)
解決済み! BOX/ 解決したらチェックしてください!（スレッドを閉じる目的ではチェックしないでください!）
クリエイティブ・コモンズ・ライセンスを Comment の末尾に挿入するには、以下のリンクをクリックしてください。（Javascript で挿入しているだけです。）表示（CC BY） \| 表示-改変禁止（CC BY-ND） \| 表示-継承（CC BY-SA） \| 表示-非営利（CC BY-NC） \| 表示-非営利-改変禁止（CC BY-NC-ND） \| 表示-非営利-継承（CC BY-NC-SA）
プレビュー/　クッキーに保存しない/