none
Imagen Base64 Guardarla RRS feed

  • Pregunta

  • 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)

    viernes, 17 de enero de 2020 16:09

Todas las respuestas

  • Hola JIvann

     

    Gracias por levantar tu consulta en los foros de MSDN. Con respecto a la misma, te comparto a continuación el siguiente enlace que contiene un documento oficial con ejemplos sobre el tema que mencionas

     

    https://docs.microsoft.com/es-es/dotnet/api/system.drawing.image.save?view=netframework-4.8

     

    Seguimos buscando una mejor solución a tu consulta

    Gracias por usar los foros de MSDN.

     

    Diana Acuña

     ____

     

    Por favor recuerde "Marcar como respuesta" las respuestas que hayan resuelto su problema, es una forma común de reconocer a aquellos que han ayudado, y hace que sea más fácil para los otros visitantes encontrar la solución más tarde. 

     

    Microsoft ofrece este servicio de forma gratuita, con la finalidad de ayudar a los usuarios y la ampliación de la base de datos de conocimientos relacionados con los productos y tecnologías de Microsoft.  

     

    Este contenido es proporcionado "tal cual" y no implica ninguna responsabilidad de parte de Microsoft.

    martes, 21 de enero de 2020 22:14
    Moderador
  • hola

    si tienes el byte array de la imagen solo debes usar el

    File.WriteAllBytes()

    Para poner la imagen en una carpeta

    Pero la ruta debes obtenerla de forma relativa al website

    Dim imgPath = Server.MapPath("~/imagenes")

    Dim imgFullPath = Path.Combine(imgPath, "nombreImg.png") File.WriteAllBytes(imgFullPath, byteImage)



    saludos


    Leandro Tuttini

    Blog
    MVP Profile
    Buenos Aires
    Argentina


    martes, 21 de enero de 2020 22:25