lunes, 7 de diciembre de 2015

Crear un SlideShow con Bootstrap





Codigo:
_______________________

<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="UTF-8">
    <title>Slideshow</title>
    <link rel="stylesheet" href="css/bootstrap.min.css">
    <meta name="viewport" content="width=device-width, user-scalable=no, initial-scale=1.0, maximum-scale=1.0, minimum-scale=1.0">
</head>
<body>
    <div class="container">
        <br>

        <div class="col-md-12">
            <div id="carousel-1" class="carousel slide" data-ride="carousel">
                <!-- Indicadores -->
                <ol class="carousel-indicators">
                    <li data-target="#carousel-1" data-slide-to="0" class="active"></li>
                    <li data-target="#carousel-1" data-slide-to="1"></li>
                    <li data-target="#carousel-1" data-slide-to="2"></li>
                </ol>

                <!-- Contenedor de los slide -->
                <div class="carousel-inner" role="listbox">
                    <div class="item active">
                        <img src="http://lorempixel.com/1200/400/" class="img-responsive" alt="">
                        <div class="carousel-caption hidden-xs hidden-sm">
                            <h3>Este es nuestro Slide #1</h3>
                            <p>Lorem ipsum dolor sit amet.</p>
                        </div>
                    </div>

                    <div class="item">
                        <img src="http://lorempixel.com/1200/400/city/2" class="img-responsive" alt="">
                        <div class="carousel-caption hidden-xs hidden-sm">
                            <h3>Este es nuestro Slide #2</h3>
                            <p>Lorem ipsum dolor sit amet.</p>
                        </div>
                    </div>

                    <div class="item">
                        <img src="http://lorempixel.com/1200/400/city/1" class="img-responsive" alt="">
                        <div class="carousel-caption hidden-xs hidden-sm">
                            <h3>Este es nuestro Slide #3</h3>
                            <p>Lorem ipsum dolor sit amet.</p>
                        </div>
                    </div>
                </div>

                <!-- Controles -->
                <a href="#carousel-1" class="left carousel-control" role="button" data-slide="prev">
                    <span class="glyphicon glyphicon-chevron-left" aria-hidden="true"></span>
                    <span class="sr-only">Anterior</span>
                </a>

                <a href="#carousel-1" class="right carousel-control" role="button" data-slide="next">
                    <span class="glyphicon glyphicon-chevron-right" aria-hidden="true"></span>
                    <span class="sr-only">Siguiente</span>
                </a>

            </div>
        </div>
    </div>

    <script src="https://code.jquery.com/jquery-latest.js"></script>
    <script src="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.2/js/bootstrap.min.js"></script>
</body>
</html>

______________________________

Descargar
en No hay comentarios:
Etiquetas:

lunes, 2 de noviembre de 2015

Ejemplos de analisis FODA

Ejemplos de Analisis FODA en empresas


Como hemos visto, el análisis foda es una herramienta analítica que sirve para examinar las Fortalezas, Oportunidades, Debilidades y Amenazas de una empresa, organización, país, proceso, política, etc...

Para representarlo mejor, hemos escogido algunas empresas al azar para presentar el Análisis FODA y que usted pueda aplicar esta técnica en su propio negocio o proyecto.


Ejemplo: Análisis FODA de Coca-Cola

Ejemplo FODA Coca Cola

Fuerzas de Coca-Cola

  • Mayor cuota de mercado en todo el mundo en el campo de las bebidas no alcohólicas
  • Campañas de marketing y publicidad enormes
  • Mayor cadena de distribución de bebidas
  • Clientela fidelizada
  • Poder para negociar los precios con los proveedores
  • Fuerte responsabilidad social de la empresa

Oportunidades de Coca-Cola

  • Crecimiento en el consumo de agua embotellada
  • Crecimiento de la demanda de alimentos y bebidas saludables
  • Crecimiento en el consumo de bebidas no alcohólicas en los mercados emergentes
  • Expansión a través de adquisiciones

Debilidades de Coca-Cola

  • Concentración en la producción de bebidas carbonatadas
  • Portafolio de productos poco diversificado
  • Grandes deudas por adquisiciones
  • El fracaso de la introducción de nuevas marcas
  • Posesión de marcas que no aportan suficientes ingresos

Amenazas de Coca-Cola

  • Cambio en los hábitos de consumo
  • La escasez de agua
  • Dolar demasiado fuerte
  • Reglamentaciones para imprimir información que puede ser comprometedora en las etiquetas
  • Disminución de la utilidad bruta y neta
  • Competencia de las marcas de PepsiCo
  • Mercado de bebidas carbonatadas saturado

Principales competidores de Coca-Cola

  • PepsiCo
  • Dr Pepper Snapple Group
  • Nestlé
  • Cadbury Schweppes

Ejemplo: Análisis FODA de PSA (Peugeot Citroën)

Ejemplo FODA Peugeot Citroen

Fortalezas del Grupo PSA Peugeot Citroën

  • Primer fabricante de automóviles en Francia y segundo en Europa
  • Dos marcas que gozan de una gran reputación y notoriedad
  • Posibilidad de sinergias en la producción, investigación y desarrollo con fabricantes como GM, BMW y Mitsubishi
  • Actividad financiera del grupo muy rentable
  • Introducción de vehículos eléctricos e híbridos

Oportunidades del Grupo PSA Peugeot Citroën

  • Asociaciones establecidas para reducir los costos de producción, investigación y desarrollo
  • Establecimiento de alianzas para entrar en nuevos mercados
  • Mercado del automóvil en crecimiento en países emergentes
  • Gusto vivo por los vehículos híbridos

Debilidades del Grupo PSA Peugeot Citroën

  • Grupo poco conocido fuera de Europa
  • El Grupo PSA está en sobreproducción
  • Gama de productos muy orientada en los vehículos de nivel de entrada

Amenazas del Grupo PSA Peugeot Citroën

  • Competencia cada vez más fuerte
  • Desaceleración del mercado del automóvil en los países desarrollados
  • Aumento de precios de las materias primas
  • Aumento en los costos de financiamiento

Principales competidores del Grupo PSA Peugeot Citroën

  • Volkswagen
  • Renault - Nissan
  • Toyota
  • Fiat
  • Ford
en No hay comentarios:
Etiquetas:

Estrategia Empresarial: Cómo hacer un análisis FODA (SWOT)

en No hay comentarios:
Etiquetas:

Ejemplo de Análisis FODA Para Una Empresa, Persona, Profesionales y Emprendedores

en No hay comentarios:
Etiquetas:

Libro: Ingeniería de Software - Ian Sommerville 7a edición

Link: http://zeus.inf.ucv.cl/~bcrawford/Modelado%20UML/Ingenieria%20del%20Software%207ma.%20Ed.%20-%20Ian%20Sommerville.pdf
en No hay comentarios:
Etiquetas:

viernes, 9 de octubre de 2015

VB.NET - Windows Form - Random sin repetir

Codigo:

Public Class Form1
    Dim rnd As New Random
    Dim numero As Integer
    Dim arreglo(14) As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Limpiamos el listbox
        ListBox1.Items.Clear()
        'Vamos a generar 14 numeros aleatorios
        For i = 1 To 14
            'Generamos numero aleatorio, verificamos si ya fue generado previamente
            'De ser así volvemos a generarlo nuevamente, para esto usamos la funcion booleana Existe y le pasamos
            'como parámetro de entrada el número aleatorio generado. Por lo tanto no saldrá de este ciclo mientras
            'el número se encuentre repetido dentro del arreglo que definimos para estos efectos
            Do
                numero = rnd.Next(1, 33) 'Numero aleatorio comprendido entre 1 y 32
            Loop While (Existe(numero) = True)

            'Al llegar a este punto ya tenemos la certeza que el numero no esta repetido
            'por lo tanto lo almacenamos en el arreglo y tambien lo mostramos en el listbox
            arreglo(i) = numero
            ListBox1.Items.Add(numero)
        Next
    End Sub

    Function Existe(ByVal numero As Integer) As Boolean
        'Se recorre el arreglo para verificar si el numero generado existe o no
        For i = 0 To arreglo.Length - 1
            If numero = arreglo(i) Then
                Return True 'El numero existe
            End If
        Next
        Return False 'Retornará falso si no encuentra el numero dentro del arreglo
    End Function

End Class

_________________________________

==>DESCARGAR<==
en 1 comentario:
Etiquetas:

sábado, 3 de octubre de 2015

VB.NET - Windows Form - Juego "Tic tac toe"

Hecho en Visual Studio 2010

Código:
___________________________________

Public Class Form1
    Dim i As Integer = 0

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If i Mod 2 = 0 Then
            Button1.Text = "0"
        Else
            Button1.Text = "X"
        End If

        If Button1.Text = Button2.Text And Button1.Text = Button3.Text And Button2.Text = Button3.Text Then
            MsgBox("El ganador es: " & Button1.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button1.Text = Button4.Text And Button1.Text = Button7.Text And Button4.Text = Button7.Text Then
            MsgBox("El ganador es: " & Button1.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button1.Text = Button5.Text And Button1.Text = Button9.Text And Button5.Text = Button9.Text Then
            MsgBox("El ganador es: " & Button1.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button1.Enabled = False
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If i Mod 2 = 0 Then
            Button2.Text = "0"
        Else
            Button2.Text = "X"
        End If

        If Button2.Text = Button1.Text And Button2.Text = Button3.Text And Button1.Text = Button3.Text Then
            MsgBox("El ganador es: " & Button2.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button2.Text = Button5.Text And Button2.Text = Button8.Text And Button5.Text = Button8.Text Then
            MsgBox("El ganador es: " & Button2.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button2.Enabled = False
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        If i Mod 2 = 0 Then
            Button3.Text = "0"
        Else
            Button3.Text = "X"
        End If

        If Button1.Text = Button2.Text And Button1.Text = Button3.Text And Button2.Text = Button3.Text Then
            MsgBox("El ganador es: " & Button3.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button3.Text = Button5.Text And Button3.Text = Button7.Text And Button5.Text = Button7.Text Then
            MsgBox("El ganador es: " & Button3.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button3.Text = Button6.Text And Button3.Text = Button9.Text And Button6.Text = Button9.Text Then
            MsgBox("El ganador es: " & Button3.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button3.Enabled = False
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        If i Mod 2 = 0 Then
            Button4.Text = "0"
        Else
            Button4.Text = "X"
        End If

        If Button4.Text = Button1.Text And Button4.Text = Button7.Text And Button1.Text = Button7.Text Then
            MsgBox("El ganador es: " & Button4.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button4.Text = Button5.Text And Button4.Text = Button6.Text And Button5.Text = Button6.Text Then
            MsgBox("El ganador es: " & Button4.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button4.Enabled = False
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        If i Mod 2 = 0 Then
            Button5.Text = "0"
        Else
            Button5.Text = "X"
        End If

        If Button5.Text = Button2.Text And Button5.Text = Button8.Text And Button2.Text = Button8.Text Then
            MsgBox("El ganador es: " & Button5.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button5.Text = Button4.Text And Button5.Text = Button6.Text And Button4.Text = Button6.Text Then
            MsgBox("El ganador es: " & Button5.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button5.Text = Button1.Text And Button5.Text = Button9.Text And Button1.Text = Button9.Text Then
            MsgBox("El ganador es: " & Button5.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button5.Text = Button3.Text And Button5.Text = Button7.Text And Button3.Text = Button7.Text Then
            MsgBox("El ganador es: " & Button5.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button5.Enabled = False
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        If i Mod 2 = 0 Then
            Button6.Text = "0"
        Else
            Button6.Text = "X"
        End If

        If Button6.Text = Button3.Text And Button6.Text = Button9.Text And Button3.Text = Button9.Text Then
            MsgBox("El ganador es: " & Button6.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button6.Text = Button5.Text And Button6.Text = Button4.Text And Button4.Text = Button5.Text Then
            MsgBox("El ganador es: " & Button6.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button6.Enabled = False
    End Sub

    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        If i Mod 2 = 0 Then
            Button7.Text = "0"
        Else
            Button7.Text = "X"
        End If

        If Button7.Text = Button1.Text And Button7.Text = Button4.Text And Button4.Text = Button1.Text Then
            MsgBox("El ganador es: " & Button7.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button7.Text = Button5.Text And Button7.Text = Button3.Text And Button5.Text = Button3.Text Then
            MsgBox("El ganador es: " & Button7.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button7.Text = Button8.Text And Button7.Text = Button9.Text And Button8.Text = Button9.Text Then
            MsgBox("El ganador es: " & Button7.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button7.Enabled = False
    End Sub

    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
        If i Mod 2 = 0 Then
            Button8.Text = "0"
        Else
            Button8.Text = "X"
        End If

        If Button8.Text = Button2.Text And Button8.Text = Button5.Text And Button2.Text = Button5.Text Then
            MsgBox("El ganador es: " & Button8.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button8.Text = Button7.Text And Button8.Text = Button9.Text And Button7.Text = Button9.Text Then
            MsgBox("El ganador es: " & Button8.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button8.Enabled = False
    End Sub

    Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
        If i Mod 2 = 0 Then
            Button9.Text = "0"
        Else
            Button9.Text = "X"
        End If

        If Button9.Text = Button8.Text And Button9.Text = Button7.Text And Button7.Text = Button8.Text Then
            MsgBox("El ganador es: " & Button9.Text)
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button9.Text = Button5.Text And Button9.Text = Button1.Text And Button5.Text = Button1.Text Then
            MsgBox("El ganador es: " & Button9.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        If Button9.Text = Button6.Text And Button9.Text = Button3.Text And Button6.Text = Button3.Text Then
            MsgBox("El ganador es: " & Button9.Text)

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
            Button4.Enabled = False
            Button5.Enabled = False
            Button6.Enabled = False
            Button7.Enabled = False
            Button8.Enabled = False
            Button9.Enabled = False
        End If

        i = i + 1
        Button9.Enabled = False
    End Sub

    Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        Application.Restart()
    End Sub
End Class

_________________________________________


==>DESCARGAR<==
en No hay comentarios:
Etiquetas:
Suscribirse a: Entradas (Atom)

Cambiar imagen de fondo con JQuery

<!DOCTYPE html> <html lang="en"> <head>     <meta charset="UTF-8">     <title>Cambiar ...