方法: FILE_OPEN_DIALOG
*数据的定义
DATA: TAB TYPE FILETABLE, "存放文件名的内表
WA TYPE LINE OF FILETABLE, "用来读取文件名的结构
FILE_FILTER TYPE STRING, "file filter
RC TYPE I. "函数返回值
*定义file filter,注意定义的格式,显示的时候最后一个为默认的显示
*与你定义的DEFAULT_EXTENSION无关
FILE_FILTER = 'All Files (*.*)|*.*|Excel Files (*.xls)|*.xls|Word files(*.doc)|*.doc'.
*这就是打开文件的函数,或者说方法也行
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
* 对话框的标题
WINDOW_TITLE = 'WINDOW_TITLE'
* 默认的文件后缀名
DEFAULT_EXTENSION = '*.DOC'
* 默认打开的文件名
DEFAULT_FILENAME = 'C:\TEST'
* 文件打开的filter
FILE_FILTER = FILE_FILTER
* 初始化的目录
INITIAL_DIRECTORY = 'C:\'
* 是否可以同时打开多个文件
MULTISELECTION = 'X'
CHANGING
* 你所打开的文件名字列表
FILE_TABLE = TAB
* 返回值,如果成功打开了,为1
RC = RC
EXCEPTIONS
FILE_OPEN_DIALOG_FAILED = 1
CNTL_ERROR = 2
ERROR_NO_GUI = 3
NOT_SUPPORTED_BY_GUI = 4
others = 5
.
IF SY-SUBRC = 0.
READ TABLE TAB INDEX 1 INTO WA.
WRITE: WA.
ENDIF.
FILE_SAVE_DIALOG和FILE_OPEN_DIALOG差不多,
T-CODE:SE24 查看这个类CL_GUI_FRONTEND_SERVICES
