下载时，弹出下载地址选择窗口

DATA:  lo_objdata LIKE wwwdatatab,
         lo_mime LIKE w3mime,
         lc_filename  TYPE string VALUE 'test01',            "默认文件名，用户可以修改
         lc_path      TYPE  string ,                         "路径

         lc_fullpath  TYPE string  ,                         "完整路径加名称
  

  "保存下载的模板
  CALL METHOD cl_gui_frontend_services=>file_save_dialog "调用保存对话框
    EXPORTING
      default_extension    = 'XLS'                        "保存类型
      default_file_name    = lc_filename                  "文件名：test01
    CHANGING
      filename             = lc_filename                  "文件名
      path                 = lc_path                      "地址，用户选择的时候赋值如d:\
      fullpath             = lc_fullpath                  "文件路径：如d:\test01.xls
    EXCEPTIONS
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      OTHERS               = 4.
  IF lc_fullpath = ''.
    MESSAGE  '不能打开excel' TYPE 'E'.
  ENDIF.

这些东西仅仅是为了以后项目里可以直接copy，不可能记得住那么多东西的。

copy下开发也快，呵呵