读取本地EXCEL文件
来源:互联网 发布:外国网购用什么软件 编辑:程序博客网 时间:2024/06/05 21:46
DATA: IT_EXCEL LIKE ALSMEX_TABLINE OCCURS 0 WITH HEADER LINE.
PARAMETERS FN LIKE RLGRAP-FILENAME MEMORY ID MO1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FN.
DATA: I_RC TYPE I,
I_FILETABLE TYPE FILETABLE.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
WINDOW_TITLE = '选择源文件'
FILE_FILTER = 'excel文件 (*.xls)|*.XLS|全部文件 (*.*)|*.*|'
MULTISELECTION = SPACE
CHANGING
FILE_TABLE = I_FILETABLE
RC = I_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 AND I_RC = 1.
READ TABLE I_FILETABLE INTO FN INDEX 1.
ENDIF.
START-OF-SELECTION.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
FILENAME = FN
I_BEGIN_COL = 1
I_BEGIN_ROW = 1
I_END_COL = 100
I_END_ROW = 65536
TABLES
INTERN = IT_EXCEL
PARAMETERS FN LIKE RLGRAP-FILENAME MEMORY ID MO1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FN.
DATA: I_RC TYPE I,
I_FILETABLE TYPE FILETABLE.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
WINDOW_TITLE = '选择源文件'
FILE_FILTER = 'excel文件 (*.xls)|*.XLS|全部文件 (*.*)|*.*|'
MULTISELECTION = SPACE
CHANGING
FILE_TABLE = I_FILETABLE
RC = I_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 AND I_RC = 1.
READ TABLE I_FILETABLE INTO FN INDEX 1.
ENDIF.
START-OF-SELECTION.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
FILENAME = FN
I_BEGIN_COL = 1
I_BEGIN_ROW = 1
I_END_COL = 100
I_END_ROW = 65536
TABLES
INTERN = IT_EXCEL
- 读取本地EXCEL文件
- JS读取本地excel文件
- java读取本地excel文件代码
- 利用js本地读取excel文件
- java读取本地的excel文件
- 读取本地txt文件数据和excel文件数据
- 流读取本地Excel
- C# Selenium 读取本地Excel文件并测试
- js 读取本地excel 内容
- cocos2d-x 读取CSV文件,读取本地Excel配置表的方法
- 读取本地txt文件
- 本地读取HDFS文件
- 从本地读取文件
- 读取本地json文件
- 读取本地TXT文件
- JAVA 通过poi 读取 本地excel(.xls,.xlsx)文件,文件中 包含图片
- 读取Excel文件
- 读取Excel文件
- 用MySQL创建数据库和数据库表
- python 总结
- __stdcall约定
- Windows完成端口与Linux epoll技术简介
- Inline内联函数的总结贴
- 读取本地EXCEL文件
- 检测点9.2
- hashmap 源码阅读
- VI命令
- Hibernate Annotation
- C# (STA and MTA) 多线程
- Httpserver跳转
- Eclipse快捷键大全(转载)
- MySQL-5.1.40 for linux 安装与部署