Cristobal, efectivamente si no compruebo la existencia del archivo puedo leerlo, pero necesito saber si este archivo existe ya que es necesario para el proceso que quiero hacer. Parecer铆a que falla la funci贸n File().
Saludos
Cristobal, efectivamente si no compruebo la existencia del archivo puedo leerlo, pero necesito saber si este archivo existe ya que es necesario para el proceso que quiero hacer. Parecer铆a que falla la funci贸n File().
Saludos
Pero has comprobado el hacer un
?
y un
Msginfo
de la variable que contiene el fichero con su path completo ?

El ordenador que utilizas tiene como lengua el Espa帽ol?
? cEmpresa + '\config.ini'C:\escuelas\VI脩AS\config.ini聽HB_LANGSELECT( 'ESWIN' )
聽 HB_SetCodePage("ESWIN")聽 聽Time from start: 0 hours 0 mins 0 secs
聽 聽Error occurred at: 05/06/2017, 12:10:50
聽 聽Error description: Error BASE/1302 聽Argument error: HB_CDPISUTF8
聽 聽Args:
聽 聽 聽[ 聽 1] = C 聽 ESWINHas puesto al principio el REQUEST ?
Me faltaba esa instrucci贸n. Lo que no termino de entender es porque puedo leer el archivo pero no puedo comprobar la existencia del mismo con la funci贸n File() sin esta instrucci贸n. Gracias a ambos por la ayuda.
Saludos
C贸mo lo lees?
local oDlg, cHost := Space( 20 ), cUser := Space( 20 ), cPassword := Space( 20 )
local oBtn, lConnect := .F., oIni
if File( ".\erp.ini" )
INI oIni FILE ".\erp.ini"
GET cHost SECTION "server" ENTRY "host" OF oIni DEFAULT "127.0.0.1"
GET cUser SECTION "server" ENTRY "user" OF oIni DEFAULT "root"
GET cPassword SECTION "server" ENTRY "password" OF oIni DEFAULT ""
ENDINI
cHost = PadR( cHost, 20 )
cUser = PadR( cUser, 20 )
cPassword = PadR( cPassword, 20 )
endifcDirActual := GetPvProfString( "periodo","Mes","", cEmpresa + "\config.ini" ) cDirActual := GetPvProfString( "periodo", "Mes", FilePath(), cEmpresa + ".\CONFIG.INI" )
贸
cDirActual := GetPvProfString( "periodo", "Mes", FilePath(), cEmpresa, ".\CONFIG.INI" )