Coding - Exemples sur les fichiers (2)

Rebol 
  [ 
  Sujet: "Utilisation des fichiers (2)"
  Auteur: "RebolZone"
  Version: 1.0
  Commentaires: " "
  ]

;1er exemple : Lecture de fichier sur le Web

;Nom du fichier à lire
fichier: http://rebolzone.free.fr/rbnews.html

;Lecture du fichier
resultat: read fichier

;Affichage du résultat
print resultat

;Ecriture du résulat en local
write %/C/recup/infos/infos.htm resultat

;2eme Exemple : lecture de fichier sur le Web, 
;jouons la sécurité, testons les erreurs ...

if error? try [resultat: read fichier] 
	[print "Erreur : Impossible d'ouvrir le fichier"]

;Affichage du résultat
print resultat

;Ecriture du résulat en local
if error? try [write %/C/recup/infos/infos.htm resultat]
	[print "Erreur : Impossible d'écrire le résultat"]

;Attente et fin de programme
input  

Commentaires :
Un fichier localisé sur le réseau peut être lu comme un fichier local.
Notez l'utilisation de la gestion des erreurs avec error? et try.