將轉成base64的圖片 再轉成圖片

    Dim file_path As String = System.Configuration.ConfigurationManager.AppSettings("file_path") & "images\"
    Dim ResizedImg As System.Drawing.Image = System.Drawing.Image.FromStream(Base64ToImage(ib))
    ResizedImg.Save(file_path & saveid & ".jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

    ResizedImg.Dispose()
    context.Response.End()



    Public Function Base64ToImage(ByVal base64String As String) As MemoryStream
        ' Convert Base64 String to byte[]]
        Dim imageBytes() As Byte = Convert.FromBase64String(base64String)
        Dim ms As MemoryStream = New MemoryStream(imageBytes, 0, imageBytes.Length)
        
        Return ms
        
    End Function