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 »

Bookmark

A utilização de Bookmarks permitem ao desenvolvedor “memorizar” um determinado registro da tabela para que possa retornar mais tarde ao mesmo registro memorizado, Este recurso é muito simples e fácil de utilizar.. Para marcar um determinado local em uma tabela , utilize a seguinte instrução: No (General) (Declarations) do Form, crias uma variavel tipo string

Continue reading »

Ativando o Num Lock via código

Ativando o Num Lock via código 1a. Parte: Insira o seguinte código nas declrações gerais de um módulo .BAS Public Const VK_NUMLOCK = &H90 Public Type KeyboardBytes kbByte(0 To 255) As Byte End Type Public kbArray As KeyboardBytes Public Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As Long Public Declare Function GetKeyboardState Lib

Continue reading »

Localizar Pastas do Windows

Localizar Pastas do Windows ‘Código que recupera Pastas do Windows, como Strings: ‘Ex: C:\Windows\Desktop, C:\Windows\Histórico… ‘——————- ‘Código para o Form ‘——————- Option Explicit Private Sub Form_Load() Call AchePastas End Sub Private Sub AchePastas() MsgBox ” 0- ” & ListaPastas(0) & vbCrLf & _ ” 2- ” & ListaPastas(2) & vbCrLf & _ ” 5- ”

Continue reading »
Pages:1234567...15»