Gostaria de trocar uma cláusula que usa INNER JOIN  pelo WHERE, conforme vi uns exemplos neste forum. Porém a substriuição não está dando certo de jeito nenhum, já fiz de todas as formas e nada.

Esta aqui funciona direitinho

sql = "SELECT [fornec].[codigo],[fornec].[razao], [produto].[descr], [produto].[preco]"
sql = sql & " FROM fornec INNER JOIN produto ON [fornec].[codigo]=[produto].[fornecedor]"
 sql = sql & " WHERE [fornec].[codigo] = " & Codigo
 Set Mtabela = banco.OpenRecordset(sql, dbOpenDynaset)

A substituta é assim:

 strSql = "SELECT fornec.codigo" & _
         "fornec.razao," & _
         "produto.descr," & _
         "produto.fornecedor " & _
         "FROM fornec, " & _
         "produto " & _
         "WHERE fornec.codigo=produto.fornecedor" & _
         "AND fornec.codigo = " & Codigo

Onde está o erro .

Vila

 

Quando temos um joen de 2 tabelas e usamos o where precisamos do indice. exemplo 

 

select a.(campo1), a.(campo2), b.(campo1), b.(campo2)......

from tabela1 a,

       tabela2 b

where a.(campo1) = b.(campo1)

and  a.(campo2) > 10

Ainda não foi desta vez que deu certo.

Mais alguma sugestão.

 

Qual o erro que esta dando?

 

Posta o erro pra podermos saber ....

O erro é: Too Few Parameters: Expectd1.

 

Ok

Obrigado