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]Criar um bloco de notas através de comando

    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 980
    Registrado : 09/11/2012

    [Resolvido]Criar um bloco de notas através de comando Empty [Resolvido]Criar um bloco de notas através de comando

    Mensagem  =>Nois 15/2/2016, 16:55

    boa tarde!

    é possível criar um bloco de notas direto do vba do access?

    abrir, executar, deletar ja vi mais gerar um arquivo não tenho ideia como faço.

    (criar em branco mesmo, definindo um nome do mesmo)


    obrigado!


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7995
    Registrado : 15/03/2013

    [Resolvido]Criar um bloco de notas através de comando Empty Re: [Resolvido]Criar um bloco de notas através de comando

    Mensagem  Alvaro Teixeira 16/2/2016, 15:23

    Olá Lander Matos,
    Com o código abaixo acho que faz o que pretende, será ajustar, veja:

    Código:
    'Alvaro Teixeira 2016 para MaximoAccess
    Dim strFicheiro As String

        strFicheiro = Application.CurrentProject.Path & "\exportacao.txt"       'caminho e ficheiro

        Open strFicheiro For Output As #1                                       'abrir ficheiro para escrita
            Print #1, "Olá, Bons estudos com o MaximoAccess"                                              'escrever se necessário
        Close #1                                                                'fechar ficheiro

        'pergunta se que ver no notepad
        If MsgBox("Deseja ver o ficheiro no Notepad?", vbYesNo + vbQuestion + vbDefaultButton2, "") = vbYes Then
            Call Shell("NOTEPAD.EXE " & strFicheiro, vbNormalFocus)
        Else
            MsgBox "Ficheiro criado em " & strFicheiro, vbMsgBoxHelpButton, ""
        End If

    Segue o meu teste.
    Abraço
    Anexos
    [Resolvido]Criar um bloco de notas através de comando AttachmentCriarTxt_AbrirNotepad.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (16 Kb) Baixado 59 vez(es)

    Holanda gosta desta mensagem

    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 980
    Registrado : 09/11/2012

    [Resolvido]Criar um bloco de notas através de comando Empty Re: [Resolvido]Criar um bloco de notas através de comando

    Mensagem  =>Nois 16/2/2016, 17:55

    cheers Muito bem! obrigado


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7995
    Registrado : 15/03/2013

    [Resolvido]Criar um bloco de notas através de comando Empty Re: [Resolvido]Criar um bloco de notas através de comando

    Mensagem  Alvaro Teixeira 17/2/2016, 18:40

    Olá Lander Matos,
    Obrigado pelo retorno, os utilizadores do fórum agradecem.
    Abraço

    Conteúdo patrocinado


    [Resolvido]Criar um bloco de notas através de comando Empty Re: [Resolvido]Criar um bloco de notas através de comando

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 01:27