您所在位置：主题：求助： 如何在文件里读取带有“/”的字符串？
academician
[专家分：40] 发布于 2010-06-17 16:28:00
一段程序要从一个文件中读取 带有“/”的 路径 字符串
PROGRAM MAIN
IMPLICIT NONE
CHARACTER*128 A
OPEN(12,FILE='1.DAT')
READ(12,*)A
WRITE(*,*)TRIM(ADJUSTL(A))
END
文件的内容为
F:/DF/d.dat
但是屏幕输出为
F:
就是说程序不能读取“/”
但是如果直接给A赋值 是可以的
PROGRAM MAIN
IMPLICIT NONE
CHARACTER*128 A
A="F:/DF/d.dat"
WRITE(*,*)TRIM(ADJUSTL(A))
END
请问 如果我就想在文件里读这个路径 该如何解决？
PROGRAM MAIN
IMPLICIT NONE
CHARACTER*128 A
OPEN(12,FILE='1.DAT')
READ(12,*)A
WRITE(*,*)TRIM(ADJUSTL(A))
END
文件的内容为
F:/DF/d.dat
但是屏幕输出为
F:
就是说程序不能读取“/”
但是如果直接给A赋值 是可以的
PROGRAM MAIN
IMPLICIT NONE
CHARACTER*128 A
A="F:/DF/d.dat"
WRITE(*,*)TRIM(ADJUSTL(A))
END
请问 如果我就想在文件里读这个路径 该如何解决？
