|
|
|
|
|
- Updating the structure of the files
HModifyStructure (Example)
Updating the structure of the files This example shows how to update the structure of all the files if necessary. sListOfErrors is string
HCheckStructure("*", hIdentical)
FOR EACH STRING sAFileName OF HListFile() SEPARATED BY CR
WHEN EXCEPTION IN
HCreationIfNotFound(sAFileName)
DO
IF HError(hErrCurrent) = 70016 THEN
ToastDisplay("Updating the structure of the file <" + ...
sAFileName + "> in progress...", toastShort, vaMiddle, haCenter)
IF NOT HModifyStructure(sAFileName) THEN
sListOfErrors += [CR] + ...
"- Error while modifying the structure for the file <" + ...
sNomUnFichier + ">: " + HErrorInfo()
END
ELSE
sListOfErrors += [CR] + "- Error while accessing the file <" + ...
sNomUnFichier + ">: " + HErrorInfo()
END
END
END
HCheckStructure("*", hCompatible)
IF sListOfErrors <> "" THEN
IF NOT YesNo("Errors occurred when opening the files: " + CR + ...
sListOfErrors + CR +...
"Continue the application?") THEN
EndProgram()
END
END
Esta página también está disponible para…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|