MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário

    avatar
    igorsf78
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 2
    Registrado : 29/03/2016

    [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário Empty [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário

    Mensagem  igorsf78 Seg 04 Abr 2016, 11:46 am

    Caros, bom dia!!

    Sou novo no forum e no uso do access e VBA,estou criando um processo para importação de arquivo txt, porém estou tentando executar um procedimento para apagar os dados antes da tabela, onde o nome da tabela que trazer de um campo do formulário.

    Segue parte do código para auxilio.

    Private Sub Comando6_Click()

    Dim Delimitador As String
    Dim DB As Database
    Dim fnum As Integer
    Dim LinhaDoTexto, LinhaDoTextoTemp As String
    Dim InstrucaoSQL As String
    Dim Posicao As Integer
    Dim QtdDeRegistros As Long
    Dim ArquivoTexto As String
    Dim strBanco As Databases
    Dim strTabela As String

    'DoCmd.RunSQL "DELETE * FROM [Forms]![Formulário1]![Texto9] " 'Testei esses 2 metodos e não obtive sucesso

    'CurrentDb.Execute "DELETE * FROM [Forms]![Formulário1]![Texto9]", dbFailOnError

    ArquivoTexto = Me.Texto7 'caminho do arq de texto
    strTabela = Me.Texto9 'Tabela onde será importado o arquivo
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário Empty Re: [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário

    Mensagem  FabioPaes Seg 04 Abr 2016, 12:58 pm

    Tente assim:

    CurrentDb.Execute "DELETE * FROM '" & [Forms]![Formulário1]![Texto9] & "' "
    avatar
    igorsf78
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 2
    Registrado : 29/03/2016

    [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário Empty Re: [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário

    Mensagem  igorsf78 Seg 04 Abr 2016, 1:57 pm

    Obrigado pela ajuda.

    Testei conforme abaixo e funcionou, como estava colocando [Forms]![Formulário1]![Texto9] dentro das aspas, dava o erro que a tabela não era reconhecida.

    CurrentDb.Execute "DELETE * FROM " & [Forms]![Formulário1]![Texto9]

    Conteúdo patrocinado


    [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário Empty Re: [Resolvido]Uso do comando DoCmd para tabela referenciado em um campo do formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui 21 Nov 2024, 10:39 am