Modificacion extension BEgallery

by Ollydbg 2. February 2011 21:10

Test de la extensión BEgallery modificada

Los cambios en la extensión son:

  • Los thumbnails se generan en función de la altura y no del ancho. Así se consigue una "previsualización" como en las imagenes del google
  • En la extensión original solo se podían incluir archivos JPG. Ahora es posible incluir archivos BMP, GIF, PNG en la galería. Todos los archivos que se suben se guardan en la carpeta \gallery_files en formato JPG. La conversión se realiza de forma automática al agregar las imagenes a la librería
  • La versión del script ( http://highslide.com ) que venía originalmente con la extensión era la 4.1.5 Con esta versión no se visualizaba la barra de navegación en Firefox y en IExplorer el fondo se mostraba totalmente negro cuando se estaba viendo la galería, en lugar de verse "semi-translucido". Además en ambos navegadores no se oscurecía toda la pantalla (había una zona en la parte izquierda que no quedaba oscurecida). Con la versión 4.1.9 de la librería HS funciona correctamente, tanto en Firefox (ahora si que se ve la barra de herramientas cuando se está visualizando la librería) y en IExplorer ya se muesrta el fondo "semi-translucido" y se oscurece toda la pantalla.

Próximas modificaciones:

  • Intentar coseguir tener subcapertas por galería

imagen.pngextensionraradecojones.y.mas.rara.que.un.perro.verde (62,32 kb)

Tags: ,

BlogEngine.NET

Testing post

by Ollydbg 29. January 2011 20:47

Test de plug-in código fuente:

#Region "Lectura"
    ''' <summary>
    ''' Leer un fichero de texto plano
    ''' </summary>
    ''' <param name="Fichero">Nombre y ruta del fichero</param>
    ''' <returns>string con los datos del fichero</returns>
    ''' <remarks></remarks>
    Public Function LeerFicheroTexto(ByVal Fichero As String) As String

        Try
            Dim readBytes() As Byte
            Dim oFS As FileStream

            oFS = New FileStream(Fichero, FileMode.Open, FileAccess.Read, FileShare.Read)

            ReDim readBytes(oFS.Length - 1)

            oFS.Read(readBytes, 0, oFS.Length)
            oFS.Close()

            Dim [unicode] As Encoding = Encoding.Default

            Return [unicode].GetChars(readBytes, 0, [unicode].GetCharCount(readBytes))

        Catch ex As System.Exception
            Throw New System.Exception("ModFicherosTexto::LeerFicheroTexto():" & vbCrLf & ex.Message)
        End Try

    End Function
#End Region

 

Cabecera

Lista:

  • uno
  • dos
  • tres

Lista

  1. uno
  2. dos
  3. tres

Video Youtube:

Video Vimeo:

Test Extension MP3 Player:
MP3 "pequeño":

MP3 "Grande":

MediaExtension

Archivo en el hosting:

Tutorial36.zip (11,75 kb)

PingScanner.zip (9,03 kb)

Tutorial37.zip (16,32 kb)

Imagen en el hosting:

Imagen html (hotlinking):

Firefall Logo

End Of Transmision

Tags: , , ,

Pruebas

TextBox

RecentPosts

Calendar

<<  June 2017  >>
MoTuWeThFrSaSu
2930311234
567891011
12131415161718
19202122232425
262728293012
3456789

View posts in large calendar

Month List