在Fortran程序中我想让程序暂停
然后去搜素某个文件夹存在某个文件,如果文件存在则读取该文件,然后程序程序继续运行;如果该文件不存在,则继续暂停,一直等到该文件出现。...
然后去搜素某个文件夹存在某个文件,如果文件存在则读取该文件,然后程序程序继续运行;如果该文件不存在,则继续暂停,一直等到该文件出现。
展开
展开全部
Program Main
logical :: bExist = .FALSE.
Do
Inquire( File = "a.txt" , exist = bExist)
if ( bExist ) Exit
End Do
!// 此处是你的后续代码,比如 open 打开该文件等
End Program Main
意思就是,不停的循环。直到文件存在为止。
我想这个可能不一定能满足你的需求。
我猜你是想等另一个程序把结果输出吧?
但是,另一个程序创建这个文件之后,可能写入文件内容还需要一点时间。
如果你的程序一旦发现文件创建了,就开始读的话,可能会打开文件冲突。(也就是两个程序都打开同一个文件,会出错的)
logical :: bExist = .FALSE.
Do
Inquire( File = "a.txt" , exist = bExist)
if ( bExist ) Exit
End Do
!// 此处是你的后续代码,比如 open 打开该文件等
End Program Main
意思就是,不停的循环。直到文件存在为止。
我想这个可能不一定能满足你的需求。
我猜你是想等另一个程序把结果输出吧?
但是,另一个程序创建这个文件之后,可能写入文件内容还需要一点时间。
如果你的程序一旦发现文件创建了,就开始读的话,可能会打开文件冲突。(也就是两个程序都打开同一个文件,会出错的)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询