VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

請問如何用VFP將特定資料寫入文字檔

 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
ANNIELEE



註冊時間: 2004-12-30
文章: 2


第 1 樓

發表發表於: 星期四 八月 11, 2011 12:54 am    文章主題: 請問如何用VFP將特定資料寫入文字檔 引言回覆

請問如何用VFP將特定資料(每行長度不一樣)寫入文字檔,而不用COPY TO XX TYPE DSF 的方式
回頂端
檢視會員個人資料 發送私人訊息
garfield
Site Admin


註冊時間: 2003-01-30
文章: 2157


第 2 樓

發表發表於: 星期四 八月 11, 2011 10:26 am    文章主題: 引言回覆

strtofile(字串+chr(13)+chr(10),文字檔名,.t.)
_________________
利用>>搜尋<<的功能會比問的還要快得到答案.
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件
jys



註冊時間: 2004-12-27
文章: 33
來自: 台灣

第 3 樓

發表發表於: 星期四 八月 11, 2011 10:27 am    文章主題: 引言回覆

LF = Chr(13)+Chr(10)
nHandle = Fcreate("C"\test.Txt")
Fwrite(nHandle ,"Data")
Fwrite(nHandle ,LF) && 換行
Fclose(nHandle )
回頂端
檢視會員個人資料 發送私人訊息
chilin



註冊時間: 2003-10-01
文章: 79
來自: Taipei,Taiwan

第 4 樓

發表發表於: 星期四 八月 11, 2011 10:43 am    文章主題: 引言回覆

1.使用STRTOFILE(),可參考HELP

VFP8 OR VFP9
FILENAME=[C:\test.log]
STR=[TEST1 ]+TTOC(DATETIME())+CHR(13)+CHR(10)
STRTOFILE(STR,FILENAME,0)

STR=[TEST2 ]+TTOC(DATETIME())+CHR(13)+CHR(10)
STRTOFILE(STR,FILENAME,1)

PS:VFP6 無第三個參數


2.使用DOS ">" 導出功能
DOS指令如下:
echo "test1" > c:\test.log
echo "test2" >> c:\test.log

_________________
一個喜愛Latte的男人


chilin 在 星期一 三月 30, 2015 9:32 am 作了第 1 次修改
回頂端
檢視會員個人資料 發送私人訊息 參觀發表人的個人網站
konndou



註冊時間: 2014-03-27
文章: 10


第 5 樓

發表發表於: 星期五 三月 27, 2015 3:02 pm    文章主題: 引言回覆

chilin 寫到:
1.使用STRTOFILE(),可參考HELP

VFP8 OR VFP9
FILENAME=[C:\test.log]
STR=[TEST1 ]+TTOC(DATETIME())+CHR(13)+CHR(10)
STRTOFILE(STR,FILENAME,1)

STR=[TEST2 ]+TTOC(DATETIME())+CHR(13)+CHR(10)
STRTOFILE(STR,FILENAME,1)

PS:VFP6 無第三個參數


2.使用DOS ">" 導出功能
DOS指令如下:
echo "test1" > c:\test.log
echo "test2" >> c:\test.log

對不起,回復了這麼久之前的文章

VPF 6 一樣有第三個參數,為選用參數,使用.t. 或 .f.,預設為 .f.

以 chilin 的範例為範例
FILENAME="C:\test.log" && VFP 6 不會自動產生 C:\test.log
STR="TEST1 "+TTOC(DATETIME())+CHR(13)+CHR(10)
STRTOFILE(STR,FILENAME,.t.)

STR="TEST2 "+TTOC(DATETIME())+CHR(13)+CHR(10)
STRTOFILE(STR,FILENAME,.t.)
回頂端
檢視會員個人資料 發送私人訊息
chilin



註冊時間: 2003-10-01
文章: 79
來自: Taipei,Taiwan

第 6 樓

發表發表於: 星期一 三月 30, 2015 9:36 am    文章主題: 引言回覆

感謝 konndou 的回覆,VFP6 的確可以使用。
VFP6 STRTOFILE(STR,FILENAME,.F.) = VFP8 or VFP9 STRTOFILE(STR,FILENAME,0)
VFP6 STRTOFILE(STR,FILENAME,.T.) = VFP8 or VFP9 STRTOFILE(STR,FILENAME,1)

所以各版本通用方式可以寫成:
STRTOFILE(STR,FILENAME,IIF(VERSION(5)>700,0,.F.))
STRTOFILE(STR,FILENAME,IIF(VERSION(5)>700,1,.T.))

_________________
一個喜愛Latte的男人
回頂端
檢視會員個人資料 發送私人訊息 參觀發表人的個人網站
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作