Jump to content
Nytro

Id-uri de mess/Mail-uri

Recommended Posts

Vreau sa fac spam pe messenger (nu stiu la ce, la blog poate, vad eu :D), astea le-am luat rapid de pe un site de ID-uri, uite ca sunt si site-urile astea bune de ceva...

Stiu ca nu sunt prea multe, in jur de 11000, dar cred ca e de ajuns. In plus, daca fac spam pe messenger, sunt sigur ca vor fi cateva mii online seara.

Le-am luat cu un crawler scris in 2 minute:

<?php

set_time_limit(0);

$fisier = fopen('D:\baieti.txt', 'a');

for($nr = 1; $nr <= 300; $nr++)
{
$date = file_get_contents('http://www.eiduri.com/id-uri-de-baieti/' . $nr);

$inceput = explode('avatar.php?yids=', $date);

for($i = 1; $i < count($inceput); $i++)
{
$sfarsit = explode('&format=png', $inceput[$i]);
$yahoo = $sfarsit[0];
fwrite($fisier, $yahoo . "\r\n");
}
}

fclose($fisier);

?>

E bine ca am si separat fete de baieti, poate ajuta asta:

Fete:

http://www.uploads.ws/Vsu2Nc 
http://www.2shared.com/document/KXXPR89k/fete.html

Baieti:

http://www.uploads.ws/Y7zB7s 
http://www.2shared.com/document/aDuFwvRv/baieti.html

Ma gandesc ca poate va ajuta la ceva :)

Edited by Nytro
Link to comment
Share on other sites

Mersi. Poate ma apuc si eu de spam :)).

Intrebare idioata(nu ma pricep la trafic negru:)): Cu ce program faci spam? :S Nu cred ca folosesti Y!M pentru ca ar fi destul de complicat. Plus ca nu cred ca intra la add new contact mai mult de vreo 20 de id-uri.

Link to comment
Share on other sites

  • Moderators

Am facut si eu un mail extractor in AutoIT..


#include <String.au3>
#include <INet.au3>
#include "file.au3"
#notrayicon

$pu = 0
$i = 50000
while $i <= 50400

$link = "http://www.profilehi5.com/hi5-" & $i & ".html"
$ss = _inetgetsource ($link)
$id = _StringBetween ($ss,'<title> Hi5 ',' </title>')

if @error Then
$i = $i+1
elseif $id[0]=="" Then
$i = $i + 1
elseif stringinstr ($id[0],":") then
$i = $i + 1
elseif stringinstr ($id[0],"!") then
$i = $i + 1
else
if stringinstr ($id[0],"@") then
fileopen ("cur.txt",1)
filewriteline ("cur.txt", $id[0])
fileclose ("cur.txt")
$i = $i+1
$pu = $pu + 1
Else
$id[0] = $id[0] & "@yahoo.com"
fileopen ("cur.txt",1)
filewriteline ("cur.txt", $id[0])
fileclose ("cur.txt")
$i = $i+1
$pu = $pu + 1
endif
endif
wend
msgbox (64, "Terminat", "Am extras " & $pu & " mail-uri"&@crlf&"Acum sunt in total "& (_filecountlines ("cur.txt")) & " mail-uri")

Nu e cine stie ce, dar am extras cateva zeci de mii de mail-uri in jumatate de ora.

Link to comment
Share on other sites

Am facut si eu un mail extractor in AutoIT..


#include <String.au3>
#include <INet.au3>
#include "file.au3"
#notrayicon

$pu = 0
$i = 50000
while $i <= 50400

$link = "http://www.profilehi5.com/hi5-" & $i & ".html"
$ss = _inetgetsource ($link)
$id = _StringBetween ($ss,'<title> Hi5 ',' </title>')

if @error Then
$i = $i+1
elseif $id[0]=="" Then
$i = $i + 1
elseif stringinstr ($id[0],":") then
$i = $i + 1
elseif stringinstr ($id[0],"!") then
$i = $i + 1
else
if stringinstr ($id[0],"@") then
fileopen ("cur.txt",1)
filewriteline ("cur.txt", $id[0])
fileclose ("cur.txt")
$i = $i+1
$pu = $pu + 1
Else
$id[0] = $id[0] & "@yahoo.com"
fileopen ("cur.txt",1)
filewriteline ("cur.txt", $id[0])
fileclose ("cur.txt")
$i = $i+1
$pu = $pu + 1
endif
endif
wend
msgbox (64, "Terminat", "Am extras " & $pu & " mail-uri"&@crlf&"Acum sunt in total "& (_filecountlines ("cur.txt")) & " mail-uri")

Nu e cine stie ce, dar am extras cateva zeci de mii de mail-uri in jumatate de ora.

no offence dar e cam praf programelu tau :P ... cu un regex bun le-am extras pe toate 50k sau cate erau in 15 sec

Link to comment
Share on other sites

Fac un program care ia din lista fiecare ID si ii trimite un mesaj. Pot face si sa dea add. Cauta "Simple IM Programming" :)

Sunt bata la asa ceva, am gasit tutorial tau despre Simple IM (Yahoo!, AIM, MSN) Programming, nu mi se pare greu dar cum am mai spus...sunt bata. Daca esti bun la suflet sa imi dai si mie programul iti voi fi vesnic recunoscator.

Link to comment
Share on other sites

Am facut ceva la el mai de mult, apoi am avut alte treburi si l-am lasat balta. Nu stiu sigur daca am incercat sa trimit mass cu un timer la toti, cred ca am bagat intr-un for, si nu a mers. Adica nu stiu exact la cati s-a trimis. Asa, cu 4 ID-uri ale colegilor a mers, au primit toti.

Si am mai incercat sa dau add la toti, si nu a adaugat decat cativa. Mai fac niste teste cand am timp, niste modificari (azi nu cred ca am cand) si il postez.

Oricum sunt cateva linii de cod, puteti face si voi :)

Link to comment
Share on other sites

Am incercat si eu sa fac si presupun ca am trimis la maxim 20 de id-uri odata. Dintr-un listbox cu 20 de id-uri si id-ul meu ultimul, am primit mesajul. Daca ma pun al 21-lea nu mai primesc nimic! :) Am incercat random id-ul meu sa fie si al 15-lea si al 10-lea si al 7-lea si am primit in toate situatiile.

Link to comment
Share on other sites

Am niste probleme, nu mai merge logarea, cel putin pe Windows 7 nu. Cine are XP sa incerce daca merge, daca apare MessageBox "Connected" dupa ce apasa Login.

Download sursa:

http://www.2shared.com/file/PoIftt00/Spammer_IM.html

E o prostie de cateva linii de cod. Dai Load la lista cu ID-uri (scrieti in sursa lista, manual, mi-a fost lene sa pun sa se deschida File Open). Apoi dati Logic la un bot. Asta sper sa mearga. In acel TextBox puneti si voi 1000 de milisecunde, sau mai mult sau mai putin si vedeti daca merge. Va bagati si voi ID-ul in lista, pe la inceput, mai pe la sfarsit... Sa vedeti daca merge. Daca vreti si sa dea AddBuddy, decomentati acea linie de cod, vedeti voi.

Sper sa mearga, nu am mai lucrat la el, nu stiu ce anume as putea face la el. Astept sa il incercati.

Link to comment
Share on other sites

ceva program cand iti da unu ,mass sa se trimita automat un mesaj!

Da.Exista pana pentru messenger 8.Se numeste HyperYM.Pentru versiuni ulterioare nu mai merge.Dar are si un Software Development Kit pentru cei care vor sa dezvolte programul.

Il poti lua de aici:


http://www.softpedia.com/progDownload/HyperYM-Download-26105.html

Sau de aici:


http://numedecod.ro/HyperIM/

Iar SDK-ul de la acest HyperYM il iei de aici:


http://numedecod.ro/HyperIM/take.php?what=7

Success!

Link to comment
Share on other sites

Am facut si eu un mail extractor in AutoIT..


#include <String.au3>
#include <INet.au3>
#include "file.au3"
#notrayicon

$pu = 0
$i = 50000
while $i <= 50400

$link = "http://www.profilehi5.com/hi5-" & $i & ".html"
$ss = _inetgetsource ($link)
$id = _StringBetween ($ss,'<title> Hi5 ',' </title>')

if @error Then
$i = $i+1
elseif $id[0]=="" Then
$i = $i + 1
elseif stringinstr ($id[0],":") then
$i = $i + 1
elseif stringinstr ($id[0],"!") then
$i = $i + 1
else
if stringinstr ($id[0],"@") then
fileopen ("cur.txt",1)
filewriteline ("cur.txt", $id[0])
fileclose ("cur.txt")
$i = $i+1
$pu = $pu + 1
Else
$id[0] = $id[0] & "@yahoo.com"
fileopen ("cur.txt",1)
filewriteline ("cur.txt", $id[0])
fileclose ("cur.txt")
$i = $i+1
$pu = $pu + 1
endif
endif
wend
msgbox (64, "Terminat", "Am extras " & $pu & " mail-uri"&@crlf&"Acum sunt in total "& (_filecountlines ("cur.txt")) & " mail-uri")

Nu e cine stie ce, dar am extras cateva zeci de mii de mail-uri in jumatate de ora.

Super ! Se poate modifica programul adica site Hi5 Cautati prietenii pe Hi5 in loc de site asta sa adaug alt site si sa extraga mailurile utilizatoriilor se poate ?

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
×
  • Create New...