Erro numa consulta

[asd29]

Estou com este erro e não consigo desencravar, será que alguém me pode ajudar?

Desde já agradeço.

Cumps !

EDIT: Titulo do tópico alterado, não existem duvidas com diferentes prioridades aqui no P@P

[Seabra]

Deves mostrar a tua query completa.

Trata-se de um erro de sintax na query, mas só analisando bem é que se consegue chegar a uma conclusão.

Fazes copy do teu código e colas aqui em forma de código Vb.net

Cumprimentos

[Gonka]

Presumo que seja o T em turma que esteja a fazer falta 🙂

[asd29]

Desde Já Agradeço pelas Respostas, o código é este :

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

        Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Application.StartupPath & "\BD_PAP.mdb")



        Dim query As New OleDbCommand("SELECT Alunos.Nome, Alunos.BI, Alunos.DatNasc, Alunos.Morada, Alunos.Contacto, Alunos.codmodalidade, Alunos.Turma WHERE Alunos.Nome=@Nome", con)
        query.Parameters.Add("@Nome", OleDbType.VarChar).Value = TextBox6.Text

        con.Open()

        Dim dr As OleDbDataReader = query.ExecuteReader

        Try
            If dr.HasRows Then
                dr.Read()

                TextBox1.Text = dr("Nome")
                TextBox2.Text = dr("BI")
                TextBox3.Text = dr("DatNasc")
                TextBox4.Text = dr("Morada")
                TextBox5.Text = dr("Contacto")
                TextBox7.Text = dr("codmodalidade")
                TextBox8.Text = dr("Turma")

            Else
                MsgBox("Não exsitem registos!")
            End If
        Catch ex As Exception
            ' tratamento de erros
        Finally
            dr.Close()
            con.Close()
        End Try
    End Sub

[Caça]

Não estás a indicar a tabela onde vais pesquisar, troca a tua query por esta

SELECT Alunos.Nome, Alunos.BI, Alunos.DatNasc, Alunos.Morada, Alunos.Contacto, Alunos.codmodalidade, Alunos.Turma 
FROM Alunos 
WHERE Alunos.Nome=@Nome

[asd29]

obrigado mesmo Caça !  😁

Cumps !