4D www.sviluppo4d.it - Backup di 4d Monoutenza *

Sviluppatori 4D

Utility 4D

A dog and his boy
lapd component
Aparajitaworld
Active4d, objecttools
BBSP
logTools, BBBase
BusinessKube
4D Job wallet
Hmplugins
Hmcal, Hmreports, Hfree
Internet Toolkit
Math4D
free math library
Nexid Web Service Server
Nufocus
OpenRoadDevelopment
CodeAnalysis free component
Orchard Software
win32api, resource editor
Pelican Engineering
EXT/JS appbuilder, Remoting
SGBD Products software
TransportX, 4diTools
Association Qualisoft
QS_Toolbox

Risorse 4D

4D Github
4D Pdo
4D Sources
4dgeek Github
tinynce, json editore
Bluecompany
Graph, Calendar
E-node
AreaList Pro, SuperReport Pro
Escape
qpix, DICOM Medical Viewer
Foundation Shell
Inforce
UpdateMaker, Inside4d, Zip4d
Keisuke Miyako
Microbizz
4D CAD plugin
Pluggers
ApiPack, PDFViewer, LDAP, MD5
Ronri-kobo
F-ab, JExternal

Naviga:

Titolo: Backup di 4d Monoutenza *

Categoria: Plugin

Ultimo Aggiornamento: 02/02/05

4dBackup è un plugin forinito con 4d che di solito si usa in versione client-server. E' possibile però usarlo anche in monoutenza, ma o lo si esegue in ambiente User o occorre comandarlo da procedura. Ecco un esempio di utilizzo:

C_INTEGER ($Progress_i;$Fill_i)
If (BK Begin full backup = 0)
      If (BK Start copy = 0)
           Repeat
              BK GET PROGRESS ($Progress_i; $Fill_i)
              MESSAGE ("Backup in corso: " + String ($Progress_i) + "%")
           Until (BK Get state # 4)
      End if
      BK END BACKUP
End if

Inviato da: Umberto Migliore

Visite: 17379


PierPaolo Sichera	02/02/05 00:00:00
Ecco una versione di backup che permette di scegliere il progetto da caricare per il backup. C_INTEGER($Error) C_TIME(vhDocRef) C_TEXT(vProjectPath) vProjectPath:="" `Backup Project If (BK Begin full backup #0) `Per far partire il processo di backup ALERT("Impossibile avviare il backup.") Else BK OPEN PROJECT (vProjectPath) $Error:=BK Get error number If ($Error#0) `Errore ALERT("Errore all'apertura del progetto: "+BK Get error text ($Error)) Else If (BK Get state #3) `Lo stato non è "Ready to Copy" ALERT("Il progetto non è valido. Impossibile effettuare il backup.") Else If (BK Start copy =0) `Backup eseguibile Repeat Until (BK Get state #4) `Questo fa attendere fino alla fine del backup `Quando BK Get state ritorna 4, il backup è in esecuzione End if End if End if BK END BACKUP `Chiude il processo di backup End if

Se accedi con utente e password, puoi aggiungere dei commenti.

4D Principali

4D Discussioni

Faq random

Crediti

Dominio registrato da ZetaNet
Sito realizzato da Nexus srl
4D SQL 11.9.0 offerto da 4D & Italsoftware
Icone di FAMFAMFAM
Moderato da Umberto Migliore
329 utenti registrati

User:
Pass:	Accedi