Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 3 Próxima »

Sintaxis

 

FOPEN( <expresión carácter>  [ , <expresión numérica> ] )

 

 

Propósito

 

Abre un archivo binario, suministrando el respectivo número de manejo del archivo.

 

 

Argumentos

 

<expresión carácter>

 

Define el nombre del archivo que se abrirá, incluyendo la carpeta y el disco (drive), si no se trata de los corrientes.

 

<expresión numérica>

 

Define el modo de apertura del archivo, indicando como se puede acceder a éste. Si no se especifica dicho argumento se asumirá el estándar cero. Los posibles valores son:

 

Modo

Fileio.ch

Operación

0

FO_READ

Sólo lectura

1

FO_WRITE

Sólo grabación.

2

FO_READWRITE

Lectura y grabación.

 

 

Utilización

 

El número de manejo del archivo suministrado por la función FOPEN() varía entre cero y 65.535. Si ocurriera algún error la función retorna el valor -1.

 

Este número de manejo del archivo es necesario para identificarlo junto a las otras funciones de manejo de archivos, el valor suministrado por la función FOPEN() siempre se debe almacenar en una variable de memoria para utilizarlo posteriormente.

 

 

Sugerencias

 

Cada vez que ocurra un error de apertura del archivo, la función FOPEN() suministrará el valor -1. En este caso, la función FERROR() se puede utilizar para determinar el tipo de error ocurrido. Por ejemplo, si la función FOPEN() suministra el valor -1 y FERROR() suministra el valor 2, significa que el archivo especificado no se encontró. Consulte la función FERROR() para verificar la lista de errores.

 

El número de manejo de archivos suministrado por las funciones FOPEN() y FCREATE(), equivale al alias de un archivo de datos.

 

 

Ejemplos

 

En este ejemplo, la función FOPEN() se utiliza para abrir el archivo Teste.txt en el modo de lectura y grabación.

 

#include “Protheus.ch”

 

FUNCTION AbreArq()

 

LOCAL nArq := FOPEN(“Teste.txt”, FO_READWRITE)

 

IF FERROR() <> 0 .AND. nArq == -1

          MsgAlert(“Error de apertura. Código: “ + STR(FERROR()))

 

          RETURN

ENDIF

  • Sem rótulos