Informática Elemental
Capacitación básica en Computación
Small Basic: Propiedades y operaciones del objeto File
Usar propiedades del objeto File.
- LastError
- CreateDirectory
- GetDirectories (obtener directorios)
Descargue un archivo de la red y lo copie en el directorio que ha creado.
Muestre el contenido del archivo descargado en la ventana de texto.
Acepte contenido adicional del usuario y agregue ese contenido al archivo.
Muestre el contenido final del archivo en la ventana de texto.
Nota: El archivo tiene que existir en la ruta de red especificada para que la solución funcione.
Solución:
TextWindow.Write(“Escriba el nombre del nuevo directorio: “)
NombreDirectorio = TextWindow.Read()
File.CreateDirectory(NombreDirectorio)
rutaarchivo = “\\mum-9785sm\Compartido\ArchivoEntradaSalidaO.txt”
rutadescarga = Network.DownloadFile(rutaarchivo)
If File.CopyFile(rutadescarga, NombreDirectorio) = “SUCCESS” Then
TextWindow.WriteLine(“El archivo ha sido descargado de la red y copiado a: ” + NombreDirectorio )
archivos= File.GetFiles(NombreDirectorio)
TextWindow.WriteLine(“Este es el contenido del archivo: “)
TextWindow.WriteLine(File.ReadContents(archivos[1]))
TextWindow.Write(“Escriba los datos para agregarlos en el archivo: “)
DatosAgregados = TextWindow.Read()
File.AppendContents(archivos[1],” ” + DatosAgregados)
TextWindow.WriteLine(“El contenido del archivo después de agregar los datos es como sigue: “)
TextWindow.WriteLine(File.ReadContents(archivos[1]))
EndIf
%d bloggers like this:
No comments:
Post a Comment