Jump to content
whize13

[Resolvido] VB+BD Select e INNER Join

Recommended Posts

whize13

Boas, estou a utilizar seguinte codigo :

 da = New OleDb.OleDbDataAdapter("SELECT N_Socio FROM Clube INNER JOIN DadosPessoais ON Clube.NIF = DadosPessoais.NIF ", cn)
 da.Fill(dt)
 Me.DataGridView1.DataSource = dt.DefaultView

O problema é que me da o erro " O motor de base de dados Microsoft Jet não conseguiu localizar a tabela de entrada ou a consulta 'DadosPessoais'. Verifique se a tabela ou a consulta existe e se o nome foi introduzido correctamente.". Já fui verificar se o nome da tabela estava realmente mal escrito e fiz copy paste do nome da tabela do access para aqui

Edited by Rui Carlos
GeSHi

Share this post


Link to post
Share on other sites
whize13

Era isso é que tenho 2 bases de dados e troquei-as mas agora não me aparece os dados nela inserida

Share this post


Link to post
Share on other sites
nelsonr

Grande confusão que ai vai.

Então o topico é sobre um erro num SELECT, em que o mais provavel é teres a base de dados errada.

Se a situação agora é outra, é melhor expores exactamente o problema

Share this post


Link to post
Share on other sites
bioshock

Coloca antes assim:

da.Fill(dt, 0)
Me.DataGridView1.DataSource = dt.Tables(0)

Btw, presumo que a variável dt seja um DataSet.

Edited by bioshock

Share this post


Link to post
Share on other sites
whize13

Dim da As OleDb.OleDbDataAdapter
 Dim dt As New DataTable
 Dim ds As New DataSet
 ds.Tables.Add(dt)

Private Sub DatagridShow()
 Dim da As OleDb.OleDbDataAdapter
 Dim dt As New DataTable
 Dim ds As New DataSet
 ds.Tables.Add(dt)
 'Preenche as colunas
 da = New OleDb.OleDbDataAdapter("SELECT N_Socio FROM Clube INNER JOIN DadosPessoais ON Clube.NIF = DadosPessoais.NIF ", cn)
 da.Fill(dt)
 Me.DataGridView1.DataSource = dt.DefaultView

esta ssim o código

Edited by Rui Carlos
GeSHi

Share this post


Link to post
Share on other sites
bioshock

E o que queres que faça? Já te dei a solução, se te apetecer, implementa.

Share this post


Link to post
Share on other sites
whize13

E o que queres que faça? Já te dei a solução, se te apetecer, implementa.

mas o dt não é o dataset é o DataTable, não faz diferença?

Share this post


Link to post
Share on other sites
bioshock

Atendendo ao teu penúltimo post e olhando para o que eu disse, só tinhas de deduzir o seguinte:

Dim da As New OleDb.OleDbDataAdapter("SELECT N_Socio FROM Clube INNER JOIN DadosPessoais ON Clube.NIF = DadosPessoais.NIF", cn)
Dim ds As New DataSet
da.Fill(ds, 0)
Me.DataGridView1.DataSource = ds.Tables(0)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.