C#、VB.NET、ASP.NET、VisualStudioのリファレンスです
投稿日：2015年11月1日 更新日：
POSTされたデータをShift_JISとして読み込むサンプルです。
|
1 2 3 |
Dim d As Byte() = Request.BinaryRead(Request.ContentLength) Dim e As Encoding = Encoding.GetEncoding("Shift_JIS") Dim value As String = e.GetString(d) |
値は、「key1=val1&key2=val2…」みたいな感じで取得できるので、
Split関数などで、”&”や”=”を分割すればキーと値を取得できます。
執筆者：ごん
関連記事
セッションをクリアするサンプルです。
|
1 2 3 4 5 6 7 8 |
'①セッションキー「hoge」をクリアする Session.Remove("hoge") '②セッションキー「hoge」の値をクリアする Session("hoge") = Nothing '③セッション内全てのキーをクリアする。 Session.RemoveAll() |
①でクリアした場合は、キー自体が削除されます。 ②でクリアした場合は、値のみ削除され、キーは削除 …
CSVデータを生成して、CSVデータをファイルとして ダウンロードするサンプルです。
|
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 |
Protected Sub CsvDownload() 'CSVデータを生成 Dim str As StringBuilder = New StringBuilder str.Append("文字1-1") str.Append(",") str.Append("文字1-2") str.Append(",") str.Append("文字1-3") str.Append(vbCrLf) str.Append("文字2-1") str.Append(",") str.Append("文字2-2") str.Append(",") str.Append("文字2-3") str.Append(vbCrLf) 'Contentをクリア Response.ClearContent() 'Contentを設定 Response.ContentEncoding = System.Text.Encoding.GetEncoding("shift-jis") 'Shift-JISで出力したい場合 'Response.ContentEncoding = System.Text.Encoding.UTF8 'UTF-8で出力したい場合 Response.ContentType = "text/csv" '表示ファイル名を指定 Dim viewFileName As String = HttpUtility.UrlEncode("サンプル.csv") Response.AddHeader("Content-Disposition", "attachment;filename=" + viewFileName) 'CSVデータを書き込み Response.Write(str.ToString) 'ダウンロード実行 Response.Flush() Response.End() End Sub |
文字コードは、Excelで表示させるのであれば、 …
サーバ上にあるExcelファイルをダウンロードするサンプルです。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
Imports System.IO Private Sub DownloadExcel() 'Contentをクリア Response.ClearContent() 'Contentを設定 Response.ContentEncoding = System.Text.Encoding.GetEncoding("shift-jis") Response.ContentType = "application/vnd.ms-excel" '表示ファイル名を指定 Dim fn As String = HttpUtility.UrlEncode("サンプル.xlsx") Response.AddHeader("Content-Disposition", "attachment;filename=" + fn) 'ダウンロード対象ファイルを指定 Response.WriteFile("C:\hoge.xlsx") 'ダウンロード実行 Response.Flush() Response.End() End Sub |
セッションに値をセットするサンプルと、 セッションから値を取得するサンプルです。
|
1 2 3 4 5 |
'セッションにキー「hoge」、値「HOGE」をセットする Session("hoge") = "HOGE" 'セッションキー「hoge」の値を取得する Dim sess_hoge As Object = Session("hoge") |
※セッションに存在しないキーを取得しようとした場合は …
Cookieに値をセットするサンプルと、 Cookieから値を取り出すサンプルです。
|
1 2 3 4 5 |
'Cookieに値を設定 Response.Cookies("hoge").Value = "ほげ" 'Cookieから値を取得 Dim val as String = Request.Cookies("hoge").Value |
クッキーをセットする時、有効期限も指定できます。 …
スポンサーリンク
検索
カテゴリー
姉妹サイト
2015/12/13
2015/12/13
[IIS] ASP.NETアプリケーションを仮想ディレクトリに追加する
2015/12/13
[VisualStudio] メソッドがどこから参照されているか調べる
2015/12/13
2015/12/02