Re: [问题] 连续档名 + 指定档案路径

楼主: laa7352 (Laa)   2012-09-22 07:18:54
※ 引述《piggees (蹦太君)》之铭言:
: 撰写连续档名或指定档案路径是可以处理的
: 现在问题在于两种做法要合并
: 刚刚试了很久
: 发现在指定档案路径时候没办法将连续档名字串带入
: e.g.:
: ******************************************
: integer: i
: character(len=) : string
: string = "file01.dat"
: do i = 1, 10
: write(string(5:6), "I2.2") i
: open( 20, file=string )
: end do
: *********************************************
: 以上open指令写法是没问题的
: 但是档案产生后是在默认位置 也就是程式所在资料夹
: 如现在我想指定这些连续档名档案开在d槽temp资料夹中
: 如果写成
: open( 20, file="d:\temp\string")
: 就只会产生档名为string的dat档
: 请问有办法产生连续档名在指定的资料夹吗?
: 恳请版上高手指导
: 谢谢~~
character path*8
character(len=) : string*55
data path /'d:\temp\'/
string = "file01.dat"
do i = 1, 10
write(string(5:6), "I2.2") i
open( 20, file=path\\string )
end do
试试看二个变量并起来
第一个变量存路径,字串大小要符合路径的长度
第二个变量放档名
作者: piggees (蹦太君)   2012-09-22 09:52:00
谢谢版上各位高手热心解答 帮了很大的忙 谢谢~~

Links booklink

Contact Us: admin [ a t ] ucptt.com