[Resolvido]Atualizar Tabela/Registro

Highlander8 16/5/2013, 14:28

Highlander8: Intermediário; Respeito às regras :

Sexo :
Localização :
Mensagens : 70
Registrado : 25/10/2011

Mensagem nº1

Atualizar Tabela/Registro

Mensagem Highlander8 16/5/2013, 14:28

Amigos,
Aqui mais uma vez estou precisando muito da ajuda de vc`s...
Já achei sim vários tópicos que poderiam me ajudar, porém não obtive um resultado positivo.

Seguinte:
Tenho um sistema com um formulario principal e um sub formulario.
Neste sub formulario, tenho um campo "reg" oculto onde na propriedade "fonte de registro" coloquei "=contar(*)", sendo assim este campo conta a quantidade de registros na tabela ligada a este sub form. Legal! Até aí tudo bem.

Neste mesmo sub tem um campo "pagina" que eu gostaria muito que recebesse o valor do campo "reg", mas quando o usuário adiciona um novo registro o campo "reg" fica estático. Ex.: se no sub ao abrir, ele tivesse 2 registros, ao adicionar mais um registro o campo reg deveria receber 3, MAS nao é o que ocorre. O campo mantém o valor anterior 2 e gera registro duplicado pois não segue uma sequencia.

O que preciso é que ao adicionar um novo registro, o campo "reg" seja atualizado para que uma sequencia seja seguida e que ao mudar de registro no formulario Principal, este campo "reg" se atualize tbm de acordo com a quantidade de registros atual sem precisar fechr e abrir o sistema.

==> Já usei .requery e não deu certo...

Muito obrigado!
Por favor, preciso muito de uma solução, tenho que apresentar este sistema final de semana agora e algo que achei que fosse simples de resolver, está me dando 'dor de cabeça'.

Muito obrigado a todos.

Abraco!

.................................................................................
Private Sub Help_AfterUpdate()
If Me.Help = "Pude ajudar" Then
MsgBox("Foi um prazer!")
Else
MsgBox(“Tentarei novamente...")
End If
End Sub

Highlander.

criquio 16/5/2013, 14:41

criquio

criquio: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009

Mensagem nº2

Re: [Resolvido]Atualizar Tabela/Registro

Mensagem criquio 16/5/2013, 14:41

Não entendi muito bem a questão, mas já tentou o Requery no evento "No atual" do formulário? Ou talvez Recalc no lugar do Requery...

.................................................................................

Meu novo site: www.vcssistemas.com.br

Clique aqui 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.

Highlander8 16/5/2013, 18:24

Highlander8

Highlander8: Intermediário; Respeito às regras :

Sexo :
Localização :
Mensagens : 70
Registrado : 25/10/2011

Mensagem nº3

Atualizar Tabela/Registro

Mensagem Highlander8 16/5/2013, 18:24

Grande Criquio!
Muito obrigado pela ajuda!

Agora está tudo funcionando perfeitamente.
Usei o: .recalc
Em tempo, pra que que serve o recalc?

O .requery tentei usar, mas se eu tivesse mais de um registro, ele voltava pro primeiro e ficava tudo errado.
Como poderia fazer para ele se manter no mesmo registro?

Muito Obrigado.

.................................................................................
Private Sub Help_AfterUpdate()
If Me.Help = "Pude ajudar" Then
MsgBox("Foi um prazer!")
Else
MsgBox(“Tentarei novamente...")
End If
End Sub

Highlander.

criquio 16/5/2013, 19:33

criquio

criquio: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009

Mensagem nº4

Re: [Resolvido]Atualizar Tabela/Registro

Mensagem criquio 16/5/2013, 19:33

Acredito que o melhor é mesmo o Recalc, que recalcula sem atualizar, portanto, sem voltar ao primeiro registro..

.................................................................................

Meu novo site: www.vcssistemas.com.br

Clique aqui 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.

Highlander8 17/5/2013, 19:55

Highlander8

Highlander8: Intermediário; Respeito às regras :

Sexo :
Localização :
Mensagens : 70
Registrado : 25/10/2011

Mensagem nº5