OpenEuphoria

Re: How check for "path/file exists"?

• Posted by Dan B Moyer <DANMOYER at PRODIGY.NET> Sep 04, 2000
• 516 views

Al,

Turns out I did need have them separate, because Wolf's "jump to" has
separate parameter fields for path & file .

Dan
----- Original Message -----
From: "Michael Nelson" <MichaelANelson at WORLDNET.ATT.NET>
To: <EUPHORIA at LISTSERV.MUOHIO.EDU>
Sent: Monday, September 04, 2000 7:32 AM
Subject: Re: How check for "path/file exists"?


> A simpler version:
>
> function ValidatePath(sequence TargetPathName)
>     return sequence(dir(TargetPathName))
> end function
>
> No need to separate file and path just so the function can recombine them.
>
> -- Mike Nelson
>
> ----- Original Message -----
> From: "Al Getz" <xaxo at AOL.COM>
> To: <EUPHORIA at LISTSERV.MUOHIO.EDU>
> Sent: Monday, September 04, 2000 3:46 AM
> Subject: Re: How check for "path/file exists"?
>
>
> > TESTING FOR A VALID PATH
> >
> > Dan,
> >
> >   The problem with opening a file to test for validity is that you
> >   can't open a directory name, so here's what i use:
> >
> > --------------------------------------------------------------
> >
> >    --  Path Validation Check  --
> >
> > --  checks for valid directory or filename
> >
> > --------------------------------------------------------------
> >
> > include file.e
> > include get.e --for this sample only
> >
> > atom retv,ink
> >
> > function ValidatePath(sequence TargetPathName,sequence TargetFileName)
> >
> >   object DirEntries
> >
> >   DirEntries=dir(TargetPathName&TargetFileName)
> >   if atom(DirEntries) then
> >     --doesnt exist
> >     return 0
> >   else
> >     return 1
> >   end if
> > end function
> >
> > --testing for a valid specific filename:
> > retv=ValidatePath("c:\\euphoria\\projects\\tests\\","test.txt")
> > ?retv
> >
> > --testing for a valid directory name:
> > retv=ValidatePath("c:\\euphoria\\projects\\emptydir\\","*.*")
> > ?retv
> >
> >
> > printf(1,"%s\n",{"Press a key..."})
> >
> > ink=wait_key()
> >
> > ----------------------------------------------------------------
> >
> > Good luck.
> >   --Al