
30/07/2007, 10:20
|
| | Fecha de Ingreso: mayo-2006 Ubicación: Bilbo
Mensajes: 76
Antigüedad: 18 años, 8 meses Puntos: 0 | |
Re: Convertir un .pdf a .jpg Hola chapulin!
Yo tenia un problema similar pero tenia q convertir .tif a jpg, gif o algo similar.
No se si valdra para tu caso ya que el pdf no es una imagen como el tif pero por si te puede servir de ayuda o darte alguna pista para encontrar la solucion te pongo la funcion.
Como parametro de entrada yo le paso el path donde tengo guardado el .tif y la funcion lo coge, lo combierte y me lo guarda ya en el formato q necesito.
Aqui te la dejo.
Public Function ImageToByte(ByVal nombreImagen As String)
Dim nombreImagenSinExtension = nombreImagen.Substring(0, nombreImagen.IndexOf("."))
Dim pImagen As System.Drawing.Image = Nothing
Dim pathImagen = "C:\Documents and Settings\u900os16\Mis documentos\Sandra\VerificacionPH\ImagenT"
Dim imagen = pathImagen + "\" + nombreImagen
Dim PathGuardar = "C:\Documents and Settings\u900os16\Mis documentos\Sandra\VerificacionPH\ImagenJ\" + nombreImagenSinExtension + ".png"
Dim mImage = Nothing
Try
pImagen = System.Drawing.Image.FromFile(imagen)
pImagen.Save(PathGuardar, System.Drawing.Imaging.ImageFormat.Png)
Catch ex As Exception
End Try
End Function |