Make your own free website on Tripod.com

Capítulo 27

 

Archivos planos para la transferencia de datos

 

 

27-01: Apertura y cerrado de archivos planos

 

Open Archivo For [ Append / Input ] As NúmeroCanal

 

            Append    Abre el archivo para escritura; si no existe el archivo, se crea.

                Input        Abre el archivo para lectura.

 

 

 

 

Close NúmeroCanal

 

’Esas líneas de programación muestran la función de crear y abrir archivos planos, esto sirve para manejar bases de datos creadas en otro lenguaje.’

 

Open C:\AVBP\CAP27\Vendedor.dat For Append As 1

Close #1

 

‘En la línea anterior se define el canal de comunicación para el archivo plano y el programa y luego se cierra

 

En la apertura, el número de canal debe ser uno que no se esté utilizando actualmente.

 

 

 

Capítulo 27, págs. 677.

 

 

 

27-02: FreeFile

 

FreeFile permite conocer el número del primer número de canal disponible para la apertura de archivos planos.

 

Ejemplo

 

Dim NumArch As Integer

 

NumArch% = FreeFile

 

Open “C:\AVBP\CAP27\Vendedor.dat” For Append As NumArch%

 

 

 

 

 

 

 

 

 

 

 

 

 

 

’Con esa instrucción se le otorga a NumArch 1er numero de canal libre, esto para no repetir numero de canal que ya este en uso, ya que generaría un error

 

Capítulo 27, págs. 678.

 

 

 

 

 

27-03: Tipos de datos definidos por el usuario

 

 


Text Box: Educere – Cargando Tecnología en tu memoria.
Web: http://www.enlace.net/ramirez2
E-mail: proap@enlace.net
Condiciones de uso de esta presentación, se encuentran en la página web anotada anteriormente.   Las referencias de páginas son con respecto al título Aprenda Visual Basic Practicando, José Felipe Ramírez Ramírez, 2001, Pearson Educación, ISBN 970-26-0285-8.
Type Nombre

            [Elementos]

            NomElemento As Tipo

            ...

End Type

                       

 

 

 

 

 

 

 

 

 

Definición (ejemplo)

 

Private Type DatosGenerales

       Nombre As String * 20

       Apellidos As String * 20

      

Sexo As String * 1

      

Edad As Integer

 

End Type

 

 

 

Dim uddtPersona As DatosGenerales

 

 

Asignación de valores (ejemplo)

 

uddtPersona.Nombre = “JUAN”

 

uddtPersona.Apellidos = “PÉREZ”

 

uddtPersona.Sexo = “M”

 

uddtPersona.Edad = 30

 

                                                                       


Capítulo 27, págs. 679.

 

 

                                                           

‘Es la definición de un tipo de datos, esto se recomienda cuando se manejan archivos planos, luego se hace la asignación de valores, uddtPersona

es la variable que contiene la definición de el tipo de datos.

           

 

27-04: Escritura en archivos planos

 

 

Write NúmeroCanal, Campo1 [, Campo2, …CampoN]

 

 

 

Ejemplo

 

 

 

Dim NumArch As Integer

 

NumArch% = FreeFile

 

 

Open "C:\AVBP\CAP27\Prueba1.dat" For Append As NumArch%

 

 

Write #NumArch%, “Juan”,“Pérez”,“M”, 30

 

Close #1

 

‘Se presenta como se escribiria en el archivo, primero llama el numero de canal y los campos a modificar, luego define lo que se desea asignar

Capítulo 27, págs. 679.

 

 

 

 

27-05: Lectura de archivos planos

 

 

Input NúmeroCanal, Campo1 [, Campo2, …CampoN]

 

 

 

Ejemplo

 

 

 

Dim NumArch As Integer

 

NumArch% = FreeFile

 

 

Open "C:\AVBP\CAP27\Prueba1.dat" For Input As NumArch%

 

Dim strNombre As String

Dim strApellido as String

Dim strSexo As String

Dim intEdad As Integer

 

Input #NumArch%, strNombre$, strApellido$, strSexo, intEdad%

Print strNombre$; strApellido$; strSexo; intEdad%

 

Close #1     

 

Capítulo 27, págs. 684.

 

 

 

‘Se muestra la forma en que se leería el archivo, prime se busca el numero de canal libre y se asigna a la variable NumArch, luego se abre la base de datos en ese canal, se definen variables con los campos a usar, por ultimo la función imput es la  que permite leer: primero se declara el numero de canal que esta en al variable NumArch y luego los campos deseados. La función print imprimiría los campos seleccionados y luego ya se cierra el canal.

 

R

 Laboratorio

 

Realice los siguientes ejercicios.

 

27.01 Creación y escritura en archivos planos

27.02 Proceso para bajar datos de una base de datos a archivos planos

27.03 Cargando datos a una base de datos desde un archivo plano