Re: [問題] 讀取檔案再另存檔案

看板Fortran作者 (依然動物先生)時間14年前 (2010/02/26 11:51), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/3 (看更多)
※ 引述《smartyouba (氣恰碰)》之銘言: : 請問各位高手一下... : 如果想要在讀取完路徑c:\tran\a.txt這個文字檔 : 後再輸出一個一模一樣的的文字檔檔名為b.txt在同一路徑要怎麼打 : (有指令是會暫存讀取到的東西之後可以再另外輸出的指令嗎) : 我都只有用read.write.open寫不出來... : ------------以下是腦殘新手打的程式"可以忽略"----------- : program ex01 : OPEN(1,FILE='a.txt',STATUS='SCRATCH') : !SCRATCH有暫存檔的功能嗎? : READ(1,*) : READ(1,*) : OPEN(2,FILE='b.TXT',STAUS='UNKNOWN') : WRITE(2,1) : WRITE(2,1) 你讀一行就要寫一行了,你code這樣的順序是: "讀了a第一行" "讀了a第二行" 開啟b.txt "在b寫入a的第二行" "在b寫入a的第二行" 還有,你沒有將你要讀取的東西設定好,根本不知道要讀啥, read(1,*) <---這樣是只有讀.... write(2,1) <---是寫入沒錯啦,但是後面的1是format... 所以你需要設定好變數,還有讀取的東西,接著再把他寫進去。 : STOP : END 以下是簡單範例: character*999 adata <--- 假設你要讀的東西是一個長度999的字串 open (11,file="a.TXT",form="formatted") <--- 開啟a open (22,file="b.TXT",form="formatted") <--- 開啟b read (11,*) adata write (22,*) adata read (11,*) adada write (22,*) adada 以下省略 大概就是類似這樣 (不用迴圈 只用write read open close) -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 163.24.72.117

02/26 12:03, , 1F
謝謝snowanimal大大!
02/26 12:03, 1F
文章代碼(AID): #1BXqKkSs (Fortran)
文章代碼(AID): #1BXqKkSs (Fortran)