PC SOFT

AYUDA EN LÍNEA
DE WINDEV, WEBDEV Y WINDEV MOBILE


Este contenido proviene de una traducción automática.. Haga clic aquí para ver la versión original en inglés.
  • Cerrar un archivo abierto varias veces
  • Cierre de un archivo bloqueado
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReportes y ConsultasCódigo de Usuario (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Código Navegador
WINDEV Mobile
AndroidWidget Android iPhone/iPadApple WatchUniversal Windows 10 AppWindows Mobile
Otros
Procedimientos almacenados
Cierra un fichero externo.
Versiones 15 y posteriores
WINDEVJava Esta función ahora está disponible para aplicaciones Java.
Nueva funcionalidad versión 15
WINDEVJava Esta función ahora está disponible para aplicaciones Java.
WINDEVJava Esta función ahora está disponible para aplicaciones Java.
Versiones 15 y posteriores
Android Esta función ahora está disponible para aplicaciones Java.
Nueva funcionalidad versión 15
Android Esta función ahora está disponible para aplicaciones Java.
Android Esta función ahora está disponible para aplicaciones Java.
Versiones 16 y posteriores
Universal Windows 10 App Esta función ahora está disponible para aplicaciones Windows Phone.
Nueva funcionalidad versión 16
Universal Windows 10 App Esta función ahora está disponible para aplicaciones Windows Phone.
Universal Windows 10 App Esta función ahora está disponible para aplicaciones Windows Phone.
Versiones 17 y posteriores
iPhone/iPad Esta función ahora está disponible para aplicaciones iPhone/iPad.
Nueva funcionalidad versión 17
iPhone/iPad Esta función ahora está disponible para aplicaciones iPhone/iPad.
iPhone/iPad Esta función ahora está disponible para aplicaciones iPhone/iPad.
Versiones 18 y posteriores
Widget Android Esta función ahora está disponible en modo Android Widget.
Universal Windows 10 App Esta función ahora está disponible en modo Windows Store apps.
Nueva funcionalidad versión 18
Widget Android Esta función ahora está disponible en modo Android Widget.
Universal Windows 10 App Esta función ahora está disponible en modo Windows Store apps.
Widget Android Esta función ahora está disponible en modo Android Widget.
Universal Windows 10 App Esta función ahora está disponible en modo Windows Store apps.
Versiones 21 y posteriores
Universal Windows 10 App Esta función ahora está disponible en modo Universal Windows 10 App.
Nueva funcionalidad versión 21
Universal Windows 10 App Esta función ahora está disponible en modo Universal Windows 10 App.
Universal Windows 10 App Esta función ahora está disponible en modo Universal Windows 10 App.
Ejemplo
WINDEVWEBDEV - Código ServidorReportes y ConsultasJavaPHPAjaxCódigo de Usuario (UMC)
// Open an external file
FileID is int
ResClose is int
FileID = fOpen("C:\MyDirectories\File.txt", foReadWrite)
IF FileID <> -1 THEN
...
// Close the external file
ResClose = fClose(FileID)
END
Windows Mobile
// Open an external file
FileID is int
ResClose is int
FileID = fOpen("\MyDirectories\File.txt", foReadWrite)
IF FileID <> -1 THEN
...
// Close the external file
ResClose = fClose(FileID)
END
Sintaxis
<Result> = fClose(<File identifier>)
<Result>: Integer
  • 0 es que el archivo externo está cerrado,
  • -1 si se produce un error. Para conocer los detalles del error, utilice ErrorInfo el comando Mensaje de error ininterrumpido. fCerrar genera un error si el archivo no está abierto.
<File identifier>: Integer
Identificador del fichero a cerrar, definido por fOpen o fCreate.
PHP Este parámetro debe ser una variante.
Observaciones

Cerrar un archivo abierto varias veces

El mismo archivo se puede abrir varias veces simultáneamente. Cada versión del archivo debe cerrarse individualmente mediante su propio identificador.
WINDEVWEBDEV - Código ServidorReportes y ConsultasAjaxCódigo de Usuario (UMC)

Cierre de un archivo bloqueado

Un archivo bloqueado se desbloqueará automáticamente cuando se cierre.
Recordatorio: fLock se utiliza para bloquear un fichero externo. fUnlock se utiliza para desbloquear un archivo externo.
Componente : wd240std.dll
Versión mínima requerida
  • Versión 9
Esta página también está disponible para…
Comentarios
Exemplo ReadFile
PROCEDURE ReadFile(ArquivoTxt is string, TipoUnicodeToAnsi is string)

//Le arquivo texto
INFO(TIMESYS())

// Declare the variables
PathFile is string = ArquivoTxt
IdFile, ResCloseFile, FileID, NumeroLinha is int
Line is string

NextTitle("Atencao")

IF fFileExist(ArquivoTxt) = true

// Open the file
FileID = fOpen(PathFile,foReadWrite)
IF IdFile = -1 THEN
Error(ErrorInfo(errMessage))
ELSE

if TipoAnsiUnicode = "UnicodeToAnsi"
//Converte de Unicode para Ansi
Line = UnicodeToAnsi(fReadLine(FileID))
else
Line = fReadLine(FileID)
end

//Linha 1
NumeroLinha = 1
/// ----COLOQUE AQUI O PROGRESS BAR = 1
//Info("Linha:" + NumeroLinha, Line) ///----------------- LINHA LIDA
//Inclua aqui a SUB Procedure de importacao dos dados

WHILE Line <> EOT AND Line <> ""

//Proxima linha
NumeroLinha += 1
/// ----COLOQUE AQUI O PROGRESS BAR + 1
Line = fReadLine(FileID)
//Info("Linha:" + NumeroLinha, Line) ///----------------- LINHA LIDA
//Inclua aqui a SUB Procedure de importacao dos dados
END
IF Line = "" THEN Error(ErrorInfo(errMessage))
IF Line = EOT THEN Info("Final do Arquivo.")
ResCloseFile = fClose(IdFile)
IF ResCloseFile = -1 THEN
//Error(ErrorInfo(errMessage))
END

END

ELSE
Info("Arquivo não encontrado!")
END

info(NumeroLinha,TIMESYS())
adrianoboller
21 02 2015