Follow Me To get Health tip and bodybuilding
instagram:sayyedtanveer1410
To generate QR Code in asp.net VB lang.
On Default.aspx page just put IMG tag.
<img id="img" alt="Alternate Text" />
On Default.aspx.vb
Just Import MessagingToolkit.QRCode.Codec in namespace
Dim data As String = "codens.blogspot.com"
- Dim qrCodeEncoder As New QRCodeEncoder()
- qrCodeEncoder.QRCodeBackgroundColor = Color.White
- qrCodeEncoder.QRCodeForegroundColor = Color.Black
- qrCodeEncoder.QRCodeEncodeMode = qrCodeEncoder.ENCODE_MODE.[BYTE]
- Dim scale As Integer = Convert.ToInt16(1) 'Here we need to give size of Qr
- qrCodeEncoder.QRCodeScale = scale
- Dim version As Integer = Convert.ToInt16(0)
- qrCodeEncoder.QRCodeVersion = version
- qrCodeEncoder.QRCodeErrorCorrect = qrCodeEncoder.ERROR_CORRECTION.H
- QRImageName = "Qr_IMG.Gif"
- qrImagePath = System.Web.HttpContext.Current.Server.MapPath("~\" & ConfigurationManager.AppSettings("ImageFolder").ToString & "\ImagesNew\")
- Try
- If File.Exists(qrImagePath) Then
- File.Delete(qrImagePath)
- End If
- Catch generatedExceptionName As Exception
- Throw
- End Try
- Dim bimg As Bitmap = qrCodeEncoder.Encode(data)
- bimg.Save(qrImagePath, System.Drawing.Imaging.ImageFormat.Gif)
No comments:
Post a Comment