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

    Affected rows VBA

    Compartilhe
    avatar
    diogoalvesify
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3
    Registrado : 13/05/2014

    Affected rows VBA

    Mensagem  diogoalvesify em Qua 04 Jun 2014, 09:55

    boas,
    Tenho uma duvida Question 

    Function mudarnome1()
     Dim dbs As DAO.DATABASE
     Dim filas_modificadas As Long
     Dim sFile As String, lFile As Long
     Set dbs = CurrentDb
       dbs.Execute "Mudar o nome - 1"
       While dbs.RecordsAffected = Null
       Wend
       filas_modificadas = dbs.RecordsAffected          
       MsgBox filas_modificadas
       sFile = "C:\CONSULTAS\1.txt"
       lFile = FreeFile
       Open sFile For Append As lFile
       Print #lFile, filas_modificadas
       Close lFile
    End Function

    Se a consulta for complexa e tiver varios comandos, como update insert etc... O comando affected rows saca o mesmo numero de registos modificados que o access ou saca apenas o ultimo comando da consulta.
    Portanto se o resultado de affected rows era o mesmo que o que aparece na confirmaçao do access apos a termino da execuçao da consulta.

    Obrigado desde ja,
     Smile
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6504
    Registrado : 05/11/2009

    Re: Affected rows VBA

    Mensagem  Alexandre Neves em Seg 21 Jul 2014, 15:39

    Boa tarde,
    Só agora vi a questão
    A propriedade RecordsAffected vai de 0 a quantidade de registos, nunca será nulo
    A quantidade de registos afectada diz respeito à última execução com .execute


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: Dom 19 Nov 2017, 21:28