Jump to content
Fivewin Brasil

SQLRDD Backup e Controle de Usuários


oribeiro

Recommended Posts

1) uso mysqldump para backup

cComando := oApp:cDir_001+"mysqldump --host="+oApp:IpSQL+" --port="+oApp:SQLPort+" -u "+oApp:UID+" -p"+oApp:PWD+" --all-databases > "+oApp:BackupPath+"\backupD"+strtran(dtos(Date()), "/","")+"T"+Strtran(time(), ":", "")+".sql"
      MsgRun( "Gerando Backup", "Backup Automatico, Aguarde...", {|| MYRUN(cComando) } )


Function MYRUN( cComando )
Local oShell, Ret

  oShell := CreateObject( "WScript.Shell" )
  Ret := oShell:Run( "%comspec% /c " + cComando, 0, .t. )
  oShell := Nil

Return If( Ret=0, .t., .f. )

2) como assim... controle de usuários conectados? o controle de usuários no meu caso é por meio do meu programa  :rolleyes:

não entendi a pergunta... mas com esse comando vc ver usuários conectados => show full processlist;

Link to comment
Share on other sites

Você me deu exatamente as informações que eu precisava. Agora sei como fazer o backup e também como pegar o número de usuários conectados ao banco para fazer um controle, o motivo é que eu negocio o sistema por número de usuários simultâneos. 

Muito obrigado.

Como eu faço para ler o retorno do comando?

   oSql:= SR_GetConnection()
   oSql:Exec("SHOW FULL PROCESSLIST") // usuários conectados no momento
 

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...