CreateQRCode

Syntax

CreateQRCode[$](InputData[, ModuleSize])

Description

If successful, returns the filename of a created QR code image file (.jpg), for display of printing usage.

Parameter	Description
InputData	Variable text. Can be any text or URL.. With very long data,the QR image will automatically grow in size.
ModuleSize	Optional. Sets the pixel size for each module (black square spot). Use 1 for very small images. Default value = 2.

Note: keep in mind that you need to remove the .jpg file manually after usage. It is stored in your personal folder.

Example (try scan this with your mobile phone):

Example

Sub Main
 
Dim myFile As String, dhnd As Integer
 
myFile = CreateQRCode("This is a valid text, to be displayed when scanned", 3)
 
dhnd = RTF.CreateHandle()
If RTF.LoadFile(dhnd, "O:\AdminSQL\Sjablonen\mijnsjabloon.rtf") Then
 
	RTF.ReplaceWordByImage(dhnd, "@MYQRCODE", myFile)
	RTF.SaveFile dhnd, "O:\AdminSQL\Sjablonen\mijntest.rtf"
 
End If
 
RTF.CloseHandle dhnd
Kill myFile
 
SQL.OpenTradiumDocument "O:\AdminSQL\Sjablonen\mijntest.rtf"
 
End Sub

Contents of the template document in the example:

Contents of the output document: