ソースコードで説明する 'DataSetのClone()メソッドで、スキーマ(テーブル構造)を複写する Dim ds_dest As DataSet = ds_src.Clone() 'SQLのwhere条件を記述して選択行の配列を得る Dim copyRows() As DataRow = ds_src.Tables("MyTable").Select("Country = 'Japan' and Age < 20") '取得した選択行配列をCOPY先のDataSetへ放り込む Dim row As DataRow For Each row In copyRows ds_dest.Tables("MyTable").ImportRow(row) Next iディレクトリで複数のポータルサイトにディレクトリ登録 コメント: |