Créer qr codes

Télécharger le projet
Commenter

Description

Bon jour, je suis espagnol et je vous en prie, ne soyez trop critiques avec mon niveau de langue francaise.
J'ai trouvé une DLL (QRCodeLib.dll) qui permet créer des codes QR, et je vais ajouter un pétit programme qui l'utilise en VB6.
J'espère qui soie utile.

Source / Exemple : 


premièrement il faut déclarer la DLL:

Private Declare Sub FastQRCode Lib "QRCodeLib.dll" (ByVal Texto As String, ByVal filename As String)
Private Declare Function QRCodeLibVer Lib "QRCodeLib.dll" () As String

Je connais seulement ces deux parties, la première pour créer le QR code, et la deuxième pour montrer la version.
Et maintenant, il faut appeler la DLL avec un code comme ça:
'pour créer le fichier
FastQRCode Text1.Text, App.Path & "\QRCODE.bmp"
'pour charger le fichier dans un Picture
Set Picture1.Picture = LoadPicture(App.Path & "\QRCODE.bmp")
'pour montrer la version
MsgBox QRCodeLibVer

et c'est tout.
J'ajoute le code pour appeler aussi un programme "Zbar" qui permet de lire les codes QR avec la webcam et montrer la sortie dans un textbox multiline.
Merci pour tout ce que j'ai appri dans cet forum.
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.