Averiguar atributos de un fichero gif

Hola Asier,

la forma más rápida que se me ocurre es así:

Dim bm As Bitmap = Image.FromFile("c:\Prueba.gif")
MessageBox.Show(bm.Width & "-" & bm.Height)
bm = Nothing

Espero que esto te sirva.

Otra posibilidad es leer la cabecera del fichero GIF y tratar su información.
Yo lo hice una vez con imágenes muy pesadas, pero eso fue en C y VB y no en
VB.NET, pero el tratamiento es igual en cualquier lenguaje.

Un saludo,

Jorge Serrano Pérez
MVP VB.NET

"Asier" wrote:

Hola grupo:

¿Como puedo averiguar los atributos de una imagen que tengo en
c:\Prueba.gif, concretamente su tamaño en pixels, es decir, 200x400, etc?

Gracias,

Asier

Hola Jorge,

Gracias por tu ayuda. ¿y si te lo pongo un poco más dificil? :)) Imagina
que la ruta de la foto es http://./Prueba.gif ?? Lo he probado y me ha
fallado.
Ojala lo sepas porque me ayudarias bastante,

Gracias,

Asier

"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:

Hola Asier,

la forma más rápida que se me ocurre es así:

Dim bm As Bitmap = Image.FromFile("c:\Prueba.gif")
MessageBox.Show(bm.Width & "-" & bm.Height)
bm = Nothing

Espero que esto te sirva.

Otra posibilidad es leer la cabecera del fichero GIF y tratar su

información.

Yo lo hice una vez con imágenes muy pesadas, pero eso fue en C y VB y no

en

VB.NET, pero el tratamiento es igual en cualquier lenguaje.

Un saludo,

Jorge Serrano Pérez
MVP VB.NET

"Asier" wrote:

> Hola grupo:
>
> ¿Como puedo averiguar los atributos de una imagen que tengo en
> c:\Prueba.gif, concretamente su tamaño en pixels, es decir, 200x400,

etc?

>
> Gracias,
>
> Asier
>
>
>
>

Hola de nuevo Asier,

ahora está más claro... para ASP.NET difiere un poco el tratamiento.
Deberás utilizar entonces el siguiente código:

Dim webReq As System.Net.WebRequest =
System.Net.WebRequest.Create("http://localhost/WebApplication1/Prueba.gif")
Dim webResp As System.Net.WebResponse = webReq.GetResponse()
Dim webStream As System.IO.Stream = webResp.GetResponseStream()
Dim bm As New Bitmap(webStream)
Response.Write(bm.Width & "-" & bm.Height)
bm = Nothing

Espero que te sirva.

Un saludo,

Jorge Serrano Pérez
MVP VB.NET


"Asier" wrote:

Hola Jorge,

Gracias por tu ayuda. ¿y si te lo pongo un poco más dificil? :)) Imagina
que la ruta de la foto es http://./Prueba.gif ?? Lo he probado y me ha
fallado.
Ojala lo sepas porque me ayudarias bastante,

Gracias,

Asier

"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:
> Hola Asier,
>
> la forma más rápida que se me ocurre es así:
>
> Dim bm As Bitmap = Image.FromFile("c:\Prueba.gif")
> MessageBox.Show(bm.Width & "-" & bm.Height)
> bm = Nothing
>
> Espero que esto te sirva.
>
> Otra posibilidad es leer la cabecera del fichero GIF y tratar su
información.
> Yo lo hice una vez con imágenes muy pesadas, pero eso fue en C y VB y no
en
> VB.NET, pero el tratamiento es igual en cualquier lenguaje.
>
> Un saludo,
>
> Jorge Serrano Pérez
> MVP VB.NET
>
> "Asier" wrote:
>
> > Hola grupo:
> >
> > ¿Como puedo averiguar los atributos de una imagen que tengo en
> > c:\Prueba.gif, concretamente su tamaño en pixels, es decir, 200x400,
etc?
> >
> > Gracias,
> >
> > Asier
> >
> >
> >
> >
>

Hola Jorge,

Perfecto. Gracias

Saludos,

Asier
"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:

Hola de nuevo Asier,

ahora está más claro... para ASP.NET difiere un poco el tratamiento.
Deberás utilizar entonces el siguiente código:

Dim webReq As System.Net.WebRequest >

System.Net.WebRequest.Create("http://localhost/WebApplication1/Prueba.gif")

Dim webResp As System.Net.WebResponse = webReq.GetResponse()
Dim webStream As System.IO.Stream = webResp.GetResponseStream()
Dim bm As New Bitmap(webStream)
Response.Write(bm.Width & "-" & bm.Height)
bm = Nothing

Espero que te sirva.

Un saludo,

Jorge Serrano Pérez
MVP VB.NET


"Asier" wrote:

> Hola Jorge,
>
> Gracias por tu ayuda. ¿y si te lo pongo un poco más dificil? :))

Imagina

> que la ruta de la foto es http://./Prueba.gif ?? Lo he probado y me

ha

> fallado.
> Ojala lo sepas porque me ayudarias bastante,
>
> Gracias,
>
> Asier
>
> "Jorge Serrano [MVP VB]"
>

escribió

> en el mensaje news:
> > Hola Asier,
> >
> > la forma más rápida que se me ocurre es así:
> >
> > Dim bm As Bitmap = Image.FromFile("c:\Prueba.gif")
> > MessageBox.Show(bm.Width & "-" & bm.Height)
> > bm = Nothing
> >
> > Espero que esto te sirva.
> >
> > Otra posibilidad es leer la cabecera del fichero GIF y tratar su
> información.
> > Yo lo hice una vez con imágenes muy pesadas, pero eso fue en C y VB y

no

> en
> > VB.NET, pero el tratamiento es igual en cualquier lenguaje.
> >
> > Un saludo,
> >
> > Jorge Serrano Pérez
> > MVP VB.NET
> >
> > "Asier" wrote:
> >
> > > Hola grupo:
> > >
> > > ¿Como puedo averiguar los atributos de una imagen que tengo en
> > > c:\Prueba.gif, concretamente su tamaño en pixels, es decir, 200x400,
> etc?
> > >
> > > Gracias,
> > >
> > > Asier
> > >
> > >
> > >
> > >
> >
>
>
>
>