[Resolvido]chat em base

bom dia,criei um chat numa base que tem tabelas ligadas a uma outra que esta no servidor principal,criei um campo memo comum em todos os postos e um texto livre para cada um deles,mas o que me parece que acontece é que como o posto ao inserir dados no campo memo não guarda logo quando tento responder em outro posto cria dois registo no campo memo,como devo fazer?
deixo aqui a programação,obrigado.
Private Sub Comando8_Click()
Me.Texto = "Loja Batalha em:" & Now & " diz:" & Me.Texto_livre & vbCrLf & Me.Texto
Me.Texto_livre = Empty


Refresh


End Sub

Obrigado