SSRS中使用QRCoder生成二维码

Crow0176

已于 2024-06-13 16:31:13 修改

阅读量524

点赞数 4

分类专栏： SSRS 文章标签： SSRS报表 QRCode 二维码

于 2024-05-28 16:02:39 首次发布

本文链接：https://blog.csdn.net/crow_html5/article/details/139267677

版权

SSRS 专栏收录该内容

1 篇文章 0 订阅

订阅专栏

步骤

1.下载QRCoder.dll

下载地址：https://download.csdn.net/download/wjl7126180/89369398

2.使用gacutil.exe安装QRCoder.dll到GAC(Global Assembly Cache)

gacutil.exe是.NET Framework中的全局程序集缓存工具，如果没有安装.NET Framework，也可以直接从其他电脑复制gacutil.exe和它对应config文件到本机System32文件夹中。
gacutil.exe路径：C:\Program Files (x86)\Microsoft SDKs\Windows\v10.0A\bin\NETFX 4.8 Tools，其中NETFX 4.8 Tools根据.NET Framework版本会有变化。
在这里插入图片描述
安装之后需要验证C:\Windows\assembly或C:\Windows\assembly\GAC_MSIL下是否已经存在QRCoder。
另外，如果是在SSRS报表服务器上，可以直接复制QRCoder.dll到C:\Program Files\Microsoft SQL Server Reporting Services\SSRS\ReportServer\bin目录，不需要使用gacutil.exe安装。

3.在SSRS中调用QRCoder生成二维码

3.1 先在SSRS报表属性中添加QRCoder.dll引用
在这里插入图片描述
3.2 调用DLL方法生成二维码

    Public Function GetQRCodeByte(value1 As String) As Byte()
        Dim qrGenerator As QRCoder.QRCodeGenerator = New QRCoder.QRCodeGenerator()
        Dim QRCodeData As QRCoder.QRCodeData = qrGenerator.CreateQrCode(value1, QRCoder.QRCodeGenerator.ECCLevel.Q)
        Dim QRCode As QRCoder.BitmapByteQRCode = New QRCoder.BitmapByteQRCode(QRCodeData)
        Return QRCode.GetGraphic(20)
    End Function