ADO.NET のコード例

[アーティクル]
08/22/2008

更新 : November 2007

このトピックにリストされたコードは、次の ADO.NET テクノロジを使用してデータベースからデータを取得する方法を示しています。

ADO.NET データプロバイダ :
- .NET Framework Data Provider for SQL Server (System.Data.SqlClient)
- .NET Framework Data Provider for OLE DB (System.Data.OleDb)
- .NET Framework Data Provider for ODBC (System.Data.Odbc)
- .NET Framework Data Provider for Oracle (System.Data.OracleClient)
ADO.NET エンティティフレームワーク :
- LINQ to Entities
- Typed ObjectQuery
- EntityClient data provider (System.Data.EntityClient)
LINQ to SQL

ADO.NET データプロバイダの例

以下に示した各コードは、ADO.NET データプロバイダを使用してデータベースからデータを取得する方法を示しています。データは DataReader で返されます。詳細については、「DataReader によるデータの取得 (ADO.NET)」を参照してください。

SqlClient

このコード例は、Microsoft SQL Server 7.0 以降のバージョンの Northwind サンプルデータベースに接続できることを前提としています。このコードは SqlCommand を作成し、Products テーブルから行を選択し、SqlParameter を追加して、結果を指定されたパラメータ値 (この場合は 5) より大きな UnitPrice を持つ行に制限します。SqlConnection は using ブロック内に開かれ、これによってコードが終了したときにリソースが閉じられ破棄されます。コードは SqlDataReader を使用してコマンドを実行し、コンソールウィンドウに結果を表示します。

Option Explicit On
Option Strict On

Imports System
Imports System.Data
Imports System.Data.SqlClient

Public Class Program
    Public Shared Sub Main()

        Dim connectionString As String = GetConnectionString()
        Dim queryString As String = _
         "SELECT CategoryID, CategoryName FROM dbo.Categories;"

        Using connection As New SqlConnection(connectionString)
            Dim command As SqlCommand = connection.CreateCommand()
            command.CommandText = queryString
            Try
                connection.Open()
                Dim dataReader As SqlDataReader = _
                 command.ExecuteReader()
                Do While dataReader.Read()
                    Console.WriteLine(vbTab & "{0}" & vbTab & "{1}", _
                     dataReader(0), dataReader(1))
                Loop
                dataReader.Close()

            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
        End Using
    End Sub

    Private Shared Function GetConnectionString() As String
        ' To avoid storing the connection string in your code,  
        ' you can retrieve it from a configuration file.
        Return "Data Source=(local);Initial Catalog=Northwind;" _
           & "Integrated Security=SSPI;"
    End Function
End Class

using System;
using System.Data;
using System.Data.SqlClient;

class Program
{
    static void Main()
    {
        string connectionString = GetConnectionString();
        string queryString = 
            "SELECT CategoryID, CategoryName FROM dbo.Categories;";
        using (SqlConnection connection = 
                   new SqlConnection(connectionString))
        {
            SqlCommand command = connection.CreateCommand();
            command.CommandText = queryString;

            try
            {
                connection.Open();

                SqlDataReader reader = command.ExecuteReader();

                while (reader.Read())
                {
                    Console.WriteLine("\t{0}\t{1}",
                        reader[0], reader[1]);
                }
                reader.Close();
            }
            catch (Exception ex)
            {
                Console.WriteLine(ex.Message);
            }
        }
    }

    static private string GetConnectionString()
    {
        // To avoid storing the connection string in your code, 
        // you can retrieve it from a configuration file.
        return "Data Source=(local);Initial Catalog=Northwind;"
            + "Integrated Security=SSPI";
    }
}

[Top]

OleDb

このコード例は、Microsoft Access の Northwind サンプルデータベースに接続できることを前提としています。このコードは OleDbCommand を作成し、Products テーブルから行を選択し、OleDbParameter を追加して、結果を指定したパラメータ値 (この場合は 5) よりも大きな UnitPrice を持つ行に制限します。OleDbConnection は using ブロック内に開かれ、これによってコードが終了したときにリソースが閉じられ破棄されます。コードは OleDbDataReader を使用してコマンドを実行し、コンソールウィンドウに結果を表示します。

Option Explicit On
Option Strict On

Imports System
Imports System.Data
Imports System.Data.OleDb

Public Class Program
    Public Shared Sub Main()

        Dim connectionString As String = GetConnectionString()
        Dim queryString As String = _
            "SELECT CategoryID, CategoryName FROM Categories;"

        Using connection As New OleDbConnection(connectionString)
            Dim command As OleDbCommand = connection.CreateCommand()
            command.CommandText = queryString
            Try
                connection.Open()
                Dim dataReader As OleDbDataReader = _
                 command.ExecuteReader()
                Do While dataReader.Read()
                    Console.WriteLine(vbTab & "{0}" & vbTab & "{1}", _
                     dataReader(0), dataReader(1))
                Loop
                dataReader.Close()

            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
        End Using
    End Sub

    Private Shared Function GetConnectionString() As String
        ' To avoid storing the connection string in your code,  
        ' you can retrieve it from a configuration file.
        ' Assumes Northwind.mdb is located in c:\Data folder.
        Return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
           & "c:\Data\Northwind.mdb;User Id=admin;Password=;"
    End Function
End Class

using System;
using System.Data;
using System.Data.OleDb;

class Program
{
    static void Main()
    {
        string connectionString = GetConnectionString();
        string queryString =
            "SELECT CategoryID, CategoryName FROM Categories;";
        using (OleDbConnection connection =
                   new OleDbConnection(connectionString))
        {
            OleDbCommand command = connection.CreateCommand();
            command.CommandText = queryString;

            try
            {
                connection.Open();

                OleDbDataReader reader = command.ExecuteReader();

                while (reader.Read())
                {
                    Console.WriteLine("\t{0}\t{1}",
                        reader[0], reader[1]);
                }
                reader.Close();
            }
            catch (Exception ex)
            {
                Console.WriteLine(ex.Message);
            }
        }
    }

    static private string GetConnectionString()
    {
        // To avoid storing the connection string in your code, 
        // you can retrieve it from a configuration file.
        // Assumes Northwind.mdb is located in the c:\Data folder.
        return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
            + "c:\\Data\\Northwind.mdb;User Id=admin;Password=;";
    }
}

[Top]

Odbc

このコード例は、Microsoft Access の Northwind サンプルデータベースに接続できることを前提としています。このコードは OdbcCommand を作成し、Products テーブルから行を選択し、OdbcParameter を追加して、結果を指定したパラメータ値 (この場合は 5) よりも大きな UnitPrice を持つ行に制限します。OdbcConnection は using ブロック内に開かれ、これによってコードが終了したときにリソースが閉じられ破棄されます。コードは OdbcDataReader を使用してコマンドを実行し、コンソールウィンドウに結果を表示します。

Option Explicit On
Option Strict On

Imports System
Imports System.Data
Imports System.Data.Odbc

Public Class Program
    Public Shared Sub Main()

        Dim connectionString As String = GetConnectionString()
        Dim queryString As String = _
            "SELECT CategoryID, CategoryName FROM Categories;"

        Using connection As New OdbcConnection(connectionString)
            Dim command As OdbcCommand = connection.CreateCommand()
            command.CommandText = queryString
            Try
                connection.Open()
                Dim dataReader As OdbcDataReader = _
                 command.ExecuteReader()
                Do While dataReader.Read()
                    Console.WriteLine(vbTab & "{0}" & vbTab & "{1}", _
                     dataReader(0), dataReader(1))
                Loop
                dataReader.Close()

            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
        End Using
    End Sub

    Private Shared Function GetConnectionString() As String
        ' To avoid storing the connection string in your code,  
        ' you can retrieve it from a configuration file.
        ' Assumes Northwind.mdb is located in c:\Data folder.
        Return "Driver={Microsoft Access Driver (*.mdb)};" _
           & "Dbq=c:\Data\Northwind.mdb;Uid=Admin;Pwd=;"
    End Function
End Class

using System;
using System.Data;
using System.Data.Odbc;

class Program
{
    static void Main()
    {
        string connectionString = GetConnectionString();
        string queryString =
            "SELECT CategoryID, CategoryName FROM Categories;";
        using (OdbcConnection connection =
                   new OdbcConnection(connectionString))
        {
            OdbcCommand command = connection.CreateCommand();
            command.CommandText = queryString;

            try
            {
                connection.Open();

                OdbcDataReader reader = command.ExecuteReader();

                while (reader.Read())
                {
                    Console.WriteLine("\t{0}\t{1}",
                        reader[0], reader[1]);
                }
                reader.Close();
            }
            catch (Exception ex)
            {
                Console.WriteLine(ex.Message);
            }
        }
    }

    static private string GetConnectionString()
    {
        // To avoid storing the connection string in your code, 
        // you can retrieve it from a configuration file.
        // Assumes Northwind.mdb is located in the c:\Data folder.
        return "Driver={Microsoft Access Driver (*.mdb)};"
            + "Dbq=c:\\Data\\Northwind.mdb;Uid=Admin;Pwd=;";
    }
}

[Top]

OracleClient

このコード例では、Oracle サーバー上の DEMO.CUSTOMER との接続を前提としています。また、System.Data.OracleClient.dll への参照を追加する必要があります。このコードは、データを OracleDataReader で返します。

Option Explicit On
Option Strict On

Imports System
Imports System.Data
Imports System.Data.OracleClient

Public Class Program
    Public Shared Sub Main()

        Dim connectionString As String = GetConnectionString()
        Dim queryString As String = _
            "SELECT CUSTOMER_ID, NAME FROM DEMO.CUSTOMER"

        Using connection As New OracleConnection(connectionString)
            Dim command As OracleCommand = connection.CreateCommand()
            command.CommandText = queryString
            Try
                connection.Open()
                Dim dataReader As OracleDataReader = _
                 command.ExecuteReader()
                Do While dataReader.Read()
                    Console.WriteLine(vbTab & "{0}" & vbTab & "{1}", _
                     dataReader(0), dataReader(1))
                Loop
                dataReader.Close()

            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
        End Using
    End Sub

    Private Shared Function GetConnectionString() As String
        ' To avoid storing the connection string in your code,  
        ' you can retrieve it from a configuration file.
        Return "Data Source=ThisOracleServer;Integrated Security=yes;"
    End Function
End Class

using System;
using System.Data;
using System.Data.OracleClient;

class Program
{
    static void Main()
    {
        string connectionString = GetConnectionString();
        string queryString =
            "SELECT CUSTOMER_ID, NAME FROM DEMO.CUSTOMER";
        using (OracleConnection connection =
                   new OracleConnection(connectionString))
        {
            OracleCommand command = connection.CreateCommand();
            command.CommandText = queryString;

            try
            {
                connection.Open();

                OracleDataReader reader = command.ExecuteReader();

                while (reader.Read())
                {
                    Console.WriteLine("\t{0}\t{1}",
                        reader[0], reader[1]);
                }
                reader.Close();
            }
            catch (Exception ex)
            {
                Console.WriteLine(ex.Message);
            }
        }
    }

    static private string GetConnectionString()
    {
        // To avoid storing the connection string in your code, 
        // you can retrieve it from a configuration file.
        // Assumes Northwind.mdb is located in the c:\Data folder.
        return "Data Source=ThisOracleServer;Integrated Security=yes;";
    }
}

[Top]

エンティティフレームワークの例

以下に示した各コードは、エンティティデータモデル (EDM) のエンティティを照会して、データソースからデータを取得する方法を示しています。これらの例では Northwind モデルを使用します。詳細については、「Introducing the Entity Framework」を参照してください。

LINQ to Entities

この例のコードは LINQ クエリを使用してデータをカテゴリオブジェクトとして返します。これは、CategoryID および CategoryName プロパティのみを含んでいる匿名型として射影されます。詳細については、「LINQ to Entities Overview」を参照してください。

[Top]

型指定された ObjectQuery

この例のコードは ObjectQuery<T> を使用し、カテゴリオブジェクトとしてデータを返します。詳細については、「Object Queries (Entity Framework)」を参照してください。

[Top]

EntityClient

この例のコードは EntityCommand を使用し、Entity SQL クエリを実行します。このクエリは、カテゴリエンティティ型のインスタンスを示すレコードのリストを返します。EntityDataReader を使用して、結果セットのデータレコードにアクセスします。詳細については、「EntityClient Provider for Entity Framework」を参照してください。

[Top]

LINQ to SQL

この例のコードは LINQ クエリを使用してデータをカテゴリオブジェクトとして返します。これは、CategoryID および CategoryName プロパティのみを含んでいる匿名型として射影されます。この例は Northwind データコンテキストを基にしています。詳細については、「概要 (LINQ to SQL)」を参照してください。

[Top]

参照

その他の技術情報

ADO.NET の概要

ADO.NET でのデータの取得および変更

クライアントデータアプリケーションの作成

Querying an Entity Data Model (Entity Framework Tasks)

How to: Execute a Query that Returns an Anonymous Type (Entity Framework)

次の方法で共有

ADO.NET のコード例

ADO.NET データプロバイダの例

SqlClient

OleDb

Odbc

OracleClient

エンティティフレームワークの例

LINQ to Entities

型指定された ObjectQuery

EntityClient

LINQ to SQL

参照

その他の技術情報

その他のリソース

次の方法で共有

ADO.NET のコード例

ADO.NET データ プロバイダの例

SqlClient

OleDb

Odbc

OracleClient

エンティティ フレームワークの例

LINQ to Entities

型指定された ObjectQuery

EntityClient

LINQ to SQL

参照

その他の技術情報

その他のリソース

ADO.NET データプロバイダの例

エンティティフレームワークの例