Atualização dos dados na memória com MySql

[mkyx]

Bom dia pessoal abençoado,

Toda vez que eu executo os camando insert, update e delete no bd do mysql, para exibir na tabela, eu tenho que executar um dbUseArea de novo, senão continua com os dados antigos, eu uso o SQLRDD.

Tem como deixar essa atualização da tabela automaticamente, depois do insert, update e delete, como é no dbf?

Obrigado a todos que puderem ajudar.

Jose Adenildo, apelido Pompeo (Aqui no forum está como mkyx, e tentei alterar para Pompeo, mas, não consegui).

Guaratinguetá, SP

Fivewin, xHarbour, SQLRDD

[joaosolution]

Bom dia

Vc já tentou usar o commit:

oSql   := SR_GetConnection()
cComm  := "DELETE FROM IDEMPREG_DBF "+;
          "WHERE EMPRESA=NULL"
nErr   := oSql:exec( cComm,, .T.,@nReturn)
oSql:Commit()

Att

João Bosco

 

 

[mkyx]

fiz assim:

      APCODE:="UPDATE ESTOQUE SET DESCRICAO="+CHR(34)+ALLTRIM(DESC)+CHR(34)+" WHERE CODIGO="+CHR(34)+CODP+CHR(34)+";"
      OSQL:EXEC(APCODE ) 
      oSql:Commit()
      SR_dbRefresh()      
      oLSTB_0:upstable()
      oLSTB_0:REFRESH()
mas, não atualiza a tabela na tela, só atualiza a tabela dentro do ,mysql.

se eu sair do módulo e acessar de novo, então, está lá, as alterações, mas não é isso que eu busco.

O que eu quero, é que quando executar o update, e o refresh no listbox ou xbrowse, os dados do BD, apareça na tela, automaticamente.

[joaosolution]

Caro Jose

Desta forma não vai funcionar pois quando vc dá um dbselectarea vc têm uma instância dos dados nesta área aberta. Neste caso vc terá que usar o dbselectarea novamente para carregar as atualizações efetuadas. E dar um refresh no listbox.

Att

 

[Jmsilva]

Duas Sugestões:

-Primeira

    APCODE:="UPDATE ESTOQUE SET DESCRICAO="+CHR(34)+ALLTRIM(DESC)+CHR(34)+" WHERE CODIGO="+CHR(34)+CODP+CHR(34)+";"
      OSQL:EXEC(APCODE ) 
      oSql:Commit()
      alias->(Sr_SetFilter(''),Sr_DbRefresh())      
      oLSTB_0:upstable()
      oLSTB_0:REFRESH()

-Segunda

      Sr_BeginTransaction() 

      APCODE:="UPDATE ESTOQUE SET DESCRICAO="+CHR(34)+ALLTRIM(DESC)+CHR(34)+" WHERE CODIGO="+CHR(34)+CODP+CHR(34)+";"
      OSQL:EXEC(APCODE ) 

      Sr_CommitTransaction() 

      alias->(Sr_SetFielter(''),Sr_DbRefresh())       
      oLSTB_0:upstable()
      oLSTB_0:REFRESH()

 

Veja se funciona para vc!