C#、VB.NET、ASP.NET、VisualStudioのリファレンスです

[VB.NET] セッションに値を設定・取得する

投稿日：2015年10月25日更新日：2015年11月6日

セッションに値をセットするサンプルと、
セッションから値を取得するサンプルです。

'セッションにキー「hoge」、値「HOGE」をセットする
Session("hoge") = "HOGE"

'セッションキー「hoge」の値を取得する
Dim sess_hoge As Object = Session("hoge")

'セッションにキー「hoge」、値「HOGE」をセットする

Session("hoge") = "HOGE"

'セッションキー「hoge」の値を取得する

Dim sess_hoge As Object = Session("hoge")

※セッションに存在しないキーを取得しようとした場合は、
Nothingが返ります。

-ネットワーク関連

執筆者：ごん

comment コメントをキャンセル

[VB.NET] GETパラメータを取得する

GET値を取得するサンプルです。

Dim val As String = Request.QueryString("key1")

1	Dim val As String = Request.QueryString("key1")

以下のようにGET渡しされた場合は、hogeが取得できます。 http://xxx.xxx/Defa …

[VB.NET] セッションをクリアする

セッションをクリアするサンプルです。

'①セッションキー「hoge」をクリアする
Session.Remove("hoge")

'②セッションキー「hoge」の値をクリアする
Session("hoge") = Nothing

'③セッション内全てのキーをクリアする。
Session.RemoveAll()

'①セッションキー「hoge」をクリアする

Session.Remove("hoge")

'②セッションキー「hoge」の値をクリアする

Session("hoge") = Nothing

'③セッション内全てのキーをクリアする。

Session.RemoveAll()

①でクリアした場合は、キー自体が削除されます。 ②でクリアした場合は、値のみ削除され、キーは削除 …

[VB.NET] クッキーに値を設定・取得する

Cookieに値をセットするサンプルと、 Cookieから値を取り出すサンプルです。

'Cookieに値を設定
Response.Cookies("hoge").Value = "ほげ"

'Cookieから値を取得
Dim val as String = Request.Cookies("hoge").Value

'Cookieに値を設定

Response.Cookies("hoge").Value = "ほげ"

'Cookieから値を取得

Dim val as String = Request.Cookies("hoge").Value

クッキーをセットする時、有効期限も指定できます。 …

[VB.NET] Excelをダウンロードする

サーバ上にあるExcelファイルをダウンロードするサンプルです。

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

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

[VB.NET] POSTされたデータをShift_JISとして読み込む

POSTされたデータをShift_JISとして読み込むサンプルです。

Dim d As Byte() = Request.BinaryRead(Request.ContentLength)
Dim e As Encoding = Encoding.GetEncoding("Shift_JIS")
Dim value As String = e.GetString(d)