Como fazer deploy automático com Bitbucket

Neste artigo, vou mostrar como fazer um deploy automático de um site em um servidor, no meu caso na DreamHost, usando a funcionalidade Webhocks do Bitbucket.

Como funciona

  • Você faz commit e push para seu repositório no Bitbucket
  • O Bitbucket fará um POST na URL que você configurou de acordo com algumas regras
  • Esse POST acionará o script de deploy que fará pull das alterações em seu servidor

Continue lendo “Como fazer deploy automático com Bitbucket”

SafeFrame

Iframe costuma ser uma boa solução quando se precisa incluir algum conteúdo de terceiros em uma página, isolando completamente o código inserido e garantindo a segurança das informações ali contidas. Por outro lado, ele não permite interações entre o código inserido e a página, ao contrário do SafeFrame.

SafeFrame é uma API Javascript que permite uma comunicação segura entre um conteúdo externo e uma página de maneira segura. Com ele é possível, por exemplo, inserir um anúncio que expanda em resposta a uma interação do usuário.

Para saber mais:

  1. http://www.iab.net/safeframe

Função para retirar acentos e caracteres especiais no Excel

A função a seguir, programada em VBA para ser utilizada no Excel, serve para retirar quaisquer acentos ou caracteres especiais de uma célula.

Function Acento(caract)

    'Acentos e caracteres especiais que serão buscados na string
    'Você pode definir outros caracteres nessa variável, mas
    ' precisará também colocar a letra correspondente em codiB
    codiA = "àáâãäèéêëìíîïòóôõöùúûüÀÁÂÃÄÈÉÊËÌÍÎÒÓÔÕÖÙÚÛÜçÇñÑ"
    
    'Letras correspondentes para substituição
    codiB = "aaaaaeeeeiiiiooooouuuuAAAAAEEEEIIIOOOOOUUUUcCnN"
    
    'Armazena em temp a string recebida
    temp = caract
    
    'Loop que irá de andará a string letra a letra
    For i = 1 To Len(temp)
    
        'InStr buscará se a letra indice i de temp pertence a
        ' codiA e se existir retornará a posição dela
        p = InStr(codiA, Mid(temp, i, 1))
        
        'Substitui a letra de indice i em codiA pela sua
        ' correspondente em codiB
        If p > 0 Then Mid(temp, i, 1) = Mid(codiB, p, 1)
    Next
    
    'Retorna a nova string
    Acento = temp
    
End Function

Para usá-la, no Excel vá em Desenvolvedor > Visual Basic e em seguida em Inserir > Módulo. Lá, cole o código acima e salve o módulo.

Feito isso, agora é possível usar “Acentos(caract)” como uma função qualquer do Excel usando a sintaxe =Acentos(CELULA), como por exemplo: