2016-03-16 36 views
0

我如何打開保存在當前目錄從當前目錄

do form ADDBS(JUSTPATH(SYS(16,0))) +"\form5.scx" WITH thisform.grid1.Column1.Text1.Value TO aa 

我試過,但表示,該文件不存在的形式打開窗體

+1

如果它是當前目錄下,你並不需要在所有的路徑。只是做形式form5.scx ... –

回答

1
do form form5 with ... 

VFP使用相對路徑功能也搜索路徑。如果它在當前目錄中,那麼將是第一個被VFP選中的。

+0

我試過你說的,但不起作用,給我這個錯誤「文件」C:\ Users \ ama \ Documents \ Visual FoxPro Projects \ form5.scx'不存在「 – BONIETTE

+0

它從foxpro的第一天開始工作,它仍然有效。就你而言,這意味着當前文件夾中沒有Form5.scx。它確實存在於「C:\ Users \ ama \ Documents \ Visual FoxPro Projects」中嗎?無論如何,這是一個奇怪的地方。相反,也許你應該嘗試:做形式(locfile(「form5.scx」))... –

+0

我的form5.scx位於當前文件夾。我有form1.scx和form5.scx,它們都位於C:\ Users \ ama \ Desktop \ New文件夾中,我試圖從form1訪問form5。 – BONIETTE

0

ADDBS(JUSTPATH(SYS(16,0))) 這已經增加了一個斜線( 「\」)的路徑,並添加了另一個斜槓用 「\ form5.scx」 可以做 做形式ADDBS( JUSTPATH(SYS(16,0)))+「form5.scx」

,或者使用相對路徑或LOCFILE()函數

+0

恐怕你錯了。 VFP會將路徑視爲相同。唯一的區別是,如果justpath(sys(16,0))返回一個空字符串,那麼\ form5.scx將具有不同的含義。 –

+0

如果已經有一個斜槓,ADDBS不會添加另一個斜槓, –

0

來測試什麼,我說,複製這些代碼,執行它:你可以看到有2「\」 addbs()僅適用於其在路徑的第二個獨立項中不適用的內容。

local m.myvar 
text to m.myvar noshow 
messagebox(ADDBS(JUSTPATH(SYS(16,0))) +"\form5.scx") 
_cliptext=ADDBS(JUSTPATH(SYS(16,0))) +"\form5.scx" 
endtext 

STRTOFILE(m.myvar, 「TEST.PRG」)

做測試