Enviando um email pelo Outlook

Enviando um email pelo Outlook Primeiro, selecione o componente MICROSOFT MAPI CONTROLS. Depois acrecente no seu form o objeto MAPISESSION e MAPIMESSAGES que apareceram na sua toolbox. Então use a seguinte codificação para enviar uma mensagem: mapisession.Action = 1 mapimessages1.SessionID = mapisession.SessionID mapimessages1.Compose mapimessages1.RecipAddress = “webmundi@webmundi.com” mapimessages1.AddressResolveUI = True mapimessages1.ResolveName mapimessages1.MsgSubject = “Titulo da minha

Continue reading »

Bloqueando funções Copiar e Colar em caixas de texto

Bloqueando funções Copiar e Colar em caixas de texto As funções Copiar (CTRL+C) e Colar (CTRL+V) estão sempre disponíveis para text boxes, mas e se você não quer que estas funções funcionem? O evento KeyDown não consegue detectar CTR+C e CTRL+V. No evento KeyPress, estas teclas podem ser capturadas: Sub Text1_KeyPress (KeyAscii As Integer) If

Continue reading »

Acesso à área de Transferência

O Objeto Clipboard é uma referência à Área de transferência, vejamos como utiliza-lo: Clipboard.gettext Este comando retorna o conteúdo da área de transferência. Clipboard.clear Limpa conteúdo da área de transferência. Clipboard.settext “Teste” Settext adiciona um novo texto p/ a área de transferência, no entanto p/ funcionar á necessário limpá-la primeiro usando o clear.

Continue reading »

Formulário de Senha

Formulário de Senha Crie um Form e adicione 2 textbox e um commandButon no text2 altere a opção de PassowordChar para * Sub Command1_Click() ‘Indica a condição para a senha ser aceita if text1.text=”WebMundi” and text2.text=”Site” then MsgBox “Senha Aceita” form2.show else ‘se a senha não for aceita msgBox”Senha Incorreta” end if end sub

Continue reading »
Pages:1234567...37»