PrimitiveType 結果を返すクエリの実行方法 (EntityClient)

このトピックでは、EntityCommand を使用して Entity Data Model (EDM) に対してコマンドを実行し、EntityDataReader を使用して PrimitiveType 結果を取得する方法の例を示します。

この例のコードを実行するには

1. AdventureWorks Sales Model をプロジェクトに追加し、Entity Framework を使用するようにプロジェクトを構成します。これを行うには、次のいずれかの操作を実行します。

   • Entity Data Model ツールをインストールしている場合は、「Entity Data Model ウィザードを使用する方法 (Entity Framework)」の手順を実行します。

   • ツールをインストールしていない場合は、「Entity Framework プロジェクトを手動で構成する方法」および「Entity Data Model を手動で定義する方法 (Entity Framework)」の手順を実行します。

2. アプリケーションのコード ページで、次の using ステートメント (Visual Basic の場合は Imports) を追加します。

   Imports System
   Imports System.Collections.Generic
   Imports System.Collections
   Imports System.Data.Common
   Imports System.Data
   Imports System.Data.SqlClient
   Imports System.Data.EntityClient
   Imports System.Data.Metadata.Edm
   Imports System.IO
   ' Add AdventureWorksModel prepended with the root namespace for the project.
   'Imports ProjectName.AdventureWorksModel
   

   using System;
   using System.Collections.Generic;
   using System.Collections;
   using System.Data.Common;
   using System.Data;
   using System.IO;
   using System.Data.SqlClient;
   using System.Data.EntityClient;
   using AdventureWorksModel;
   using System.Data.Metadata.Edm;
   

例

コードをテストするには、次のクエリを引数として ExecutePrimitiveTypeQuery 関数に渡します。

"SELECT VALUE AVG(p.ListPrice) FROM AdventureWorksEntities.Product as p"

上記のクエリは、PrimitiveType 結果を返します。

Sub ExecutePrimitiveTypeQuery(ByVal esqlQuery As String)
    If (esqlQuery.Length = 0) Then
        Console.WriteLine("The query string is empty.")
        Return
    End If

    Using conn As EntityConnection = New EntityConnection("name=AdventureWorksEntities")
        conn.Open()

        Try
            ' Create an EntityCommand.
            Using cmd As EntityCommand = conn.CreateCommand()
                cmd.CommandText = esqlQuery
                ' Execute the command.
                Using reader As EntityDataReader = cmd.ExecuteReader(CommandBehavior.SequentialAccess)
                    Do While (reader.Read())
                        Dim record As IExtendedDataRecord = CType(reader, IExtendedDataRecord)
                        ' For PrimitiveType 
                        ' the record contains exactly one field.
                        Dim fieldIndex As Integer
                        fieldIndex = 0
                        Console.WriteLine("Value: " + record.GetValue(fieldIndex))
                    Loop
                End Using
            End Using
        Catch ex As Exception
            Console.WriteLine(ex.ToString())
        End Try
        conn.Close()
    End Using
End Sub

static void ExecutePrimitiveTypeQuery(string esqlQuery)
{
    if (esqlQuery.Length == 0)
    {
        Console.WriteLine("The query string is empty.");
        return;
    }

    using (EntityConnection conn =
        new EntityConnection("name=AdventureWorksEntities"))
    {
        conn.Open();

        try
        {
            // Create an EntityCommand.
            using (EntityCommand cmd = conn.CreateCommand())
            {
                cmd.CommandText = esqlQuery;
                // Execute the command.
                using (EntityDataReader rdr =
                    cmd.ExecuteReader(CommandBehavior.SequentialAccess))
                {
                    // Start reading results.
                    while (rdr.Read())
                    {
                        IExtendedDataRecord record = rdr as IExtendedDataRecord;
                        // For PrimitiveType 
                        // the record contains exactly one field.
                        int fieldIndex = 0;
                        Console.WriteLine("Value: " + record.GetValue(fieldIndex));
                    }
                }
            }
        }
        catch (EntityException ex)
        {
            Console.WriteLine(ex.ToString());
        }
        conn.Close();
    }
}

参照

概念

Entity SQL リファレンス

その他のリソース

EntityClient の使用 (Entity Framework タスク)