تابع جمع آوری ایمیل

[Simple Clean]

این رو من وقتی نوشتم قصد داشتم با google api قاطی کنم و یه چیز خوبی در بیارم اسمشم بشه crazyspider ولی بد مصب php5 با soap مشکل داره از طرفی php4 با str_replace مشکلاتی داره ... به هرحال فعلا همینجوری میذارم تا بعد اگه شد خودکار بشه و خودش از گوگل اطلاعات بگیره
فعلا طریقه کارش به این صورته که یه متغیر آرایه با نام result و یه دونه با نام words بش میدید و ایمیل میگیرید .
ضمنا این مثه گاو میمون هر جوری که ایمیل نوشته شده باشه میگیره درستش میکنه و تحویلتون میده مثلا این ایمیلها دیگه امن نیستند :

anything(at)anything(dot)com
anything[at]anything[dot]com

ضمنا یه عبارتی مثل linux@windows رو از میل ها سوا میکنه
result رو میتونید برابر با سورس یه صفحه قرار بدید

for ($rand=10000;$rand <= 30000;$rand++){
$fp=fopen('http://forum.persiantools.com/t'.$rand.'html','r');

$result[]=fread($fp,99999999);}

البته به شرط cpu و سرعت بالا
که توش ایمیل هست میتونید با یه حلقه صد ها صفحه از یه جستجوی گوگل رو بش بدید میتونید لیستی از وبلاگ های فارسی رو بدید و ...
اینم مثال :

$result[]="آره منم ميخوام اينم ايميل من [email protected] , يا به اين يکي soheil_k20032003[at]yahoo.com";

$result[]="و در ويندوز c@registry ... ميتوان اين کارو کرد اين ميل منه اگه خواستيد ميتونيد ...";

$result[]="شما با اين ايميل تماس بگيريد من راهنمايي ... ali@yahoo[dot]com";

$result[]="و در ويندوز taghi_2005_web@yahoo[dot]com ... ميتوان اين کارو کرد اين ميل منه اگه خواستيد ميتونيد ...";
$result[]="inam emailr mane faghat nemikhum   daste spammer ha biyofte salavat_210[at]behnamaz[dot]net";
$result[]="    @cnesex  = saeed_dosti(at)msn(dot)com        ";

$words=array("@","at","dot");

find($words,$result);

اینم تابع اصلی

function find($words,$result)
{
for($c=0;$c <= count($result)-1;$c++){
str_replace($words,$words,$result[$c],$numbs);
if ($numbs > 0){
$places=split(' ',$result[$c]);}
for($b=0;$b <= count($words)-1;$b++){

for ($i=0;$i <= count($places)-1;$i++)
{
str_replace($words[$b],$words[$b],$places[$i],$counter);
if($counter > 0 ){str_replace('com','com',$places[$i],$count_a);str_replace('net','com',$places[$i],$count_b);str_replace('c@m','com',$places[$i],$count_c);str_replace('c0m','com',$places[$i],$count_d);if($count_a > 0 or $count_b > 0 or $count_c > 0 or $count_d > 0){$places[$i]=str_replace('[at]','@',$places[$i]);$places[$i]=str_replace('[dot]','.',$places[$i]);$places[$i]=str_replace('(dot)','.',$places[$i]);$places[$i]=str_replace('(at)','@',$places[$i]);$res[]=$places[$i];}}
}
}}
for($d=0;$d <= count($res)-1;$d++)
{

$crazymail.=$res[$d].",";
}$today = date("His");
$fp=fopen('CrazySpider'.$today.'.diz','w');
fwrite($fp,$crazymail);
fclose($fp);
}

نتیجه ی اصلی رو به صورت یه فایل تو پوشه localhost شما درست میکنه چیزی که هست بهتره تو xampp و حتما رو لوکال خودتون باش کار کنید .

 

[V65j]

سلام
چیزه به درد بخوریه . من که یه صفحه پی اچ پیش کردم برا روز مبادا (موقعی که خواستم تبلیغات کنم)

 

[Simple Clean]

خواهش, عزیز جان
یه کاملترش رو هم گذاشتم تو همین انجمن

 

[agric]

یه لطفی می کنین ساده تر توضیح بدین که دقیقا با این کد چیکار باید بکنیم و چجوری ازش استفاده کنیم؟

 

[hba]

اون کامل تره رو که تو یه لینک دیگه گذاشته ببین

 

[smartchain]

آقا خیلی باحال بود حال دادی اساسی!عجب چیز بدرد بخوری دادی بازم دمت گرم خدا پدرتو بیامرزه

 

[E-Commerce]

سلام ...

من مجموعه تبلیغاتی به شما معرفی مکنم که همه اینکارارو براتونه انجام میده
لینکش تو امضام هست

 

[cyber boy]

بله! و این بود داستان بالا اومدن تاپیک سال 2006 ! :d

 

[kamran190]

یه توضیح کاملتری برای شروع کار بدید لطفا واسه ما مبتدیا