Jump to content

Recommended Posts

Posted

Boa noite, preciso de ajuda em algo não tão complicado mas que não estou conseguindo resolver, preciso recuperar campos de duas tabelas diferentes e exibir estes dados em por exemplo dois textboxes, recuperar os dados em uma tabela e exibi-los em textboxes eu consegui, mas dados de duas tabelas não consegui, aguardo 😁

Posted
Dim turma_A As New OleDbCommand()
turma_A.CommandText = "SELECT Turma_notaAV1.Código,Nome FROM Turma_notaAV1 INNER JOIN Turma_notaAV2 ON WHERE Turma_notaAV1.Código=Turma_notaAV2.Código '" & ComboBox1.Text & "'"

da a mensagem de erro na clausula FROM, o que esta errado?

EDIT: Geshi adicionado

Posted

Não estás a especificar nada na clausula 'ON'

SELECT Turma_notaAV1.Código,Nome FROM Turma_notaAV1 INNER JOIN Turma_notaAV2 ON Turma_notaAV1.Campo_a_Relacionar = Turma_notaAV2.Campo_a_Relacionar

Pedro Martins

Não respondo a duvidas por PM

Posted

Já expliquei em cima, tens

... FROM Turma_notaAV1 INNER JOIN Turma_notaAV2 ON WHERE ...

e deves ter tipo isto

... FROM Turma_notaAV1 INNER JOIN Turma_notaAV2 ON Turma_notaAV1.Campo_a_Relacionar = Turma_notaAV2.Campo_a_Relacionar WHERE ...

Pedro Martins

Não respondo a duvidas por PM

Posted
turma_A.CommandText = "SELECT Turma_notaAV1.Código,Turma_notaAV1.Nome FROM Turma_notaAV1 INNER JOIN Turma_notaAV2 ON  Turma_notaAV1.Código=Turma_notaAV2.Código WHERE '" & NomeTextBox.Text & "'"

esse é o codigo e deu certo, mas...quando executado aparece uma caixa de mensagem escrito "Turma_notaAV1", e depois carrega os dados, qual é o erro?

:wallbash:

EDIT: Geshi adicionado

Posted
turma_A.CommandText = "SELECT Turma_notaAV1.Código,Turma_notaAV1.Nome FROM Turma_notaAV1 , Turma_notaAV2   WHERE Turma_notaAV1.Serie=   '" & TextBox1.Text & "'"

no fianl ficou assim, mas deu a mensagem que não existem dados para a linha ou coluna, preciso muito resolver isso

😁

EDIT: Geshi adicionado

Posted

não pode ser feito o relacionamento atraves da clausula select?, fora isso não, mas como postei agora ha pouco é feita a consulta nas duas tabelas, mas aparece antes uma caixa de mensagem exibindo o nome da primeira tabela e depois carrega os dados que procuro

😁

Posted

Pode mas se não existe nenhuma relação entre elas nunca te vai trazer registos. Se não existe nenhuma relação entre elas, deves efectuar as consultas separadas.

Em relação a mensagem, mostra o teu código.

Pedro Martins

Não respondo a duvidas por PM

Posted
turma_A.CommandText = "SELECT Turma_notaAV1.Código,Turma_notaAV1.Nome FROM Turma_notaAV1 INNER JOIN Turma_notaAV2 ON  Turma_notaAV1.Código=Turma_notaAV2.Código WHERE '" & NomeTextBox.Text & "'"

foi que postei acima

EDIT: Geshi adicionado

Posted
 Dim con_turma_notaAV1 As New OleDbConnection
        con_turma_notaAV1.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='C:\Users\josimar\Documents\Visual Studio 2008\Projects\prototipo\escola.accdb'"
        Try
            con_turma_notaAV1.Open()

            Dim turma_A As New OleDbCommand()
            turma_A.CommandText = "SELECT Turma_notaAV1.Código,Turma_notaAV1.Nome,Turma_notaAV1.Turma FROM Turma_notaAV1 INNER JOIN  Turma_notaAV2 ON   Turma_notaAV1.Código=Turma_notaAV2.Código  WHERE   '" & TextBox1.Text & "'"
            turma_A.CommandType = CommandType.Text

            turma_A.Connection = con_turma_notaAV1
            Dim leitor As OleDbDataReader
            leitor = turma_A.ExecuteReader()
            leitor.Read()
            MatriculaTextBox.Text = leitor("Código")
            NomeTextBox.Text = leitor("Nome")
            TextBox1.Text = leitor("Código")
            TextBox2.Text = leitor("Serie")
            codcli = leitor("Código")
            leitor.Close()

EDIT: Geshi adicionado

Posted

consegui resolver, mas percebi que em um dos campos estava vazio e a consulta trouxe somente um dos campo da outra tabela, explico uma das tabelas tinha o campo turma vazio e a outra tinha o campo turma "A", trouxe somente esse campo isso é normal ou devia dar alguma mensagem de erro?

?

Posted

Apesar de estares a fazer a consulta as duas tabelas, só estás a chamar dados de uma das tabelas

Turma_notaAV1.Código,Turma_notaAV1.Nome,Turma_notaAV1.Turma

Pedro Martins

Não respondo a duvidas por PM

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.