FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour No encuentra el archivo
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
No encuentra el archivo
Posted: Fri May 29, 2009 09:37 PM
Estimados

Por que causa será que no me encuentra un archivocolocandole un camino determinado:

ejemplo:

Code (fw): Select all Collapse
If file( ! "\\Servidor\f\ADMINIST\PRESUPUESTOS A CLIENTES\Año 2009\nombreardhivo.pdf )


saludos

david
argentina
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: No encuentra el archivo
Posted: Sat May 30, 2009 12:09 AM

If !File("\Servidor\f\ADMINIST\PRESUPUESTOS A CLIENTES\Año 2009\nombreardhivo.pdf ")
MsgInfo("Fichero no encontrado")
Endif

If File("\Servidor\f\ADMINIST\PRESUPUESTOS A CLIENTES\Año 2009\nombreardhivo.pdf ")
MsgInfo("Fichero encontrado")
Endif

Saludos

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
Re: No encuentra el archivo
Posted: Sat May 30, 2009 10:29 AM

Amigo...

perdon... lo hago de esa forma y NO funciona...

david

Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: No encuentra el archivo
Posted: Sat May 30, 2009 01:38 PM

David, he probado la siguiente instruccion y funciona correctamente.
if !File("\SERVIDOR\C\Documents and Settings\Admin\Mis documentos\Francisco\fap.jpg")

Asegúrate de tener los derechos correspondientes y que la ruta sea correcta.
Saludos

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: No encuentra el archivo
Posted: Sat May 30, 2009 05:31 PM
David:

Hay ocasiones en que el bosque no nos deja ver los árboles :-)

Solo por no dejar, notaste que el signo de negación (Admiración) va fuera de los parentesís ?

Code (fw): Select all Collapse
If file( !                 // Así NO


Code (fw): Select all Collapse
If ! file(                 // Así SÍ


Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
Re: No encuentra el archivo
Posted: Sat May 30, 2009 09:59 PM
Le dejo mi funcion donde tengo problemas

en la variable de la base de dato tengo: alltrim((SEMIPRSE)->PATH_PDF) = \\Servidor\f\ADMINIST\PRESUPUESTOS A CLIENTES\Año 2009

Code (fw): Select all Collapse
Function Ver_PresupuPDF(nRecNo)

local PRESUPU , SEMIPRSE
local NomArc

SEMIPRSE := CDX_Abrir('SEMIPRSE',0,1)
PRESUPU := CDX_Abrir('PRESUPU',0,1,'PRESUPU')
(PRESUPU)->( dbgoto(nRecNo) )

NomArc := 'P-'+strzero((PRESUPU)->PRE_NRO,6)+' '+alltrim((PRESUPU)->NOMB)

If !FILE(alltrim((SEMIPRSE)->PATH_PDF)+NomArc+'.pdf') 
  Msgstop('Archivo '+NomArc+'.pdf INEXISTENTE' , 'Archivo PDF Inexistente')
Else
  NomArc := alltrim((SEMIPRSE)->PATH_PDF)+NomArc+'.pdf'
  SHELLEXECUTE( 0, 0, NomArc, 0, 0, 1 )
EndIf

ER_4(PRESUPU)
ER_4(SEMIPRSE)

RETURN .T.
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: No encuentra el archivo
Posted: Sat May 30, 2009 11:00 PM
David, parece que te falta \
Prueba asi:
If !FILE(alltrim((SEMIPRSE)->PATH_PDF)+"\"+NomArc+'.pdf')
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
Re: No encuentra el archivo
Posted: Sun May 31, 2009 11:28 AM

Francisco

en estos momentos la variable de la base de datos es asi:

\Servidor\f\ADMINIST\PRESUPUESTOS A CLIENTES\Año 2009 Nvo formato\

y no lo encuentra, podra ser que es muy largo la ubicacion?

te comento que si lo realizao sobre una carpeta del disco local C:\pdf\ funcion perfecto...

david

Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 01:44 PM

David, tenes que usar nombres cortos cuando tiene espacios
PRESUPUESTOS A CLIENTES sería PRESUP~1

Saludos

Adhemar

Saludos,



Adhemar C.
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 01:44 PM

Disculpen mi insistencia...

gracias

david

Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 01:48 PM

David, probaste con nombre corto?

Saludos

Adhemar

Saludos,



Adhemar C.
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 01:49 PM

y como abreviarias?

\Servidor\f\ADMINIST\PRESUPUESTOS A CLIENTES\Año 2009 Nvo formato\

Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 01:59 PM

David
Desde el Shell DOS CMD ejecuta el comando DIR \SERVIDOR /X/S/P

Te mostrará los nombres cortos

Saludos

Adhemar

Saludos,



Adhemar C.
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 05:41 PM

Hola amigo,
Prueba con variables privadas y utilizando macros.
Es solo una sugerencia, quizá te ayude.
Saludos,

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: No encuentra el archivo
Posted: Mon Jun 01, 2009 06:52 PM

dob,

Lfn2Sfn( <cLongFileName> ) --> cshortFileName

Está función bien podría servirte.

William, Morales

Saludos



méxico.sureste

Continue the discussion