INNER JOIN

W8.LISBOA 13/10/2015 17:55:29
#452477
Ola mestres,

Estou com um erro de sintaxe em uma instrução sql (access), consigo retorno no próprio access, exceto no VB, lembrando que o campo ID é auto incremento

Alguma sugestão?

      Private Sub CARREGA()
        Using con As OleDbConnection = GetConnection()
            Try
                con.Open()
                Dim sql As String
                sql = [Ô]SELECT Lancamentos.ID, Lancamentos.Danfe, Lancamentos.N_Doc, Lancamentos.Valor, Lancamentos.Emissao, Lancamentos.ValorFiscal, Lancamentos.Tipo, Lancamentos.Obs, Parceiros.Razao AS Parceiros_Razao, Resp_Fiscal.Razao AS Resp_Fiscal_Razao, Usuarios.Usuario[Ô]
                sql += [Ô]FROM Usuarios INNER JOIN (Resp_Fiscal INNER JOIN (Parceiros INNER JOIN Lancamentos ON Parceiros.[CodParceiro] = Lancamentos.[CodParceiro]) ON Resp_Fiscal.[CodRespFiscal] = Lancamentos.[CodRespFiscal]) ON Usuarios.[CodUsuario] = Lancamentos.[CodUsuario][Ô]
                sql += [Ô]WHERE Lancamentos.ID = @ID;[Ô]
                Dim cmd As OleDbCommand = New OleDbCommand(sql, con)
                cmd.Parameters.Add([Ô]@ID[Ô], OleDbType.Integer).Value = TxtID.Text
                Dim da As OleDbDataAdapter = New OleDbDataAdapter(cmd)
                Dim dt As DataTable = New DataTable
                da.Fill(dt)
                DataGridView2.DataSource = dt
            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try
        End Using
    End Sub
KERPLUNK 13/10/2015 18:17:21
#452484
Simplesmente falta um espaço:

sql += [Ô] WHERE Lancamentos.ID = @ID;[Ô]


Dica: quando precisar de ajuda, nos é de grande valia a mensagem de erro, simplesmente dizer que [Ô]está dando erro[Ô], nem sempre nos ajuda...
W8.LISBOA 13/10/2015 19:02:15
#452485
Citação:

Simplesmente falta um espaço:


sql += [Ô] WHERE Lancamentos.ID = @ID;[Ô]


Dica: quando precisar de ajuda, nos é de grande valia a mensagem de erro, simplesmente dizer que [Ô]está dando erro[Ô], nem sempre nos ajuda...



KERPLUNK,

Agradeço a dica, mas continuo com erro [Ô]Erro de sintaxe (operador faltando) na expressão de consulta[Ô]

NICKOSOFT 13/10/2015 19:35:42
#452487
faco diferente
select ............ from (((tabela1 inner join tabela2 on tabela1.campo=tabela2.campo) inner join tabela3 on tabela1.campo=tabela3.campo) inner join tabela4 on tabela2.campo=tabela4.campo) where tabela2.campo=[ô]criterio[ô]
W8.LISBOA 13/10/2015 20:50:12
#452492

Citação:

:
faco diferente
select ............ from (((tabela1 inner join tabela2 on tabela1.campo=tabela2.campo) inner join tabela3 on tabela1.campo=tabela3.campo) inner join tabela4 on tabela2.campo=tabela4.campo) where tabela2.campo=[ô]criterio[ô]



Sem sucesso
Tópico encerrado , respostas não são mais permitidas
Voltar