AX2012 生成QRCode 导出到excel模板/保存为图片

保存为图片

Microsoft.Dynamics.QRCode.Encoder   qrCode;
    System.String                       netString;
    str                                 tempFileName;
    System.Drawing.Bitmap               netBitmap;
    Bitmap                              imageQR;
    FileIOPermission    perm;
    BinData             binData;
    container           imageContainer;
    Image image;
    ;

    netString = "KRAIBURG";
    qrCode = new Microsoft.Dynamics.QRCode.Encoder();
    netBitmap = qrCode.Encode(netString); //encode the string as Bitmap can be used already

    tempFileName = qrCode.GetTempFile(netString); //to get the QR temporary file

    perm = new FileIOPermission(tempFileName,'r');
    perm.assert();
    binData = new binData();
    binData.loadFile(tempFileName);    
    imageContainer = binData.getData(); //get the QR code image put inside container so can be stored inside database for storing or reporting purpose

    image = new Image();
    image.setData(imageContainer);
    image.saveImage('G:\1223.png',ImageSaveType::PNG);
    System.IO.File::Delete(tempFileName);

    CodeAccessPermission::revertAssert();

保存到已存在的excle模板中

  Microsoft.Dynamics.QRCode.Encoder   qrCode;
    System.String                       netString;
    System.Drawing.Bitmap               netBitmap;
    FileIOPermission    perm;
    COM comment,Shape
    ;

    netString = "KRAIBURG";
    qrCode = new Microsoft.Dynamics.QRCode.Encoder();
    netBitmap = qrCode.Encode(netString); //encode the string as Bitmap can be used already
//
//方式有两种：
//1.这个方式不能设置位置：
    System.Windows.Forms.Clipboard::SetImage(netBitmap);
    worksheet.cells().item(2,9); // worksheet :类 SysExcelWorksheet  worksheet;
    worksheet.pasteSpecial();
    CodeAccessPermission::revertAssert();
//2.这个设置坐标点和大小：
    comment =  worksheet.comObject();
    shape    = comment.Shapes();
    shape.AddPicture(tempFileName,0,1,700,700,180,180);