【文件上传下载】 上传一个文件夹（含有各种格式的文件，比如EXCEL,TXT,WORD,图片等等）

  DATA: lv_directory     TYPE string.
  DATA  filecount        TYPE i.
  lv_directory = p_pic.
  CALL METHOD cl_gui_frontend_services=>directory_list_files
    EXPORTING
      directory                   = lv_directory
*     filter                      = '*.*'
      files_only                  = 'X'
*     directories_only            =
    CHANGING
      file_table                  = gt_tab
      count                       = filecount
    EXCEPTIONS
      cntl_error                  = 1
      directory_list_files_failed = 2
      wrong_parameter             = 3
      error_no_gui                = 4
      not_supported_by_gui        = 5
      OTHERS                      = 6.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.