|
VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
上一篇主題 :: 下一篇主題 |
發表人 |
內容 |
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的男人 |
|
回頂端 |
|
|
|
|
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
|
|