Autor Tema: Obtener Caption De Una Foto (Leído 1630 veces)

cuajoa · « **en:** Lunes 3 de Septiembre de 2007, 16:19 »

Hola como andan? Mi duda surge porque quiero saber si es posible obtener el caption de una foto mediante codigo, porque estoy realizando un programita que genera galería y pone epígrafes a las fotos y algunas lo traen en el caption, y eso me solucionaría mucho las cosas y las haría mucho mas fáciles para generar dicha galería.

estube investigando y no encontré nada, asique el que me puede ayudar se lo agradeceré.

Saludos!

cuajoa

Ya lo tengo, gracias igual, aca les dejo la función que lo hace.

Saludos

Código: Text

 
    Shared Function ObtenerCaption(ByVal archivo As String) As String
        Dim caption As String
        Dim ascii As New System.Text.ASCIIEncoding()
        Dim foto As New Bitmap(archivo)
 
        Try
            Dim propItem As Imaging.PropertyItem = foto.GetPropertyItem(270)
            caption = ascii.GetString(propItem.Value)
        Catch e As Exception
            caption = &#34;&#34;
        End Try
        Return caption
    End Function
 
 

lencho

perdon por la pregunta, peroo. el caption en una imagen cual es ???. El nombre del archivo o un texto escrito en la imagen ??.

no lo probe por que no tengo en este momento donde hacerlo.

BYTE.

cuajoa

El captio viene a ser la descripción que trae la imágen, que si tenes el photoshop lo podes ver en la opcion Información del archivo, que ahi esta el copyright, el autor, etc.

Lo único es que los acéntos no los pasa bien y los pone como ??.

saludos!

lencho

ah weno. gracias. NO se me paso por la cabeza que era a eso lo que te referias.

BYTE.

SoloCodigo

Autor Tema: Obtener Caption De Una Foto (Leído 1630 veces)

cuajoa

Obtener Caption De Una Foto

cuajoa

Re: Obtener Caption De Una Foto

lencho

Re: Obtener Caption De Una Foto

cuajoa

Re: Obtener Caption De Una Foto

lencho

Re: Obtener Caption De Una Foto