datasetとは？ わかりやすく解説

<SerializableAttribute> _
Public Class DataSet
    Inherits MarshalByValueComponent
    Implements IListSource, IXmlSerializable, ISupportInitializeNotification,
 ISupportInitialize, _
    ISerializable

Dim instance As DataSet

[SerializableAttribute] 
public class DataSet : MarshalByValueComponent,
 IListSource, IXmlSerializable, ISupportInitializeNotification, 
    ISupportInitialize, ISerializable

[SerializableAttribute] 
public ref class DataSet : public
 MarshalByValueComponent, IListSource, IXmlSerializable, ISupportInitializeNotification,
 
    ISupportInitialize, ISerializable

/** @attribute SerializableAttribute() */ 
public class DataSet extends MarshalByValueComponent
 implements IListSource, IXmlSerializable, 
    ISupportInitializeNotification, ISupportInitialize, ISerializable

SerializableAttribute 
public class DataSet extends
 MarshalByValueComponent implements IListSource, IXmlSerializable, 
    ISupportInitializeNotification, ISupportInitialize, ISerializable

Option Explicit On
Option Strict On

Imports System.Data
Imports system.Data.SqlClient

Public Class NorthwindDataSet

    Public Shared Sub Main()
        Dim connectionString As String
 = _
            GetConnectionString()
        ConnectToData(connectionString)
    End Sub

    Private Shared Sub ConnectToData(
 _
        ByVal connectionString As String)

        ' Create a SqlConnection to the Northwind database.
        Using connection As SqlConnection = New
 SqlConnection( _
           connectionString)

            ' Create a SqlDataAdapter for the Suppliers table.
            Dim suppliersAdapter As SqlDataAdapter
 = _
               New SqlDataAdapter()

            ' A table mapping names the DataTable.
            suppliersAdapter.TableMappings.Add("Table",
 "Suppliers")

            ' Open the connection.
            connection.Open()
            Console.WriteLine("The SqlConnection is open.")

            ' Create a SqlCommand to retrieve Suppliers data.
            Dim suppliersCommand As SqlCommand
 = New SqlCommand( _
               "SELECT SupplierID, CompanyName FROM dbo.Suppliers;",
 _
               connection)
            suppliersCommand.CommandType = CommandType.Text

            ' Set the SqlDataAdapter's SelectCommand.
            suppliersAdapter.SelectCommand = suppliersCommand

            ' Fill the DataSet.
            Dim dataSet As DataSet = New
 DataSet("Suppliers")
            suppliersAdapter.Fill(dataSet)

            ' Create a second SqlDataAdapter and SqlCommand to get
            ' the Products table, a child table of Suppliers. 
            Dim productsAdapter As SqlDataAdapter
 = _
                New SqlDataAdapter()
            productsAdapter.TableMappings.Add("Table",
 "Products")

            Dim productsCommand As SqlCommand
 = New SqlCommand( _
               "SELECT ProductID, SupplierID FROM dbo.Products;",
 _
               connection)
            productsAdapter.SelectCommand = productsCommand

            ' Fill the DataSet.
            productsAdapter.Fill(dataSet)

            ' Close the connection.
            connection.Close()
            Console.WriteLine("The SqlConnection is closed.")

            ' Create a DataRelation to link the two tables
            ' based on the SupplierID.
            Dim parentColumn As DataColumn
 = _
               dataSet.Tables("Suppliers").Columns("SupplierID")
            Dim childColumn As DataColumn =
 _
               dataSet.Tables("Products").Columns("SupplierID")
            Dim relation As DataRelation =
 New _
               System.Data.DataRelation("SuppliersProducts",
 _
               parentColumn, childColumn)
            dataSet.Relations.Add(relation)

            Console.WriteLine( _
               "The {0} DataRelation has been created.",
 _
               relation.RelationName)
        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;

namespace Microsoft.AdoNet.DataSetDemo
{
    class NorthwindDataSet
    {
        static void Main()
        {
            string connectionString = GetConnectionString();
            ConnectToData(connectionString);
        }

        private static void
 ConnectToData(string connectionString)
        {
            //Create a SqlConnection to the Northwind database.
            using (SqlConnection connection =
                       new SqlConnection(connectionString))
            {
                //Create a SqlDataAdapter for the Suppliers table.
                SqlDataAdapter adapter = new SqlDataAdapter();

                // A table mapping names the DataTable.
                adapter.TableMappings.Add("Table", "Suppliers");

                // Open the connection.
                connection.Open();
                Console.WriteLine("The SqlConnection is open.");

                // Create a SqlCommand to retrieve Suppliers data.
                SqlCommand command = new SqlCommand(
                    "SELECT SupplierID, CompanyName FROM dbo.Suppliers;"
,
                    connection);
                command.CommandType = CommandType.Text;

                // Set the SqlDataAdapter's SelectCommand.
                adapter.SelectCommand = command;

                // Fill the DataSet.
                DataSet dataSet = new DataSet("Suppliers");
                adapter.Fill(dataSet);

                // Create a second Adapter and Command to get
                // the Products table, a child table of Suppliers. 
                SqlDataAdapter productsAdapter = new SqlDataAdapter();
                productsAdapter.TableMappings.Add("Table", "Products");

                SqlCommand productsCommand = new SqlCommand(
                    "SELECT ProductID, SupplierID FROM dbo.Products;",
                    connection);
                productsAdapter.SelectCommand = productsCommand;

                // Fill the DataSet.
                productsAdapter.Fill(dataSet);

                // Close the connection.
                connection.Close();
                Console.WriteLine("The SqlConnection is closed.");

                // Create a DataRelation to link the two tables
                // based on the SupplierID.
                DataColumn parentColumn =
                    dataSet.Tables["Suppliers"].Columns["SupplierID"];
                DataColumn childColumn =
                    dataSet.Tables["Products"].Columns["SupplierID"];
                DataRelation relation =
                    new System.Data.DataRelation("SuppliersProducts"
,
                    parentColumn, childColumn);
                dataSet.Relations.Add(relation);
                Console.WriteLine(
                    "The {0} DataRelation has been created.",
                    relation.RelationName);
            }
        }

        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";
        }
    }
}

Public Sub New

Dim instance As New DataSet

public DataSet ()

public:
DataSet ()

public DataSet ()

public function DataSet ()

Private Sub CreateDataSet()
    Dim dataSet As DataSet = New
 DataSet

    ' Create two DataTable objects using a function.
    Dim table1 As DataTable = MakeTable("idTable1",
 "thing1")
    Dim table2 As DataTable = MakeTable("idTable2",
 "thing2")
    dataSet.Tables.Add(table1)
    dataSet.Tables.Add(table2)
    Console.WriteLine(dataSet.Tables.Count)
End Sub
 
 
Private Function MakeTable(c1Name As
 String, _
    c2Name As String) As
 DataTable
    Dim table As New DataTable
    
    ' Add two DataColumns
    Dim column As DataColumn = New
 DataColumn( _
        c1Name, System.Type.GetType("System.Integer"))
    table.Columns.Add(column)
    column = New DataColumn(c2Name, _
        System.Type.GetType("System.String"))
    MakeTable = table
End Function

Public Sub New ( _
    dataSetName As String _
)

Dim dataSetName As String

Dim instance As New DataSet(dataSetName)

public DataSet (
    string dataSetName
)

public:
DataSet (
    String^ dataSetName
)

public DataSet (
    String dataSetName
)

public function DataSet (
    dataSetName : String
)

Private Sub CreateDataSet()
    Dim  dataSet As DataSet = New
 DataSet("aNewDataSet")

    ' Create two DataTable objects using a function.
    Dim table1 As DataTable = MakeTable("idTable1",
 "thing1")
    Dim table2 As DataTable = MakeTable("idTable2",
 "thing2")

    dataSet.Tables.Add(table1)
    dataSet.Tables.Add(table2)
    Console.WriteLine(dataSet.DataSetName, dataSet.Tables.Count)
End Sub


Private Function MakeTable(c1Name As
 String, c2Name As String)
 _
    As DataTable
    Dim table As New DataTable
    
    ' Add two DataColumns
    Dim column As DataColumn = New
 DataColumn( _
        c1Name, System.Type.GetType("System.Integer"))
    table.Columns.Add(column)
    column = New DataColumn(c2Name, _
        System.Type.GetType("System.String"))
    MakeTable = table
End Function

Protected Sub New ( _
    info As SerializationInfo, _
    context As StreamingContext _
)

Dim info As SerializationInfo
Dim context As StreamingContext

Dim instance As New DataSet(info,
 context)

protected DataSet (
    SerializationInfo info,
    StreamingContext context
)

protected:
DataSet (
    SerializationInfo^ info, 
    StreamingContext context
)

protected DataSet (
    SerializationInfo info, 
    StreamingContext context
)

protected function DataSet (
    info : SerializationInfo, 
    context : StreamingContext
)

Protected Sub New ( _
    info As SerializationInfo, _
    context As StreamingContext, _
    ConstructSchema As Boolean _
)

Dim info As SerializationInfo
Dim context As StreamingContext
Dim ConstructSchema As Boolean

Dim instance As New DataSet(info,
 context, ConstructSchema)

protected DataSet (
    SerializationInfo info,
    StreamingContext context,
    bool ConstructSchema
)

protected:
DataSet (
    SerializationInfo^ info, 
    StreamingContext context, 
    bool ConstructSchema
)

protected DataSet (
    SerializationInfo info, 
    StreamingContext context, 
    boolean ConstructSchema
)

protected function DataSet (
    info : SerializationInfo, 
    context : StreamingContext, 
    ConstructSchema : boolean
)