MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Exportar dados da ListBox para um arquivo txt

    Compartilhe
    avatar
    Dilson
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1697
    Registrado : 11/11/2009

    Exportar dados da ListBox para um arquivo txt

    Mensagem  Dilson em Seg 16 Maio 2011, 10:04

    Cumprimentos amigos,

    Segue em forma de exemplo mais uma boa solução proposta nas salas de dúvidas, desta vez o nosso VieiraSoft facilitou o mundo access. Se desejar, veja o tópico de origem [Você precisa estar registrado e conectado para ver este link.]

    Abaixo faça o download do exemplo:
    [Você precisa estar registrado e conectado para ver este link.]
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11234
    Registrado : 30/12/2009

    Re: Exportar dados da ListBox para um arquivo txt

    Mensagem  criquio em Seg 16 Maio 2011, 13:14

    Bom exemplo. Me permite apenas acrescentar uma forma de verificar se o arquivo foi criado mesmo? Para isso, podemos verificar se existe o arquivo na pasta de destino. No caso abaixo estou usando a pasta do aplicativo mesmo:

    If Len(Dir(CurrentProject.Path & "\ListaDePaises.txt")) > 0 Then
    MsgBox "Dados exportados com sucesso", vbOKOnly + vbInformation, "SUCESSO"
    Else
    MsgBox "Os dados não puderam ser exportados", vbOKOnly + vbCritical, "ERRO"
    End If


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


      Data/hora atual: Qua 18 Out 2017, 10:26