COLOCAR 2 CONSULTAS EM UM MESMO DATASET
Estou precisanso fazer 2 consultas (Select) mas jogar no mesmo DataSet sem que haja perda de dados.
Apenas como exemplo, coloquei a rotina abaixo, pois a seleção é mais complicada do que isso.
cn.Open()
Using cmd As New OleDbCommand( [Ô] Select Cliente, Situacao from Cliente[Ô], cn)
datasetaux.DataSetName = [Ô]DataSetAux[Ô]
DataAdapterAux.SelectCommand =cmd
DataAdapterAux.Fill(i_datasetaux, i_[Ô]TabelaAux[Ô])
....
Using cmd As New OleDbCommand( [Ô] Select Cliente, Situacao from Fornecedor[Ô], cn)
datasetaux.DataSetName = [Ô]DataSetAux[Ô]
DataAdapterAux.SelectCommand =cmd
DataAdapterAux.Fill(i_datasetaux, i_[Ô]TabelaAux[Ô])
Ele deveria popular o mesmo dataset do mesmo DataTable com os dois select. Misturando os dados do cliente e fornecedor.
Algum sabe como ??
Apenas como exemplo, coloquei a rotina abaixo, pois a seleção é mais complicada do que isso.
cn.Open()
Using cmd As New OleDbCommand( [Ô] Select Cliente, Situacao from Cliente[Ô], cn)
datasetaux.DataSetName = [Ô]DataSetAux[Ô]
DataAdapterAux.SelectCommand =cmd
DataAdapterAux.Fill(i_datasetaux, i_[Ô]TabelaAux[Ô])
....
Using cmd As New OleDbCommand( [Ô] Select Cliente, Situacao from Fornecedor[Ô], cn)
datasetaux.DataSetName = [Ô]DataSetAux[Ô]
DataAdapterAux.SelectCommand =cmd
DataAdapterAux.Fill(i_datasetaux, i_[Ô]TabelaAux[Ô])
Ele deveria popular o mesmo dataset do mesmo DataTable com os dois select. Misturando os dados do cliente e fornecedor.
Algum sabe como ??
veja isso:
https://msdn.microsoft.com/pt-br/library/4swwh51k(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-2
https://msdn.microsoft.com/pt-br/library/4swwh51k(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-2
porque não usa UNION ALL no instrução SQL ?
Using cmd As New OleDbCommand( [Ô] Select Cliente, Situacao from Cliente [txt-color=#0000f0]UNION ALL[/txt-color] Select Cliente, Situacao from Fornecedor[Ô], cn)
datasetaux.DataSetName = [Ô]DataSetAux[Ô]
DataAdapterAux.SelectCommand =cmd
DataAdapterAux.Fill(i_datasetaux, i_[Ô]TabelaAux[Ô])
2 Selects em 1 DataSet
Using cmd As New OleDbCommand( [Ô] Select Cliente, Situacao from Cliente [txt-color=#0000f0]UNION ALL[/txt-color] Select Cliente, Situacao from Fornecedor[Ô], cn)
datasetaux.DataSetName = [Ô]DataSetAux[Ô]
DataAdapterAux.SelectCommand =cmd
DataAdapterAux.Fill(i_datasetaux, i_[Ô]TabelaAux[Ô])
2 Selects em 1 DataSet
Faça seu login para responder