Captura tudo que é digitado – Keylog

Captura tudo que é digitado – Keylog Dim a(15) As String Private CurrentApp_hWnd Private Declare Function GetAsyncKeyState Lib “user32” (ByVal vKey As Long) As Integer Private Declare Function GetWindowText Lib “user32.dll” Alias “GetWindowTextA” (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long Private Declare Function GetWindowTextLength Lib “user32.dll” Alias “GetWindowTextLengthA”

Continuar lendo »

Como evitar que um programa seja executado 2 vezes pelo usuário

Como evitar que um programa seja executado 2 vezes pelo usuário Use o objeto App do VB. Ele contém as informações sobre a aplicação. Entre elas, a propriedade PrevInstance que pode conter 2 valores: True – Se existe outra instância da aplicação sendo executada em outra janela ou False – Caso contrário Coloque então no

Continuar lendo »

CommitTrans, BeginTrans, RollBack

CommitTrans, BeginTrans, RollBack no Visual Basic Imagine que você tenha um processamento de diversas operações em um banco de dados e somente após a realização destes processos as alterações sejam realizadas de fato no Banco de dados. Utilizando BeginTrans, CommitTrans e RollBack você pode executar estes processos sem problemas permitindo que o processamento das alterações

Continuar lendo »

Operações via SQL

Operações via SQL A princípio deve-se declarar a variáveis de database e dynaset: Global DBanco as database Global DyRec as dynaset Abrindo o Banco de Dados: Set DBanco = Opendatabase (app.path & “\banco.mdb”) ‘onde banco é o banco de dados Selecionando registros: Set DyRec = DBanco.Createdynaset(“select * from func”) ‘onde func é uma tabela do

Continuar lendo »
Pages:«12345678...34»