PGlabo

« [ASP.NET] CSVを作成・ダウンロード | メイン | [ASP.NET|SQL Server] SQL Server から一件アイテム取得 »

2005年10月06日

[ASP.NET|SQL Server] SQL Server から複数アイテム取得

        Dim Conn As SqlConnection
        Dim Cmd As SqlCommand
        Dim DR As SqlDataReader

        'コネクションセット

        Conn = New SqlConnection("server=localhost;User ID=sa;Password=;database=TEST;")

        Conn.Open()

        'コマンドセット

        Cmd = New SqlCommand("SELECT * FROM UsersMst WHERE Id=@Id", Conn)

        Cmd.Parameters.Add("@Id", SqlDbType.VarChar, 6)

        Cmd.Parameters("@Id").Value = User.Identity.Name

        'データリーダーセット

        DR = Cmd.ExecuteReader

        DR.Read()

        DB_Pass = DR.Item("Pass")    'DBの列名

        DB_LName = DR.Item("LName")

        DB_FName = DR.Item("FName")

        DB_Kana = DR.Item("Kana")

        '後処理        

        DR.Close()

        Cmd.Dispose()

        Conn.Dispose()

2005 / 10 / 06