Archive for the ‘ADO.NET’ Category

  1. Hello, ADO.NET(F#) World!

    Posted on 9月 8th, 2012 by cx20

    ADO.NET(F#)

    ADO.NET（ActiveX Data Objects .NET）は、ADO の後継で .NET ベースの DBMS 接続用 API である。
    .NET データプロバイダを介することで様々な DBMS への接続が可能となっている。
    .NET Framework 標準で使用できる .NET データプロバイダとしては、以下のようなプロバイダがある。

    データプロバイダ名 説明
    System.Data.SqlClient Microsoft SQL Server
    System.Data.OleDb OLE DB
    System.Data.Odbc ODBC
    System.Data.OracleClient Oracle

    ソースコード（F# + ADO.NET + OLE DB + Jet データベース）

    Hello.fs
    raw download
    open System;
open System.Data.OleDb;
 
let conStr = "Provider=Microsoft.Jet.OLEDB.4.0;
              Data Source=.hello.mdb;"
let con = new OleDbConnection(conStr)
let sqlStr = "SELECT 'Hello, ADO.NET World' AS Message"
let cmd = new OleDbCommand(sqlStr, con)
con.Open()
let reader = cmd.ExecuteReader()
while reader.Read() do
    printfn "%s" (reader.GetName(0))
    printfn "---------------------" 
    printfn "%s" (reader.GetString(0))
reader.Close()
con.Close()

    ソースコード（F# + ADO.NET + OLE DB + ACE データベース）

    Hello.fs
    raw download
    open System;
open System.Data.OleDb;
 
let conStr = "Provider=Microsoft.ACE.OLEDB.12.0;
              Data Source=.hello.accdb;"
let con = new OleDbConnection(conStr)
let sqlStr = "SELECT 'Hello, ADO.NET World' AS Message"
let cmd = new OleDbCommand(sqlStr, con)
con.Open()
let reader = cmd.ExecuteReader()
while reader.Read() do
    printfn "%s" (reader.GetName(0))
    printfn "---------------------" 
    printfn "%s" (reader.GetString(0))
reader.Close()
con.Close()

    ソースコード（F# + ADO.NET + SQL Server）

    Hello.fs
    raw download
    open System;
open System.Data.SqlClient;
 
let conStr = "SERVER=(local);
               DATABASE=master;
               UID=sa;PWD=P@ssW0rd;"
let con = new SqlConnection(conStr)
let sqlStr = "SELECT 'Hello, ADO.NET World' AS Message"
let cmd = new SqlCommand(sqlStr, con)
con.Open()
let reader = cmd.ExecuteReader()
while reader.Read() do
    printfn "%s" (reader.GetName(0))
    printfn "---------------------" 
    printfn "%s" (reader.GetString(0))
reader.Close()
con.Close()

    ソースコード（F# + ADO.NET + Oracle）

    Hello.fs
    raw download
    open System;
open System.Data.OracleClient;
 
let conStr = "Data Source=ORCL;User ID=scott;Password=tiger;"
let con = new OracleConnection(conStr)
let sqlStr = "SELECT 'Hello, ADO.NET World' AS Message FROM DUAL"
let cmd = new OracleCommand(sqlStr, con)
con.Open()
let reader = cmd.ExecuteReader()
while reader.Read() do
    printfn "%s" (reader.GetName(0))
    printfn "---------------------" 
    printfn "%s" (reader.GetString(0))
reader.Close()
con.Close()

    ソースコード（F# + ADO.NET + ODBC + MySQL）

    Hello.fs
    raw download
    open System;
open System.Data.Odbc;
 
let conStr = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;UID=root;PWD=P@ssW0rd"
let con = new OdbcConnection(conStr)
let sqlStr = "SELECT 'Hello, ADO.NET World' AS Message"
let cmd = new OdbcCommand(sqlStr, con)
con.Open()
let reader = cmd.ExecuteReader()
while reader.Read() do
    printfn "%s" (reader.GetName(0))
    printfn "---------------------" 
    printfn "%s" (reader.GetString(0))
reader.Close()
con.Close()

    コンパイル方法（32bit OLE DB 使用時）

    C:¥> fsc Hello.fs --platform:x86

    コンパイル方法（上記以外）

    C:¥> fsc Hello.fs

    実行結果

    Message
---------------------
Hello, ADO.NET World!

  2. Hello, ADO.NET(JScript.NET) World!

    Posted on 9月 6th, 2012 by cx20

    ADO.NET(JScript.NET)

    ADO.NET（ActiveX Data Objects .NET）は、ADO の後継で .NET ベースの DBMS 接続用 API である。
    .NET データプロバイダを介することで様々な DBMS への接続が可能となっている。
    .NET Framework 標準で使用できる .NET データプロバイダとしては、以下のようなプロバイダがある。

    データプロバイダ名 説明
    System.Data.SqlClient Microsoft SQL Server
    System.Data.OleDb OLE DB
    System.Data.Odbc ODBC
    System.Data.OracleClient Oracle

    ソースコード（JScript.NET + ADO.NET + OLE DB + Jet データベース）

    import System;
import System.Data.OleDb;
 
main();
 
function main() {
    var conStr = "Provider=Microsoft.Jet.OLEDB.4.0;"
        + "Data Source=.\hello.mdb;"
    var sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    var con = new OleDbConnection(conStr);
    var cmd = new OleDbCommand(sqlStr, con);
    con.Open();
    var reader = cmd.ExecuteReader();
    while( reader.Read() )
    {
        Console.WriteLine( reader.GetName(0) );
        Console.WriteLine( "---------------------" );
        Console.WriteLine( reader[0] );
    }
    reader.Close();
    con.Close();
}

    ソースコード（JScript.NET + ADO.NET + OLE DB + ACE データベース）

    import System;
import System.Data.OleDb;
 
main();
 
function main() {
    var conStr = "Provider=Microsoft.ACE.OLEDB.12.0;"
        + "Data Source=.\hello.accdb;"
    var sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    var con = new OleDbConnection(conStr);
    var cmd = new OleDbCommand(sqlStr, con);
    con.Open();
    var reader = cmd.ExecuteReader();
    while( reader.Read() )
    {
        Console.WriteLine( reader.GetName(0) );
        Console.WriteLine( "---------------------" );
        Console.WriteLine( reader[0] );
    }
    reader.Close();
    con.Close();
}

    ソースコード（JScript.NET + ADO.NET + SQL Server）

    import System;
import System.Data.SqlClient;
 
main();
 
function main() {
    var conStr = "SERVER=(local);"
        + "DATABASE=master;"
        + "UID=sa;"
        + "PWD=P@ssW0rd";
    var sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    var con = new SqlConnection(conStr);
    var cmd = new SqlCommand(sqlStr, con);
    con.Open();
    var reader = cmd.ExecuteReader();
    while( reader.Read() )
    {
        Console.WriteLine( reader.GetName(0) );
        Console.WriteLine( "---------------------" );
        Console.WriteLine( reader[0] );
    }
    reader.Close();
    con.Close();
}

    ソースコード（JScript.NET + ADO.NET + Oracle）

    import System;
import System.Data.OracleClient;
 
main();
 
function main() {
    var conStr = "Data Source=ORCL;User ID=scott;Password=tiger;";
    var sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message FROM DUAL";
 
    var con = new OracleConnection(conStr);
    var cmd = new OracleCommand(sqlStr, con);
    con.Open();
    var reader = cmd.ExecuteReader();
    while( reader.Read() )
    {
        Console.WriteLine( reader.GetName(0) );
        Console.WriteLine( "---------------------" );
        Console.WriteLine( reader[0] );
    }
    reader.Close();
    con.Close();
}

    ソースコード（JScript.NET + ADO.NET + ODBC + MySQL）

    import System;
import System.Data;
import System.Data.Odbc;
 
main();
 
function main() {
    var conStr = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;UID=root;PWD=P@ssW0rd";
    var sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    var con = new OdbcConnection(conStr);
    var cmd = new OdbcCommand(sqlStr, con);
    con.Open();
    var reader = cmd.ExecuteReader();
    while( reader.Read() )
    {
        Console.WriteLine( reader.GetName(0) );
        Console.WriteLine( "---------------------" );
        Console.WriteLine( reader[0] );
    }
    reader.Close();
    con.Close();
}

    コンパイル方法（32bit OLE DB 使用時）

    C:¥> jsc /platform:x86 Hello.js

    コンパイル方法（上記以外）

    C:¥> jsc Hello.js

    実行結果

    Message
---------------------
Hello, ADO.NET World!

  3. Hello, ADO.NET(C++/CLI) World!

    Posted on 9月 5th, 2012 by cx20

    ADO.NET(C++/CLI)

    ADO.NET（ActiveX Data Objects .NET）は、ADO の後継で .NET ベースの DBMS 接続用 API である。
    .NET データプロバイダを介することで様々な DBMS への接続が可能となっている。
    .NET Framework 標準で使用できる .NET データプロバイダとしては、以下のようなプロバイダがある。

    データプロバイダ名 説明
    System.Data.SqlClient Microsoft SQL Server
    System.Data.OleDb OLE DB
    System.Data.Odbc ODBC
    System.Data.OracleClient Oracle

    ソースコード（C++/CLI + ADO.NET + OLE DB + Jet データベース）

    #using <System.dll>
#using <System.Data.dll>
 
using namespace System;
using namespace System::Data::OleDb;
 
int main( array<System::String^>^ args )
{
    String^ conStr = "Provider=Microsoft.Jet.OLEDB.4.0;"
        + "Data Source=.\hello.mdb;";
    String^ sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    OleDbConnection^ con = gcnew OleDbConnection(conStr);
    OleDbCommand^ cmd = gcnew OleDbCommand(sqlStr, con);
    con->Open();
    OleDbDataReader^ reader = cmd->ExecuteReader();
    while( reader->Read() )
    {
        Console::WriteLine( reader->GetName(0) );
        Console::WriteLine( "---------------------" );
        Console::WriteLine( reader[0] );
    }
    reader->Close();
    con->Close();
 
   return 0;
}

    ソースコード（C++/CLI + ADO.NET + OLE DB + ACE データベース）

    #using <System.dll>
#using <System.Data.dll>
 
using namespace System;
using namespace System::Data::OleDb;
 
int main( array<System::String^>^ args )
{
    String^ conStr = "Provider=Microsoft.ACE.OLEDB.12.0;"
        + "Data Source=.\hello.accdb;";
    String^ sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    OleDbConnection^ con = gcnew OleDbConnection(conStr);
    OleDbCommand^ cmd = gcnew OleDbCommand(sqlStr, con);
    con->Open();
    OleDbDataReader^ reader = cmd->ExecuteReader();
    while( reader->Read() )
    {
        Console::WriteLine( reader->GetName(0) );
        Console::WriteLine( "---------------------" );
        Console::WriteLine( reader[0] );
    }
    reader->Close();
    con->Close();
 
   return 0;
}

    ソースコード（C++/CLI + ADO.NET + SQL Server）

    #using <System.dll>
#using <System.Data.dll>
 
using namespace System;
using namespace System::Data::SqlClient;
 
int main( array<System::String^>^ args )
{
    String^ conStr = "SERVER=(local);"
        + "DATABASE=master;"
        + "UID=sa;"
        + "PWD=P@ssW0rd";
    String^ sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    SqlConnection^ con = gcnew SqlConnection(conStr);
    SqlCommand^ cmd = gcnew SqlCommand(sqlStr, con);
    con->Open();
    SqlDataReader^ reader = cmd->ExecuteReader();
    while( reader->Read() )
    {
        Console::WriteLine( reader->GetName(0) );
        Console::WriteLine( "---------------------" );
        Console::WriteLine( reader[0] );
    }
    reader->Close();
    con->Close();
 
   return 0;
}

    ソースコード（C++/CLI + ADO.NET + Oracle）

    #using <System.dll>
#using <System.Data.dll>
#using <System.Data.OracleClient.dll>
 
using namespace System;
using namespace System::Data::OracleClient;
 
int main( array<System::String^>^ args )
{
    String^ conStr = "Data Source=ORCL;User ID=scott;Password=tiger;";
    String^ sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message FROM DUAL";
 
    OracleConnection^ con = gcnew OracleConnection(conStr);
    OracleCommand^ cmd = gcnew OracleCommand(sqlStr, con);
    con->Open();
    OracleDataReader^ reader = cmd->ExecuteReader();
    while( reader->Read() )
    {
        Console::WriteLine( reader->GetName(0) );
        Console::WriteLine( "---------------------" );
        Console::WriteLine( reader[0] );
    }
    reader->Close();
    con->Close();
 
   return 0;
}

    ソースコード（C++/CLI + ADO.NET + ODBC + MySQL）

    #using <System.dll>
#using <System.Data.dll>
 
using namespace System;
using namespace System::Data::Odbc;
 
int main( array<System::String^>^ args )
{
    String^ conStr = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;UID=root;PWD=P@ssW0rd";
    String^ sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
    OdbcConnection^ con = gcnew OdbcConnection(conStr);
    OdbcCommand^ cmd = gcnew OdbcCommand(sqlStr, con);
    con->Open();
    OdbcDataReader^ reader = cmd->ExecuteReader();
    while( reader->Read() )
    {
        Console::WriteLine( reader->GetName(0) );
        Console::WriteLine( "---------------------" );
        Console::WriteLine( reader[0] );
    }
    reader->Close();
    con->Close();
 
   return 0;
}

    コンパイル方法

    C:¥> cl Hello.cpp /clr

    実行結果

    Message
---------------------
Hello, ADO.NET World!

  4. Hello, ADO.NET(VB.NET) World!

    Posted on 9月 2nd, 2012 by cx20

    ADO.NET(VB.NET)

    ADO.NET（ActiveX Data Objects .NET）は、ADO の後継で .NET ベースの DBMS 接続用 API である。
    .NET データプロバイダを介することで様々な DBMS への接続が可能となっている。
    .NET Framework 標準で使用できる .NET データプロバイダとしては、以下のようなプロバイダがある。

    データプロバイダ名 説明
    System.Data.SqlClient Microsoft SQL Server
    System.Data.OleDb OLE DB
    System.Data.Odbc ODBC
    System.Data.OracleClient Oracle

    ソースコード（VB.NET + ADO.NET + OLE DB + Jet データベース）

    Hello.vb
    raw download
    Imports System
Imports System.Data.OleDb
 
Class Hello
    Shared Sub Main()
        Dim conStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _
            & "Data Source=hello.mdb;"
        Dim sqlStr As String = "SELECT 'Hello, ADO.NET World!' AS Message"
 
        Dim con As OleDbConnection = New OleDbConnection(conStr)
        Dim cmd As OleDbCommand = New OleDbCommand(sqlStr, con)
        con.Open()
        Dim reader As OleDbDataReader = cmd.ExecuteReader()
        While reader.Read()
            Console.WriteLine( reader.GetName(0) )
            Console.WriteLine( "---------------------" )
            Console.WriteLine( reader(0) )
        End While
        reader.Close()
        con.Close()
    End Sub
End Class

    ソースコード（VB.NET + ADO.NET + OLE DB + ACE データベース）

    Hello.vb
    raw download
    Imports System
Imports System.Data.OleDb
 
Class Hello
    Shared Sub Main()
        Dim conStr As String = "Provider=Microsoft.ACE.OLEDB.12.0;" _
            & "Data Source=hello.accdb;"
        Dim sqlStr As String = "SELECT 'Hello, ADO.NET World!' AS Message"
 
        Dim con As OleDbConnection = New OleDbConnection(conStr)
        Dim cmd As OleDbCommand = New OleDbCommand(sqlStr, con)
        con.Open()
        Dim reader As OleDbDataReader = cmd.ExecuteReader()
        While reader.Read()
            Console.WriteLine( reader.GetName(0) )
            Console.WriteLine( "---------------------" )
            Console.WriteLine( reader(0) )
        End While
        reader.Close()
        con.Close()
    End Sub
End Class

    ソースコード（VB.NET + ADO.NET + SQL Server）

    Hello.vb
    raw download
    Imports System
Imports System.Data.SqlClient
 
Class Hello
    Shared Sub Main()
        Dim conStr As String = "SERVER=(local);" _
            & "DATABASE=master;" _
            & "UID=sa;" _
            & "PWD=P@ssW0rd"
        Dim sqlStr As String = "SELECT 'Hello, ADO.NET World!' AS Message"
 
        Dim con As SqlConnection = New SqlConnection(conStr)
        Dim cmd As SqlCommand = New SqlCommand(sqlStr, con)
        con.Open()
        Dim reader As SqlDataReader = cmd.ExecuteReader()
        While reader.Read()
            Console.WriteLine( reader.GetName(0) )
            Console.WriteLine( "---------------------" )
            Console.WriteLine( reader(0) )
        End While
        reader.Close()
        con.Close()
    End Sub
End Class

    ソースコード（VB.NET + ADO.NET + Oracle）

    Hello.vb
    raw download
    Imports System
Imports System.Data.OracleClient
 
Class Hello
    Shared Sub Main()
        Dim conStr As String = "Data Source=ORCL;User ID=scott;Password=tiger"
        Dim sqlStr As String = "SELECT 'Hello, ADO.NET World!' AS Message FROM DUAL"
 
        Dim con As OracleConnection = New OracleConnection(conStr)
        Dim cmd As OracleCommand = New OracleCommand(sqlStr, con)
        con.Open()
        Dim reader As OracleDataReader = cmd.ExecuteReader()
        While reader.Read()
            Console.WriteLine( reader.GetName(0) )
            Console.WriteLine( "---------------------" )
            Console.WriteLine( reader(0) )
        End While
        reader.Close()
        con.Close()
    End Sub
End Class

    ソースコード（VB.NET + ADO.NET + ODBC + MySQL）

    Hello.vb
    raw download
    Imports System
Imports System.Data.Odbc
 
Class Hello
    Shared Sub Main()
        Dim conStr As String = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;UID=root;PWD=P@ssW0rd"
        Dim sqlStr As String = "SELECT 'Hello, ADO.NET World!' AS Message"
 
        Dim con As OdbcConnection = New OdbcConnection(conStr)
        Dim cmd As OdbcCommand = New OdbcCommand(sqlStr, con)
        con.Open()
        Dim reader As OdbcDataReader = cmd.ExecuteReader()
        While reader.Read()
            Console.WriteLine( reader.GetName(0) )
            Console.WriteLine( "---------------------" )
            Console.WriteLine( reader(0) )
        End While
        reader.Close()
        con.Close()
    End Sub
End Class

    コンパイル方法（32bit OLE DB 使用時）

    C:¥> vbc Hello.vb /platform:x86

    コンパイル方法（上記以外）

    C:¥> vbc Hello.vb

    実行結果

    Message
---------------------
Hello, ADO.NET World!

  5. Hello, ADO.NET World!

    Posted on 3月 24th, 2012 by cx20

    ADO.NET

    ADO.NET（ActiveX Data Objects .NET）は、ADO の後継で .NET ベースの DBMS 接続用 API である。
    .NET データプロバイダを介することで様々な DBMS への接続が可能となっている。
    .NET Framework 標準で使用できる .NET データプロバイダとしては、以下のようなプロバイダがある。

    データプロバイダ名 説明
    System.Data.SqlClient Microsoft SQL Server
    System.Data.OleDb OLE DB
    System.Data.Odbc ODBC
    System.Data.OracleClient Oracle

    ソースコード（C# + ADO.NET + OLE DB + Jet データベース）

    Hello.cs
    raw download
    using System;
using System.Data.OleDb;
 
class Hello
{
    static void Main( String[] args )
    {
        string conStr = "Provider=Microsoft.Jet.OLEDB.4.0;"
            + "Data Source=hello.mdb";
        string sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
        OleDbConnection con = new OleDbConnection(conStr);
        OleDbCommand  cmd = new OleDbCommand(sqlStr, con);
        con.Open();
        OleDbDataReader reader = cmd.ExecuteReader();
        while( reader.Read() )
        {
            Console.WriteLine( reader.GetName(0) );
            Console.WriteLine( "---------------------" );
            Console.WriteLine( reader[0] );
        }
        reader.Close();
        con.Close();
    }
}

    ソースコード（C# + ADO.NET + OLE DB + ACE データベース）

    Hello.cs
    raw download
    using System;
using System.Data.OleDb;
 
class Hello
{
    static void Main( String[] args )
    {
        string conStr = "Provider=Microsoft.ACE.OLEDB.12.0;"
            + "Data Source=.\hello.accdb";
        string sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
        OleDbConnection con = new OleDbConnection(conStr);
        OleDbCommand  cmd = new OleDbCommand(sqlStr, con);
        con.Open();
        OleDbDataReader reader = cmd.ExecuteReader();
        while( reader.Read() )
        {
            Console.WriteLine( reader.GetName(0) );
            Console.WriteLine( "---------------------" );
            Console.WriteLine( reader[0] );
        }
        reader.Close();
        con.Close();
    }
}

    ソースコード（C# + ADO.NET + SQL Server）

    Hello.cs
    raw download
    using System;
using System.Data.SqlClient;
 
class Hello
{
    static void Main( String[] args )
    {
        string conStr = "SERVER=(local);"
            + "DATABASE=master;"
            + "UID=sa;"
            + "PWD=P@ssW0rd";
        string sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
        SqlConnection con = new SqlConnection(conStr);
        SqlCommand cmd = new SqlCommand(sqlStr, con);
        con.Open();
        SqlDataReader reader = cmd.ExecuteReader();
        while( reader.Read() )
        {
            Console.WriteLine( reader.GetName(0) );
            Console.WriteLine( "---------------------" );
            Console.WriteLine( reader[0] );
        }
        reader.Close();
        con.Close();
    }
}

    ソースコード（C# + ADO.NET + Oracle）

    Hello.cs
    raw download
    using System;
using System.Data.OracleClient;
 
class Hello
{
    static void Main( String[] args )
    {
        string conStr = "Data Source=ORCL;User ID=scott;Password=tiger";
        string sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message FROM DUAL";
 
        OracleConnection con = new OracleConnection(conStr);
        OracleCommand cmd = new OracleCommand(sqlStr, con);
        con.Open();
        OracleDataReader reader = cmd.ExecuteReader();
        while( reader.Read() )
        {
            Console.WriteLine( reader.GetName(0) );
            Console.WriteLine( "---------------------" );
            Console.WriteLine( reader[0] );
        }
        reader.Close();
        con.Close();
    }
}

    ソースコード（C# + ADO.NET + ODBC + MySQL）

    Hello.cs
    raw download
    using System;
using System.Data.Odbc;
 
class Hello
{
    static void Main( String[] args )
    {
        string conStr = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;UID=root;PWD=P@ssW0rd";
        string sqlStr = "SELECT 'Hello, ADO.NET World!' AS Message";
 
        OdbcConnection con = new OdbcConnection(conStr);
        OdbcCommand  cmd = new OdbcCommand(sqlStr, con);
        con.Open();
        OdbcDataReader reader = cmd.ExecuteReader();
        while( reader.Read() )
        {
            Console.WriteLine( reader.GetName(0) );
            Console.WriteLine( "---------------------" );
            Console.WriteLine( reader[0] );
        }
        reader.Close();
        con.Close();
    }
}

    コンパイル方法（32bit OLE DB 使用時）

    C:¥> csc Hello.cs /platform:x86

    コンパイル方法（上記以外）

    C:¥> csc Hello.cs

    実行結果

    Message
---------------------
Hello, ADO.NET World!
Newer Entries »