Colocar uma constante pública como caminho em uma consulta SQL

Buenas!
Uso este tipo de consulta SQL para obter dados de uma tabela em outro banco Access:

SELECT *
FROM TabTesteSQL IN 'C:PastaDeTestes\BaseTestesSQL.mdb';

Porém, quero colocar o caminho do banco em uma constante, para não ter de mudar em cada consulta, cada vez que o banco for colocado em outro diretório ou trocar de nome.

Public Const ConstCaminhoSQL As String = "C:PastaDeTestes\BaseTestesSQL.mdb"

Fiz assim mas não aceitou:

SELECT *
FROM TabTesteSQL IN 'ConstCaminhoSQL';

Nem assim:

SELECT *
FROM TabTesteSQL IN ConstCaminhoSQL;


Se alguém puder me ajudar, agradeço.

tente criar um modulo com esta função

Código:

Public Function strCaminho()


strCaminho = ("C:\PastaDeTestes\BaseTestesSQL.mdb")


End Function

a proposito estava faltando a barra invertida no c:

C:\PastaDeTestes\BaseTestesSQL.mdb

Buenas!

Fiz exatamente como dissestes:

Public Function strCaminho()


strCaminho = ("C:\PastaDeTestes\BaseTestesSQL.mdb")


End Function


SELECT * FROM TabTesteSQL IN strCaminho;

Mostra a mensagem:
Não foi possível encontrar o arquivo 'C\Users\Usuario\Documents\strCaminho'. (assim mesmo, sem os dois pontos depois do C >>> C:)

Lembrando que é uma consulta. Não é um procedimento SQL dentro de um módulo.

tente assim

SELECT * FROM TabTesteSQL IN 'strCaminho';

Buenas!
Mesma mensagem.
Funcionou aí prá você?

Olá, teste assim:

Código:

SELECT * FROM TabTesteSQL IN 'strCaminho()';

Abraço

Buenas!
Então, não sei porque aqui não funciona.

Ola, monte pequeno exemplo com bases de dados e poste aqui.
Assim fica mais fácil para testar e ajudar.
Abraço

Buenas!

Não funciona para consulta seleção, mas funciona para consulta acréscimo, e dentro de um módulo.

Public Function strCaminho()

'notem que a string fica entre aspas simples e duplas

 strCaminho = "'C:\PastaDeTestes\BaseTestesSQL.mdb'"  

   CurrentDb.Execute "INSERT INTO TabTeste IN " & strCaminho & "" _
                     & "SELECT [TabTeste].* " _
                     & "FROM [TabTeste];"

End Function


Vai servir para outro procedimento que terei de fazer: acrescentar registros em tabelas de outro banco.
Colocarei todas as instruções  CurrentDb.Execute "INSERT ... " no módulo e substituirei a variável (em um único lugar) quando precisar.

Boa noite,
Tanto tempo com Access e ainda nomeia o procedimento igual à variável?

Código:

Public Function strCaminho()
strCaminhoA = "'C:\PastaDeTestes\BaseTestesSQL.mdb'" 
CurrentDb.Execute "INSERT INTO TabTeste IN " & strCaminhoA & " SELECT * FROM TabTeste;"
End Function

Olá Amigos

Uso os comandos RunSql "sentençaSQL"  ao invés de  CurrentDb.Execute  para  executar sentenças SQL de consulta Ação.

Acredito que assim como  o RunSQL só executa consultas Ação creio que o CurrentDb.Execute também o faça.

Experimente utilizar o comando docmd.OpenQuery("NomeDaConsultaSeleção").

Como podem ver, somente para consultas seleção, e não sentençasSQL.

[ ['s

Buenas!
Alexandre, se eu usar o mesmo nome da função para a variável pode ocorrer algum conflito?
Tenho alguns casos onde isso ocorre. Alguma consequência indesejável?

Obrigado.

Noobezinho, não quis usar o comando docmd.OpenQuery, para, exatamente não ter que criar as consultas.
O endereço do outro banco estaria nelas e, caso precisasse alterá-lo, teria que entrar em cada uma para fazê-lo.

Obrigado.

Luiz

Olhando com mais atenção no que escreveu:

'C\Users\Usuario\Documents\strCaminho'. (assim mesmo, sem os dois pontos depois do C >>> C:)


Acredito que tenha utilizar o caminho UNC ou de rede para acessar o outro banco e a tabela

\\NomeComputador\C\PastaDeTestes\BaseTestesSQL.mdb

Experimente !

[ ]'s

Buenas!
Obrigado, Noobezinho. Vou testar.

Olá a todos

Luiz Bueno, como ficou a situação?
Os utilizadores do fórum merecem e agradecem o retorno.
Verifico que tem outros tópicos na mesma situação.
Reveja a conduta que tem adotado.

Se a situação ficou esclarecida, não se esqueça de dar o tópico como Resolvido, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos

Abraço