Chinaunix首页 | 论坛 | 博客
  • 博客访问: 153497
  • 博文数量: 72
  • 博客积分: 2010
  • 博客等级: 大尉
  • 技术积分: 745
  • 用 户 组: 普通用户
  • 注册时间: 2009-06-15 14:48
文章分类

全部博文(72)

文章存档

2010年(25)

2009年(47)

我的朋友

分类: 嵌入式

2010-01-25 15:40:26

 多个文件下载:用table控件实现
 
添加一个参数context_element type if_wd_context_element
 
data lo_nd_t_file type ref to if_wd_context_node.
data lo_el_t_file type ref to if_wd_context_element.
data ls_t_file type wd_this->element_t_file.
* navigate from  to  via lead selection
  lo_nd_t_file = wd_context->get_child_node( name = wd_this->wdctx_t_file ).

  call method lo_nd_t_file->set_lead_selection
    exporting
      element = context_element.

* get all declared attributes
  context_element->get_static_attributes(
    importing
      static_attributes = ls_t_file ).


  data: lv_file_name type string ,
        lv_mime_type type string .
  lv_file_name = ls_t_file-z_file_name.
  lv_mime_type = ls_t_file-z_file_type.

*** 下载文件
  cl_wd_runtime_services=>attach_file_to_response(
    i_filename      = lv_file_name
    i_content       = ls_t_file-z_file_content
    i_mime_type     = lv_mime_type
    i_in_new_window = abap_false
    i_inplace       = abap_false ).
阅读(2313) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~