Android Question Read QR Codes and store it in a variable - reg.

[beelze69]

Hi !

I have a desktop application that generates a QRCode.

For example:

Suppose my application generates the string '1|Erel|Israel' as a QRCODE.

I take a print of this and stick it to some object.

[Here '|' is the field delimiter]. The values are for fields PERSON_ID,PERSON_NAME,COUNTRY

Now I want to develop a b4A application which will scan this printed QRCODE and store the string in a VARIABLE
so that I can extract the individual field data values and store in database/perform searches etc.

Please help.

Thanks.

 

[TILogistic]

Suppose my application generates the string '1|Erel|Israel' as a QRCODE.

1. Generate a json with the variables (JSONGenerator)

    Dim JSONGenerator As JSONGenerator
    JSONGenerator.Initialize(CreateMap("PERSON_ID": "1", "PERSON_NAME": "Erel","COUNTRY": "Israel"))
    Dim Data As String = JSONGenerator.ToPrettyString(2)

{
"PERSON_ID": "1",
"PERSON_NAME": "Erel",
"COUNTRY": "Israel"
}

2. Generate a QR Image with the JSon

[B4X] QRGenerator - Cross platform QR code generator

QRGenerator is a class that generates QR codes. It is written in B4X and it is compatible with B4A, B4i and B4J. iPhone default camera app recognizing the QR code displayed in a B4A app: Can create codes made of up to 2953 bytes. It depends on XUI library and B4XCollections v1.50+. It uses...

www.b4x.com

3. Scan the QR image and get the json string

[B4X] [B4XPages] Barcode Reader

B4A + B4i barcode reader. Don't miss: - #PlistExtra in B4i. - Manifest code + #AdditionalJar in B4A Depends on BCToast: https://www.b4x.com/android/forum/threads/b4x-bctoast-cross-platform-custom-toast-message.111046/#content (BCToast will be an internal library in the near future) While the...

www.b4x.com

<Text> = QR data

Dim parser As JSONParser
parser.Initialize(<text>)
Dim root As Map = parser.NextObject
Dim PERSON_NAME As String = root.Get("PERSON_NAME")
Dim COUNTRY As String = root.Get("COUNTRY")
Dim PERSON_ID As String = root.Get("PERSON_ID")

Tools:

http://www.b4x.com:51042/json/index.html

 

[TILogistic]

If you already have your application that generates the QR image, I recommend that you generate the QR image with data in Json format

QR reader.

[B4X] [B4XPages] Barcode Reader

B4A + B4i barcode reader. Don't miss: - #PlistExtra in B4i. - Manifest code + #AdditionalJar in B4A Depends on BCToast: https://www.b4x.com/android/forum/threads/b4x-bctoast-cross-platform-custom-toast-message.111046/#content (BCToast will be an internal library in the near future) While the...

www.b4x.com

Dim parser As JSONParser
parser.Initialize(<text>)
Dim root As Map = parser.NextObject
Dim PERSON_NAME As String = root.Get("PERSON_NAME")
Dim COUNTRY As String = root.Get("COUNTRY")
Dim PERSON_ID As String = root.Get("PERSON_ID")

Other:
Search: https://www.b4x.com/android/forum/pages/results/?query=QR+reader.