[Resolvido]Insert into tabela in " chamar função" para informar o caminho do banco

Senhores bom dia, tenho uma função "caminho" onde busco o caminho do meu banco

a mesma retorna = \\comp-001\banco\historico.mdb

criei uma variavel strcaminho e atribuo o valor da função na variavel, quando chamo a variavel no insert nada acontece

strcaminho = caminho()

strSQL = "INSERT INTO tblLog (Utilizador, LogData, NomeForm, NomeCampo, ValorAntigo, ValorAtual) IN ' caminho ' " & _
"Values('" & strusuario & "', Now(),'" & strFrm.Name & "','" & ctl.Name & "','" & ctl.OldValue & "','" & ctl.Value & "')"

alguem sabe o que estou errando?

abraços

Se é strcaminho não é caminho

IN ' strCaminho '

Mestre JPaulo tentei desta maneira e não funcionou

Faça um Break na variavel "strcaminho" e acompanhe o código para ver o que devolve.

Ou então a seguir ao strSQL coloque;

Debug.Print strSQL

E na janela immediate veja que valores devolve.

a strcaminho retorna o caminho correto

quando verifico a strSQL o insert não converte o strcaminho para o caminho....

utilizei uma msgbox pois não sei debugar.... rsrsrs

Faça o teste assim, para ver se funfa;

strSQL = "INSERT INTO [;DATABASE=\\comp-001\banco\historico.mdb].tblLog (Utilizador, LogData, NomeForm, NomeCampo, ValorAntigo, ValorAtual) " & _
"Values('" & strusuario & "', Now(),'" & strFrm.Name & "','" & ctl.Name & "','" & ctl.OldValue & "','" & ctl.Value & "')"

Funciona mas qdo substituo "INSERT INTO or=#ff3333]strcaminho].tblLog

não vai....

Olho vivo.

"INSERT INTO [;DATABASE=strcaminho].tblLog

ops....

mas não foi

Neste momento não posso testar, mas provavelmente e como todas as strings tem de estar entre aspas,

'" & strCaminho & "'

JPaulo já havia tentado, tentei novamente mas não foi.... acredito que seja por causa do comando sql...

Você tem de ir tentando, né...

Se não dá com aspas simples, deixe apenas com as aspas duplas e por ae...

Eu testei e funfa assim;

Código:

Dim strCaminho As String

strCaminho = "\\comp-001\banco\historico.mdb"

CurrentDb.Execute "INSERT INTO [;DATABASE=" & strCaminho & "].tblLog (Utilizador, LogData, NomeForm, NomeCampo, ValorAntigo, ValorAtual) " & _
"Values('" & strusuario & "', Now(),'" & strFrm.Name & "','" & ctl.Name & "','" & ctl.OldValue & "','" & ctl.Value & "')"


Isso... Bingou

" & strCaminho & "

obrigado pela paciencia meu amigo

abraço

Obrigado pelo retorno o forum agradece.