Buen dia.
Tengo este codigo el cual me permite Generar un CodigoQr en imagen y visualizarla en un Imagen, Pero ahora quiero guardar dicha Imagen en una Carpeta del Servidor con el nombre especificado,
Dim qrGenerador As New QRCodeGenerator
Dim qrCodeData As QRCodeData = qrGenerador.CreateQrCode("Hola Mundo", QRCodeGenerator.ECCLevel.Q)
Dim qrCode As New QRCode(qrCodeData)
Dim qrCodeImage As Bitmap = qrCode.GetGraphic(20)
Dim ms As New MemoryStream()
'qrCodeImage.Save(ms, System.Drawing.Imaging.ImageFormat.Png)
qrCodeImage.Save(ms, System.Drawing.Imaging.ImageFormat.Png)
Image1.Height = 250
Image1.Width = 250
Dim byteImage As Byte() = ms.ToArray()
Image1.ImageUrl = "data:image/png;base64," + Convert.ToBase64String(byteImage)