ストアドプロシージャの呼び出し
他のSQL ストアドプロシージャと同様に、ExcelCommand を使用してストアドプロシージャを呼び出すことができます。ExcelCommand オブジェクトをインスタンス化するには、コンストラクタへの引数として、ストアドプロシージャの名前とExcelConnection インスタンスを渡します。CommandType プロパティをStoredProcedure に設定し、ExcelCommand インスタンスのParameters コレクションにキーと値のペアとしてパラメータを追加します。
C#
string connectionString = "URI=C:\MyExcelWorkbooks\SampleWorkbook.xlsx;"; using (ExcelConnection connection = new ExcelConnection(connectionString)) { ExcelCommand cmd = new ExcelCommand("CreateWorksheet", connection); cmd.CommandType = CommandType.StoredProcedure; cmd.Parameters.Add(new ExcelParameter("@sheet", "MyNewWorksheet")); // Add other parameters as needed ... ExcelDataReader rdr = cmd.ExecuteReader(); while (rdr.Read()) { for (int i = 0; i < rdr.FieldCount; i++) { Console.WriteLine(rdr.GetName(i) + " --> " + rdr[i]); } Console.WriteLine(); } }
VB.NET
Dim connectionString As String = "URI=C:\MyExcelWorkbooks\SampleWorkbook.xlsx;" Using connection As New ExcelConnection(connectionString) Dim cmd As New ExcelCommand("CreateWorksheet", connection) cmd.CommandType = CommandType.StoredProcedure cmd.Parameters.Add(New ExcelParameter("@sheet", "MyNewWorksheet")) ' Add other parameters as needed ... Dim rdr As ExcelDataReader = cmd.ExecuteReader() While rdr.Read() For i As Integer = 0 To rdr.FieldCount - 1 Console.WriteLine(rdr.GetName(i) + " --> " + rdr(i)) Next Console.WriteLine() End While End Using
別の方法として、ストアドプロシージャのパラメータをコマンドのテキストとして設定することもできます。ストアドプロシージャのステートメントは、次の標準的な形式でサポートされます。
"EXECUTE my_proc @first = 1, @second = 2, @third = 3;" "EXEC my_proc @first = 1, @second = 2, @third = 3;"
パラメータ化されたクエリを実行するには、ExcelCommand インスタンスのParameters コレクションに、キーと値のペアとしてパラメータを追加します。
C#
string connectionString = "URI=C:\MyExcelWorkbooks\SampleWorkbook.xlsx;"; using (ExcelConnection connection = new ExcelConnection(connectionString)) { ExcelCommand cmd = new ExcelCommand("EXECUTE CreateWorksheet sheet = @sheet;", connection); cmd.Parameters.Add(new ExcelParameter("@sheet", "MyNewWorksheet")); // Add other parameters as needed ... ExcelDataReader rdr = cmd.ExecuteReader(); while (rdr.Read()) { for (int i = 0; i < rdr.FieldCount; i++) { Console.WriteLine(rdr.GetName(i) + " --> " + rdr[i]); } Console.WriteLine(); } }
VB.NET
Dim connectionString As String = "URI=C:\MyExcelWorkbooks\SampleWorkbook.xlsx;" Using connection As New ExcelConnection(connectionString) Dim cmd As New ExcelCommand("EXECUTE CreateWorksheet sheet = @sheet;", connection) cmd.Parameters.Add(New ExcelParameter("@sheet", "MyNewWorksheet")) ' Add other parameters as needed ... Dim rdr As ExcelDataReader = cmd.ExecuteReader() While rdr.Read() For i As Integer = 0 To rdr.FieldCount - 1 Console.WriteLine(rdr.GetName(i) + " --> " + rdr(i)) Next Console.WriteLine() End While End Using