C# と VB.NET の質問掲示板

分類:[VB.NET]　

2006/05/17(Wed) 09:57:00 編集(投稿者)

お世話になります。

■No3628に返信(まじんさんの記事)
型指定の無いデータセットの場合、Fill の第 2 引数で何も指定しなかった場合は
Dataset 内部のテーブル名は、Table, Table1, Table2 ...
と連番(?)で付けられていたような。

もし、Fill(ds, "wankuma")
とやれば、ds.Tables(0).TableName は "wankuma" のはずです。

一応、私がテスト用に作成したコードを張っておきますね。
参考になればよいのですが...

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

　　Dim ds As DataSet = New DataSet
　　Dim sqlConn As SqlClient.SqlConnection _
　　　　　　= New SqlClient.SqlConnection("Server=(local);Database=NorthWind;Trusted_Connection=True;")
　　Dim sqlDa As SqlClient.SqlDataAdapter

　　sqlConn.Open()
　　Try
　　　　sqlDa = New SqlClient.SqlDataAdapter
　　　　Try
　　　　　　sqlDa.SelectCommand = New SqlClient.SqlCommand
　　　　　　sqlDa.SelectCommand.Connection = sqlConn
　　　　　　sqlDa.SelectCommand.CommandType = CommandType.Text
　　　　　　sqlDa.SelectCommand.CommandText = _
　　　　　　"SELECT * FROM [Orders] INNER JOIN [Order Details] ON [Orders].OrderID = [Order Details].OrderID "

　　　　　　sqlDa.Fill(ds, "wankuma")
　　　　　　Me.DataGridView1.DataSource = ds
　　　　　　Me.DataGridView1.DataMember = ds.Tables(0).TableName 'コレは wankuma になる。
　　　　Finally
　　　　　　If Not sqlDa Is Nothing Then sqlDa.Dispose()
　　　　End Try
　　Finally
　　　　If sqlConn IsNot Nothing Then sqlConn.Close()
　　　　If sqlConn IsNot Nothing Then sqlConn.Dispose()
　　End Try

End Sub

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト