صفحه نخست
پست الكترونيك
آرشيو مطالب

شهریور 1386
اردیبهشت 1385
اسفند 1384
بهمن 1384
دی 1384
آذر 1384
آرشيو

اموزش هک
سایت ( دوستان و خودم )
:: قالب ساز ::

افراد آنلاين:
تعداد بازديدها:

Powered By
BLOGFA.COM

سلام به همه دوستان در اولین فرصت تمام کد هایی ویژال بیسک  براتون میزارم ممنون از نظراتون 

 خوش باشید.

سلام به همه دوستان خوبم

امروز یه برنامه بزارم که  پسورد ادمین پیدا می کنه خوب  دوست خوبم   redmove  ساخته این برنامه رو   برید حال کنید دانلودخوش باشید .     

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

این هم برنامه Download

 برگرفته از این سایت http://www.iranvig.com/

این هم یه برای  فقل کردن فایلها که فایل می بره در محیط داس

این جا Download

بچه ها نظر یاتون نره   . برای برنامه جدیید نظر خود بزارید   ممنون میشم  (مدیر وبلاگ  شایان)

شاد و موفق باشید 

برگرفته از این سایت http://www.iranvig.com/

سلام به همه دوستان خوبم بلاخره امدم  و یه چیز خوب برایه هکر ها بزارم و برمامروز می خواهم پاک کردن ان او دی ۳۲ که قویترین انتی وسروس حهان از نظر سرعت  در گرفتن انواع تروجان ها و ویروسها می باشد  . ولی هر چیزی یه نقطه ضعف هم داره با این برنامه انتی ویروس  خاموش میشه .

این برنامه این جا kill NOD32 Download  کنید.

خوب منتظر نظرات شما هستم

شاد و موفق باشید

سلام خوبی

۱- علی جان قرار شد اجرا نشه  ولی پسورد  میدم ولی خودت اجرا نکن

۲- من حاظر به لینک هستم  فقط  لینک خود تو قسمت نظرات بذارید

ممنون از نظرات(ویروس  IHATEYOU  پسورد  ۱۲)  میباشد

سلام به همه دوستان خوبم امروز می خواهم یه ویروس که خودم ساختم بر اتون بزارم  ولی توصیه می کنم اجراش نکنید

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

۱- خاموش کردن  regedit

2-خاموش کردن add\remove

3 -خاموش کردن mmc

4-خاموش کردن serran serve

توجه: توصیه میکنم اجرا نکیند  که من هیچ مسوایتی نمی گیرم

DOwnLoad   ( خطر ،  Danger  )

به زودی نسخه جدید هم میاد

موفق باشید

سلام خدمت تمام دوستان غزیز  

  توجه :  (این برنامه اموزشی رو رو سیدی باید اجرا شه ولی  بعد از این که دانلود کرده اید زیپ را کامل باز کنید و رو سیدی رایت کنید اخه با سیدی اجرا میشه  همین راه بیشتر نداره) 

من بعد از چند روز اون شدم حالا می خواهم  سیدی اموزشی  ویژال بیسیک براتون بزارم

چند رزو بعد هم سیدی ۲ اون می زارم

این سیدی اموزشی بر گرفته از شرکت هادی سیستم می باشد

۱- دانلود cd1   

۲-دانلود سيدي 2

هادی سیستم دارای ۸ سیدی می باشد  به زودی همه سیدی می زارم

خوب فعلا بای تا بعد خوش و موفق باشید.

 

این هم cdkey

Visual Basic 6.0 disk (2) : 3731-0103-3664-8619
Visual Basic 6.0 disk (3) : TL4H-S3XX-KBIW-I0KU-ZKIL
Visual Basic 6.0 disk (4) : WIIX-83DI-6071-IZS9-7UJC
Visual Basic 6.0 disk (5) : 6SUT-F0NS-5PQQ-S3D2-W4F5
Visual Basic 6.0 disk (6) : TIZU-3WGL-70Q9-SHFU-209C
Visual Basic 6.0 disk (7) : AX79-SAIL-TTU3-2BPF-BCJC
Visual Basic 6.0 disk (8) : Q68A-3779-CG0G-AGYI-4P6V

توجه:سيدي 1و2 ان بدون سريال نامبر مي باشد .

خوش باشيد

سلام دوستان خوبم امیدورام حاله تک تکتون خوب باشه من برگشتم . چون بعضی ازدوستان خوبم

از من در خواست کرده بودند

امروز می خواهم یه برنامه برای مدیرت پوشه ها براتون بگم این برنامه دارای چندین چیز هست این برنامه می تونه پوشه شما رو در حالت   disbale   ,control pannel  غيره....

رد بياره ولي من برنامه رو دارم فارسي ميكنم تا باش راحتر كار كرد

امتيازات اين برنامه :گذاشتن پسورد جلو برنامه ,خواصيت آيكن در روي پوشه ,خواصيت

خاموش كردن پوشه, گذاشتن ايكن كنترل پنل در بر روي پوشه (با اين خواصيت كاربر به كنترل پنل مي رود ), خواصيت سطل زباله ويندوز وغيره ........ 

دانلود

بازم از شما دوستان تشكر مي كنم با خاطره نظرخوبتون

خوب فعلا , شما رو بخدا مي سپارم

موفق و شاد باشيد

سلام  به همه دوستان  كه در اين وبلاگ با من همكاري مي كنند اين بار مي خوا هم يه كد براي  باز و بسته كردن cd\rom براتون بزارم خوب بپردازيم به كد 

در قسمت جنرال  (يا  فرم اصلي ) اين كد را وارد مي كنيم

'Declarations
Private Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long

و يا commnadbutton دورست مي كنيم اين كد براي باز كردن سي رام مي باشد و اسمش مي ذاريم cmdopen

Private Sub cmdOpen_Click
retvalue = mciSendString("set CDAudio door open", _
returnstring, 127, 0)
End Sub

و يكي ديگه commnadbutton دورست مي كنيم اين كد براي بسته كردن سي رام مي باشد و اسمش مي ذاريم cmdclose

Private Sub cmdClose_Click()
retvalue = mciSendString("set CDAudio door closed", _
returnstring, 127, 0)
End Sub

خوب  اين هم از كد   موفق باشيد

دوستان در صورت اموزش   در قسمت نظرت نظر بدهيد متشكرم  

خوب فعلا باي

سلام به همه دوستان خودم امیدوارم حاله همه شما خوب باشه 

امروز می خواهم  کد  loading  برای شما بزارم

اول   یک متغیر را    دورست می کنیم  در قسمت  اصلی برنامه  و کلمه کلیدی DIM     تعریف می کنیم 

توجه :  اسم متغیر  با خود شما می باشد

Dim i As Integer
    

در اینجا   روی فرم کلید می کنیم در قسمت که با قرمز نوشته شده timer  می باشد

                                                                                                  Private Sub Form_Activate

                                                                                                   STARTup.Enabled = True

                                                                                                                         End Sub

 

 

 

وارد می کنیم ..........

 و حالا برای این  که    کلید  loading اضافه کنیم به فرم  دو کلید ctrl+t    با هم فشار می هیم

یه کادر باز میشه

شما باید این گزینه microsoft windows common controls 6.0  را فعال کنید

و بعد از این  ok  کنید و......

و در قسمت اشیاء  این شیء  را به فرم اضافه کنید ProgressBar1  کنید  ..

توجه:  در اینجا اسم این    شیء  با خودتان می باشد من برای هماهنگی این نام قرار می دهیم ProgressBar1 

اگر اسمی را انتخاب کنید باید   در  قسمت    timer    مشخص کنید

و بعد  یه timer  دورست می کنیم

و اسم   هر چی دوست درای انتخا ب کنید

توجه:  من  برای هماهنگی میذارم   startup

و بعد در قسمت خوصصیات  timer در حالت انتخاب میذاریم ولی لید نمی کنم   تا  خوصصیات timerباز شود  enbale=false 

interval =170 این عدد را وارد می کنیم   و

در قسمت left =6360 , ودر قسمت top=5160  قرار میدهیم  

 حالا در timer=startup قرار دادیم

روی   timer در فرم کلید می کنیم و این کد را وارد می کنیم

Private Sub STARTRUN_Timer

If i = 99 Then

Unload Me
STARTup.Enabled = False
End If
i = i + 1
ProgressBar1.Value = ProgressBar1.Value + 1
End Sub

 خوب این هم از کد   ممنون میشم نظر بدهید