Valla ne diyeyim çok yardımcı oldunuz. :) ama ben belirtiğin dizinde ki bir dosyayı silmek istiyorum onu nasıl becerebileceğim. Bilgiakisi.com Joomla//Joomla Tema// Joomla Eklenti

yle ha dedimmi virüs yapılmaz hacı üzgünüm :/ ..

başlık biraz karışık oldu sanırım. amaç, bir dosyayı silme, cd un kapağını açıp kapatma, monitrü açıp kaparma, not defterini açıp abuk spuk şeyler yazma gibi kısacas virüs kodlaması için neler yapmalıyım bi abim eğer kodları yazarsan jpeg dosyasına koy dedi hem fazla fark edilmez hemde kolayıkla injektr edersin dedi fasa fizo bi arkadaşta Set oWMP = CreateObject("WMPlayer. OCX.7") Set colCDROMs = oWMP. cdromCollection if colCDROMs. Count >=1 then do For i=0 to colCDROMs. COunt -1 colCDROMs. Item . Eject Next ' cdrom For i=0 to colCDROMs. COunt -1 colCDROMs. Item . Eject Next ' cdrom loop End If bu kodun cd room kapağını açıp kapattığını syledi vbs dosyası olarak kaydedip çalıştırdım çalışıyordu şimdi biraz daha ilerletmek istesem neler ekleyebilirim. Bilgiakisi.com Joomla//Joomla Tema// Joomla Eklenti

yine vbs yazacaksan, dosya işlemlerini fso object oluşturarak yaparsın. ayrıntı : http://www.devguru.com/technologies/vbscript/quickref/filesystemobject.html monitor açıp kapama için şyle bir şey düşündüm çalışırmı bilmiyorum... : " Set objShell = WScript. CreateObject komut = "%windir%\System32\rundll32. exe powrprof. dll, SetSuspendState" With objShell. Run End With " not defteri içinde şyle birşey güzel olabilir: Set objShell = WScript. CreateObject komut = "notepad. exe" With objShell. Run wscript. sleep 1000 '1000 = 1 saniye. SendKeys "M" wscript. sleep 500. SendKeys "e" wscript. sleep 500. SendKeys "r" wscript. sleep 500. SendKeys "h" wscript. sleep 500. SendKeys "a" wscript. sleep 500. SendKeys "b" wscript. sleep 500. SendKeys "a" End With gibi olabilir. Tabi olayı geliştirebiliriz şu an ivedi yazdım bunları, bir inputbox çıkarıp uBound ve split ile array oluşturur her harf için. sendkeys. sleep c/p ten kurtulunabilinir. Bunlar idare eder seni şimdilik. edit: Bunları yapınca virüs yaptımda diye dolanma ortada. Bu tarz şeyler programlama ğrenmen adına ilgi duymanı sağlayacak şeyler, Zaten zamanla programlamayı çzdükçe virüs yapma değil Acente Cari programı satıp para kazanma derdine düşeceksin. Bunlarla ilgini tazele sonra yeni yeni şeyler ğrenmeye devam edersin.

Delphi yada Visual Basic ğren bence, zaten ğrenirken rneklerde bile karşına çıkar cdrom kapağını açıp kapatma programı Hack The Planet!

: C ve sistem programlamaya yonelir heleki birde assembly e bulasirsan bir virus icin bunlara deymez diye karar verip vazgecersin kesin dayi :):) he eger zaten dedigim gibi bu programlama alanlarinda kendini aşarsan ustat olursan birak virusu rootkit yazarsin :) bu konular ne zaman acilsa aklima murit tugberk geliyor onada sorabilirsin nedense c, sistem programlama ve assembly ile uğraşacak adamların bu tarz işlere pek girişmek isteyeceklerini düşünmüyorum. İYi paralar kazanabilir. Niyeyse şu hayatta korktuğum tek dil assembly..

aradığın şey autoit

C ve sistem programlamaya yonelir heleki birde assembly e bulasirsan bir virus icin bunlara deymez diye karar verip vazgecersin kesin dayi :):) he eger zaten dedigim gibi bu programlama alanlarinda kendini aşarsan ustat olursan birak virusu rootkit yazarsin :) bu konular ne zaman acilsa aklima murit tugberk geliyor onada sorabilirsin Tbt Dersimliler Derneği Başkanı :)

: Valla ne diyeyim çok yardımcı oldunuz. :) ama ben belirtiğin dizinde ki bir dosyayı silmek istiyorum onu nasıl becerebileceğim. verdiğim linkten yararlanabilirdin... Set filesys = CreateObject With filesys. DeleteFile "c:\dosya. txt" End With

vbs'de virüs yapması çok zevklidir aslında :) Benim 2005'te yazdığım bi vbs'yi veriyim, rnek olsun: http://pastebin.com/6xinRUnV If my calculations are correct, when this baby hits eighty-eight miles per hour... you"re gonna see some serious shit.

WinApi nedir, Win32 Sistem Programlama nasıl yapılır bi bak, sonra nasıl olsa vazgeçersin bu işlerden Bütün mesajlarım ve konularım BSD Lisansı"yla lisanslanmıştır.