Propósito

✔ Programação GLOBAL® - Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog devem ser tratados como consultoria freelance. Queiram contatar-nos: brazilsalesforceeffectiveness@gmail.com | ESTE BLOG NÃO SE RESPONSABILIZA POR QUAISQUER DANOS PROVENIENTES DO USO DOS CÓDIGOS AQUI POSTADOS EM APLICAÇÕES PESSOAIS OU DE TERCEIROS.

.: Vitrine

Carregando artigos...

Views

Mostrando postagens com marcador Internet Explorer. Mostrar todas as postagens
Mostrando postagens com marcador Internet Explorer. Mostrar todas as postagens

O que é o Microsoft Azure?


O Microsoft Azure é uma coleção crescente de serviços de nuvem integrados que os desenvolvedores e os profissionais de TI usam para criar, implantar e gerenciar aplicativos por toda a nossa rede global de datacenters. Com o Azure, você tem a liberdade para criar e implantar o que deseja usando as ferramentas, os aplicativos e as estruturas de sua escolha.

A Microsoft lançou o Windows Azure como uma nova plataforma que possibilitará aos desenvolvedores criarem sistemas totalmente virtualizados, sem a necessidade de grandes estruturas físicas para mantê-los. Isso é perfeito para o nível em que estamos de evolução, pois a expressão tempo é dinheiro nunca teve tanta relevância.

Nenhuma empresa quer — ou pode — mais perder tanto tempo com a manutenção de seus sistemas de informação, principalmente as de tecnologia, pois isso é simplesmente queimar dinheiro. Tendo isso em mente, gigantes como a Microsoft, Google e IBM focam seus investimentos cada vez mais em plataformas online, como o Windows Azure.

Mas afinal, o que é esse tal de Azure?

Em termos simples, o Azure pode ser definido como um “sistema operacional online”. Os desenvolvedores de programas poderão escrever seus sistemas utilizando as ferramentas fornecidas pelo Azure e hospedá-los nas redes corporativas, ou mesmo na web. Os usuários acessariam as aplicações utilizando somente o Internet Explorer. Ou seja, sem a necessidade de instalação local de qualquer programa adicional.


Para nós, usuários finais, o Azure e a computação em nuvem representam uma revolução extremamente significativa, pois ao invés de nos preocuparmos tanto com a estabilidade do Windows devido à grande quantidade de programas instalados, poderemos nos dedicar mais a atividades realmente importantes. Ou seja, assim como no meio corporativo, teremos que nos preocupar menos com manutenção, o que deixará mais tempo livre para atividades mais importantes, ou até mais divertidas.



Com as futuras aplicações desenvolvidas para o Azure, o usuário final terá mais tempo para focar em atividades realmente produtivas e até mesmo em seu próprio lazer. Gerenciar seus arquivos de mídia, como fotos e músicas, fazer pesquisas e trabalhar em ambientes colaborativos serão tarefas mais simples e corriqueiras.

O que melhora para os desenvolvedores?

Tudo! Imagine que você é um pequeno empresário e tem uma ideia revolucionária, que o levará a construir um império. Serão necessários investimentos, empréstimos e correr do fantasma da falência. Isso deixa de ser verdade com o Azure, pois não será necessário que empresários e desenvolvedores saiam de casa e seus planos precisarão de um mínimo de estrutura física para começarem a caminhar.


Por que não usar outro império para erguer o seu? O Windows Azure reduzirá o seu custo com infra-estrutura, para que você invista no que realmente importa, que é o desenvolvimento de sua ideia. Em síntese, o Azure e a computação em nuvem acabarão com boa parte do seu trabalho braçal e precisarão de muito menos dinheiro para a concretização do seu projeto.



Se você quiser obter informações mais detalhadas sobre o Windows Azure, suas características e tecnologias suportadas, acesse o site oficial do produto, clicando aqui. *O site é em inglês.



Suíte Tecnológica da Microsoft:


Envie seus comentários e sugestões e compartilhe este artigo! 
⬛◼◾▪ Social Media ▪◾◼⬛
• FACEBOOK • TWITTER • INSTAGRAM • TUMBLR • GOOGLE+ • LINKEDIN • PINTEREST

⬛◼◾▪ Blogs ▪◾◼⬛ 


⬛◼◾▪ CONTATO ▪
brazilsalesforceeffectiveness@gmail.com

VBA Excel - Automação do Google Tradutor - Google Translate by Internet Explorer Automation




Sim, meus caros, é possível traduzirmos alguns textos com certa velocidade e comodidade usado um código VBA que utiliza o Google Tradutor pela automação do Internet Explorer controlados via Excel.

Mas talvez esteja neste exato momento como que atônito imaginando como isso pode ser útil num Relatório, ou num Dashboard. Talvez pergunte-se: Seria útil na minha aplicação? 

Meus caros, todos nós desenvolvemos soluções por aí. De vez em quando, ou quase sempre no caso de alguns, precisamos desenvolver soluções para a América Latina ou para a Europa. Isso demanda camadas e mais camadas de interfaces para Formulários, Relatórios, Gráficos, Infográficos, Dashboards, Scorecards, etc... 

Com as funcionalidades que veremos mais abaixo no artigo, poderemos resolver tudo isso no início da aplicação, talvez atualizando uma tabela interna que contenha todos os títulos usados nela e Voilá temos a nossa interface traduzida para os mais diversos idiomas!

Este programa grava automaticamente o texto do Excel no Internet Explorer e usa o serviço do Google Tradutor para traduzir o texto na linguagem que desejarmos. Será possível traduzir de e para vários idiomas diferentes, bastando alterar o código deste no programa. 


O que é o Google Tradutor?
Google Tradutor é um serviço de tradução gratuito que fornece traduções instantâneas em 64 idiomas  diferentes (em Janeiro de 2013). Ele pode traduzir palavras, frases e páginas da web em qualquer combinação dos idiomas aceitos. Com o Google Tradutor, esperamos disponibilizar informações úteis para todos, independentemente do idioma em que estiverem escritas.

Como funciona?
Quando gera uma tradução, o Google Tradutor procura padrões em centenas de milhares de documentos para ajudar a decidir qual é a melhor tradução. Ao detectar padrões em documentos que já foram traduzidos por tradutores humanos, o Google Tradutor pode fazer escolhas inteligentes e determinar qual é a tradução apropriada. Esse processo de procurar padrões em grandes quantidades de texto é chamado de "tradução automática estatística". Como as traduções são geradas por máquinas, nem todas serão perfeitas. Quanto mais documentos traduzidos por humanos o Google Tradutor puder analisar em um idioma específico, melhor será a qualidade da tradução. É por esse motivo que a precisão da tradução às vezes varia de acordo com o idioma.

Hoje, todos os principais idiomas estão disponíveis no Google Translate. É um dos poucos serviços que permite a tradução de frases inteiras não apenas palavras. O serviço é gratuito e pode ser executado através de API

Divirta-se!


Public Sub Google_Translate()

Dim Google_Translate_Internet_Explorer_Automation As Object

Set Google_Translate_Internet_Explorer_Automation = CreateObject("InternetExplorer.Application")

Google_Translate_Internet_Explorer_Automation.Navigate "http://translate.google.com/translate_t#"
Google_Translate_Internet_Explorer_Automation.Visible = True
Wait_Between_Google_Translate_Cycles = Range("G1").Value

Let Column = 0

While Range("f9").Offset(0, Column).Value <> tom

    Do While Google_Translate_Internet_Explorer_Automation.busy
        Call WaitSeconds(Wait_Between_Google_Translate_Cycles)
    Loop
    
    Let to_language_code = Range("f9").Offset(0, Column).Value

    Do While Google_Translate_Internet_Explorer_Automation.busy
        Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
    Loop

    Let Google_Translate_Internet_Explorer_Automation.document.forms("text_form").elements(5).Value = to_language_code

    Do While Google_Translate_Internet_Explorer_Automation.busy
        Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
    Loop

    Let rad = 0

    While Range("c10").Offset(rad, 0).Value <> tom

        If Range("f10").Offset(rad, Column).Value = tom Then

            Let from_language_code = Range("a10").Offset(rad, 0).Value
            Let Google_Translate_Internet_Explorer_Automation.document.forms("text_form").elements(4).Value = from_language_code

            Do While Google_Translate_Internet_Explorer_Automation.busy
                Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
            Loop

            Let Google_Translate_Text = Range("c10").Offset(rad, 0).Value

            While Google_Translate_Internet_Explorer_Automation.busy
                Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
            Wend

            Let Google_Translate_Internet_Explorer_Automation.document.forms("text_form").elements("source").Value = Google_Translate_Text

            While Google_Translate_Internet_Explorer_Automation.busy
                Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
            Wend

            Google_Translate_Internet_Explorer_Automation.document.getElementById("text_form").submit

            While Google_Translate_Internet_Explorer_Automation.busy
                Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
            Wend

            Let dd2 = Google_Translate_Internet_Explorer_Automation.document.forms(1).elements(4).Value

            While Google_Translate_Internet_Explorer_Automation.busy
                Call WaitSeconds (Wait_Between_Google_Translate_Cycles)
            Wend

            Let Google_Translate_Variable1 = Replace(dd2, Chr(13), "")
            Let Range("f10").Offset(rad, Column).Value = Google_Translate_Variable1

        End If

        Let rad = rad + 1
    Wend

    Let Column = Column + 1
Wend

Google_Translate_Internet_Explorer_Automation.Quit

Set Google_Translate_Internet_Explorer_Automation = Nothing

End Sub

Public Sub WaitSeconds(sek)


Let newHour = Hour(Now())

Let newMinute = Minute(Now())

Let newSecond = Second(Now()) + sek

Let waitTime = TimeSerial(newHour, newMinute, newSecond)



Application.Wait waitTime


End Sub

Tags: VBA, Excel, Google, Google Translate, IE, Internet Explorer, Automation, API


diHITT - Notícias