report ztest126
no standard page heading line-size 255.
data: begin of wa_html,
zhtml(255),
end of wa_html,
gt_html like table of wa_html.
data: v_str type string.
define appd_html.
wa_html-zhtml = &1.
append wa_html to gt_html.
clear wa_html.
end-of-definition.
appd_html: '<table style="width:100%;border:1px black solid;font-size:10px; border-collapse:collapse;font-family:Arial Unicode MS;">',
'<tr>',
'<td align="center" style="border:1px black solid;">1111111111</td>',
'<td align="center" style="border:1px black solid;">2222222222</td>',
'</tr>',
'<tr>',
'<td align="center" style="border:1px black solid;">1111111111</td>',
'<td align="center" style="border:1px black solid;">2222222222</td>',
'</tr>',
'<tr>',
'<td align="center" style="border:1px black solid;">1111111111</td>',
'<td align="center" style="border:1px black solid;">2222222222</td>',
'</tr>',
'</table>'.
call method cl_gui_frontend_services=>gui_download
exporting
filename = 'c:\a.doc'
changing
data_tab = gt_html.
call function 'CALL_INTERNET_ADRESS' "打开Word
exporting
pi_adress = 'c:\a.doc'
* PI_TECHKEY = ''
exceptions
no_input_data = 1
others = 2.
if sy-subrc eq 0.
write 'OK'.
else.
write 'ER'.
endif.