用 ABAP 生成二维码 QR Code

关注

发布于: 2021 年 05 月 17 日

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

二维码在线生成网站：

http://www.makepic.com/qrcode.php

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

gh (二维码自动识别)

下面是用 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://www.makepic.com/qrcode.php'iv_req_type = if_http_request=>co_request_method_postit_form = lt_form ).
ls_form = value #( name = 'Referer' value = 'http://www.makepic.com/qrcode.php' ).
APPEND ls_form TO lt_header.
zcl_http_tool=>send_request( EXPORTING iv_url = 'http://www.makepic.com/mkqr.php?data=testforQRCode&level=M&size=6'iv_req_type = if_http_request=>co_request_method_getit_header = lt_headerIMPORTING ev_response = lv_code ).

复制代码

testforQRCode 对应生成的二维码：

testforQRCode (二维码自动识别)

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

zcl_http_tool 的代码在我的github上（因为用于 demo 用途，没有加对应的出错处理）

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

发布于: 2021 年 05 月 17 日阅读数: 410

原文链接:【http://xie.infoq.cn/article/eb26650532bcfa956378cf12b】。

Jerry Wang

关注

个人微信公众号：汪子熙 2017.12.03 加入

SAP成都研究院开发专家，SAP社区导师，SAP中国技术大使。

发布

暂无评论

创作场景

用 ABAP 生成二维码 QR Code

Jerry Wang

评论