🚀 go-pugleaf

On Mon, 04 Jan 1999 18:28:17 +0800, kdtc wrote:

>   True.. that I can do, but by doing so, the fixed path name might
> not work on another installed workstation.   I've thought about
> creating another BDE alias for local data access, but then again,
> I'd have to explicitly state the PATH in the BDE alias and that
> won't do either.  Mind you, I haven't tried putting "." in the
> PATH statement.   I don't think that'll work.  

dbfPathAndName = set("directory") + "\TMPX.DBF"


> Btw, is there any way of extracting the PATH from the BDE alias?
> All I could do was extract the name of the alias via the DATABASE
> OBJECT'S GETSCHEMA() method, but I don't see how that can help
> me in determining the path of the actual datafile.  

The following courtesy of Romain (of course):

FUNCTION GetDatabaseDir(oDatabase)
   if type("GetAliasPath") # "FP"
	   extern cint GetAliasPath(cHandle,cString,;
         cString,cString);
   		IDAPI32 from "DbiFormFullName"
   endif
   cRet=space(261)
   if ( GetAliasPath(oDatabase.handle,"YabbaDabbaDoo","",cRet ) == 0 )
      cRet=cRet.left(cRet.lefttrim().lastindexof("\"))
      else
      cRet=""
   endif
   RETURN cRet


Gary

Some dBASE Stuff at
http://www.AppTools.com/dbase