在VFP里怎样设置默认路径
2012年5月4日
foxpro 当前目录
今天想设置foxpro的默认工作目录
可是发现个问题:就是你要取得当前表单form的工作目录
在网上找了好多都没有什么用处
最后还是自己动手丰衣足食
写下来以备后用
首先取得表单的目录并保存到变量curpath中
public cCurrent ,nPathStart ,nLenOfPath ,curpath
cCurrent = SYS(16,1)
nPathStart = AT( “:”,cCurrent)- 1
nLenOfPath = RAT( “\”,cCurrent) – (nPathStart)
curpath=SUBSTR(cCurrent, nPathStart, nLenofPath)
设置默认工作目录
SET DEFA TO &curpath
软件技巧 浏览314 次