Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1294024
  • 博文数量: 932
  • 博客积分: 10
  • 博客等级: 民兵
  • 技术积分: 10208
  • 用 户 组: 普通用户
  • 注册时间: 2011-07-08 12:28
文章分类

全部博文(932)

文章存档

2021年(1)

2020年(134)

2019年(792)

2018年(5)

我的朋友

分类: 大数据

2019-03-31 18:11:15

除了使用我的这篇blogStep by step to create QRCode in ABAP Webdynpro提到的使用ABAP webdynpro生成二维码之外,也可以通过使用二维码在线生成网站提供的service来生成二维码。

二维码在线生成网站:

http:///qrcode.php

在网页上输入要生成的二维码数据源,校验级别和图片大小,点生成即可看到生成的二维码图片:

下面是用ABAP code 利用上述service生成二维码的代码:

DATA:ls_form type zcl_http_tool=>ty_name_pair,
lt_header type zcl_http_tool=>tt_name_pair,
lt_form type zcl_http_tool=>tt_name_pair,
lv_code type xstring.

ls_form = value #( name = 'data' value = 'testforQRCode' ). APPEND ls_form TO lt_form.

ls_form = value #( name = 'level' value = 'M' ). APPEND ls_form TO lt_form.

ls_form = value #( name = 'size' value = '6' ). APPEND ls_form TO lt_form.

zcl_http_tool=>send_request( iv_url = 'http:///qrcode.php' iv_req_type = if_http_request=>co_request_method_post
it_form = lt_form ).

ls_form = value #( name = 'Referer' value = 'http:///qrcode.php' ). APPEND ls_form TO lt_header.

zcl_http_tool=>send_request( EXPORTING iv_url = 'http:///mkqr.php?data=testforQRCode&level=M&size=6' iv_req_type = if_http_request=>co_request_method_get
it_header = lt_header
IMPORTING ev_response = lv_code ). 

testforQRCode对应生成的二维码:

用手机上的二维码扫描应用能够成功扫描出来:

zcl_http_tool的代码在我的github上(因为用于demo用途,没有加对应的出错处理)

要获取更多Jerry的原创技术文章,请关注公众号"汪子熙"

阅读(1837) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~