PROFESSIONAL NEWSGROUPS
WINDEV
,
WEBDEV
and
WINDEV Mobile
Home
|
Recent messages
|
Connect
|
Sign out
|
English
Home
→
WINDEV 2024
→
Exemple de Sauvegarde
Exemple de Sauvegarde
Started by Jean Batiste Dumontier, Feb., 10 2005 5:43 AM - 3 replies
Connect yourself…
Jean Batiste Dumontier
#1
Posted on February, 10 2005 - 5:43 AM
Bonjour
Toute application destinée à être exploitée devrait possèder un menu de sauvegarde et restauration.
Je cherche donc des exemples pour les intégrer à mon application ou à les adapter.
J'ai recherché dans le site de PCSoft et j'ai vu qu'il y avait un exemple WD Sauvegarde dans la LST 56.
N'ayant pas le CD de cette LST je me damande si cela vaut le coup de l'acheter car PC Soft demande 120 € pour racheter un ancien numéro d'une LST
D'autant plus que mon application est en mode C/S
L'idéal serait de disposer d'un entre de contrôle des sauvegardes.
Avez-vous des suggestions?
Merci d'avance
Report
0
0
Daniel C
#2
Posted on February, 10 2005 - 10:18 AM
Voici un exemple de code qui sauvegarde sur disquette avec compactage:
// ErreursCopie = tableau mémorisant le nom du fichier si l'opération s'est mal déroulée
// TT = réel qui contient la taille totale de tous les fichiers à sauvegarder (calculé précédemment avec fTaille)
SI fCompacte(RepOrig+"Articles.Fic","A:\Articles.Fic")<>0 ALORS ErreursCopie[1]="Articles"
TF=fTaille(RepOrig+"Articles.Fic")
Jauge(TF,TT,"Reste "+PartieEntière((TT-TF)*100/TT)+" % à compacter et sauvegarder",iRougeClair)
Pour restaurer:
SI fDécompacte("A:\Articles.Fic",RepDest+"Articles.Fic")<>0 ALORS ErreursCopie[1]="Articles"
TF=fTailleDécompacté("A:\Articles.Fic")
Jauge(TF,TT,"Reste "+PartieEntière((TT-TF)*100/TT)+" % à effectuer",iRougeClair)
Pour sauvegarder sans compactage vers un autre support:
SI PAS fCopieFichier(RepOrig+"Articles.Fic",RepDest+"Articles.Fic")ALORS ErreursCopie[1]="Articles"
SI PAS fCopieFichier(RepOrig+"Articles.Ndx",RepDest+"Articles.Ndx")ALORS ErreursCopie[1]="Articles"
La restauration s'effectue avec la même instruction mais en permutant les répertoires.
Report
0
0
Damien
#3
Posted on February, 10 2005 - 11:42 AM
Je viens de regarder dans la LST 56, les sources ne sont pas livrés il n'y a que l'exécutable. Cette application réalise la sauvegarde d'un répertoire avec les fonction ZipXXX. Je pense pas que ça vaille le coup de l'acheter, il n'y a qu'une page.
Je suis d'accord pour le menu en HF classic, pas en C/S. La base étant stockée sur un serveur, il devrait y avoir une procédure de sauvegarde sur cette machine à l'aide d'un logiciel spécialisé (MS Backup, Veritas, Tina ...)
Report
0
0
Jean-Baptiste Dumontier
#4
Posted on February, 10 2005 - 8:21 PM
Dans le centre de contrôle HF on peut faire une sauvegarde de la base de donnée distante mais pour l'instant le fichier zip se retrouve sur le poste de travail client.
Je n'ai pas vu de sauvegarde automatique mais je me trompe peut-être
Report
0
0
→ Go back to WINDEV 2024
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (earlier versions)
WEBDEV (earlier versions)
WINDEV Mobile (earlier versions)
Reports & Queries
Off-topic
Tools
Français
English
Español
Portuguesa
Close this window
Search type
Only topics
All the messages
Search period
Any time
Past hour
Past 24 hours
Past week
Past month
Past year
Cancel
Preview of your message
Adding an image
Import an image from a URL
Send an image from a file of your disk
Drop a file or click "Browse..."
or
Cancel
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Text