我有一個 CSV 檔案。我需要從這個檔案中讀取每一行,執行某些功能,一旦完成,我需要在每行的末尾附加一個類似于“更新”的值。有人可以幫助我使用 LotusScript 實作這一目標嗎?我正在使用“打開檔案以供輸入”陳述句來打開和讀取檔案。我想在每一行執行函式后附加該值。
Open xlFilename$ For Input As Filenum%
Do Until Eof(Filenum%)
Line Input #Filenum%, txt$
'perform certain function
**'Would like to append csv here.**
loop
close Filenum
uj5u.com熱心網友回復:
如果您在末尾追加新行,則需要關閉檔案,然后再次打開以追加。即,在你的回圈之后......
Close Filenum
Open xlFilename$ For Append As Filenum2
Print #Filenum2, stuffYouWantToAppend
但是我看到您正在嘗試在每行的末尾添加新列。如果您只是將現有檔案視為輸入并創建一個您將列印到輸出的新檔案,這將變得容易得多。
Open xlFilename$ For Input As Filenum1%
Open xlFilename$ ".output.csv" For Output As Filenum2%
Do Until Eof(Filenum%)
Line Input #Filenum1%, txt$
'perform certain function
Print #Filenum2%, txt "," additionalColumnsGoHere
loop
close Filenum
如果你愿意,你可以殺死你的輸入檔案,然后使用Name陳述句將你的輸出檔案重命名為原始檔案的名稱。
通過以模式打開檔案可能可以就地執行此RANDOM READ WRITE操作,但這不值得麻煩。
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/483581.html
