الويب العربي

الويب العربي (http://www.arabwebtalk.com/index.php)
-   طلبات البرمجة والتصميم والتطوير (http://www.arabwebtalk.com/forumdisplay.php?f=6)
-   -   $#@ مكتبة أكواد للمواقع و المنتديات $#@ (http://www.arabwebtalk.com/showthread.php?t=1908)

إبداعيات 07-11-2004 12:20 AM

$#@ مكتبة أكواد للمواقع و المنتديات $#@
 
قائمة رهيبة تظهر من الجانب الايسر

كود:

  <style>
<!--

#slidemenubar, #slidemenubar2{
position:absolute;
left:-155px;
width:160px;
top:170px;
border:1.5px solid green;
background-color:lightyellow;
layer-background-color:lightyellow;
font:bold 12px Verdana;
line-height:20px;
}
-->
</style>
<script language="JavaScript1.2">

/*
Sliding Menu Bar Script-
© Dynamic Drive (www.group.yahoo/group/elmokatel.com)
For full source code, installation instructions,
100's more DHTML scripts, and Terms Of
Use, visit dynamicdrive.com
*/

if (document.all)
document.write('<div id="slidemenubar2" style="left:-150" onMouseover="pull()" onMouseout="draw()">')
</script>
<layer id="slidemenubar" onMouseover="pull()" onMouseout="draw()">
<script language="JavaScript1.2">
var sitems=new Array()
var sitemlinks=new Array()

//extend or shorten this list
sitems[0]="الصفحة الرئيسية"
sitems[1]="الموقع الاول"
sitems[2]="الموقع الثانى"
sitems[3]="الموقع الثالث"
sitems[4]="الموقع الرابع"
sitems[5]="الموقع الخامس"
sitems[6]="الموقع السادس"
sitems[7]="الموقع السابع"
sitems[8]="الموقع الثامن"
sitems[9]="الموقع التاسع"
sitems[10]="الموقع العاشر"
sitems[11]="الموقع الحادى عشر"
sitems[12]="الموقع الثانى عشر"


//These are the links pertaining to the above text.
sitemlinks[0]="هنا تضع المواقع"
sitemlinks[1]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[2]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[3]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[4]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[5]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[6]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[7]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[8]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[9]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[10]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[11]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[12]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"

for (i=0;i<=sitems.length-1;i++)
document.write('<a href='+sitemlinks[i]+'>'+sitems[i]+'</a><br>')
</script>
</layer>
<script language="JavaScript1.2">
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers)
setTimeout("window.onresize=regenerate",400)
}
window.onload=regenerate2
if (document.all){
document.write('</div>')
themenu=document.all.slidemenubar2.style
rightboundary=0
leftboundary=-150
}
else{
themenu=document.layers.slidemenubar
rightboundary=150
leftboundary=10
}
function pull(){
if (window.drawit)
clearInterval(drawit)
pullit=setInterval("pullengine()",50)
}
function draw(){
clearInterval(pullit)
drawit=setInterval("drawengine()",50)
}
function pullengine(){
if (document.all&&themenu.pixelLeft<rightboundary)
themenu.pixelLeft+=5
else if(document.layers&&themenu.left<rightboundary)
themenu.left+=5
else if (window.pullit)
clearInterval(pullit)
}
function drawengine(){
if (document.all&&themenu.pixelLeft>leftboundary)
themenu.pixelLeft-=5
else if(document.layers&&themenu.left>leftboundary)
themenu.left-=5
else if (window.drawit)
clearInterval(drawit)
}
</script>

باحث سريع في ست شركات بحث

كود:

<script language="JavaScript">
<!--
current_site = "Yahoo"

var set_def = false

function fetch() {

  if (set_def == true) {

      set_default = "t"

  }else{

      set_default = ""

  }

  tmp = document.SearchForm.Search.value;

  stmp = "";

  for (i=0 ; i <= tmp.length ; i++) {

      if (tmp.charAt(i) == " ") {

        stmp = stmp + "+";

      } else {

        stmp = stmp + tmp.charAt(i);

      }

  }

  if (current_site == "Yahoo") {

      top.location.href = "http://search.yahoo.com/bin/search?p=" + document.SearchForm.Search.value

  }

  if (current_site == "AltaVista") {

      top.location.href = "http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=.&q=" + document.SearchForm.Search.value

  }

  if (current_site == "Lycos") {

      top.location.href = "http://www.lycos.com/cgi-bin/pursuit?adv=%26adv%3B&cat=lycos&matchmode=and&query=" + document.SearchForm.Search.value + "&x=35&y=2"

  }

  if (current_site == "Excite") {

      top.location.href = "http://www.excite.com/search.gw?c=web&search=" + document.SearchForm.Search.value + "&trace=a&x=31&y=20"

  }

  if (current_site == "Infoseek") {

      top.location.href = "http://www.infoseek.com/Titles?qt=" + document.SearchForm.Search.value + "&col=WW&sv=IS&lk=noframes&nh=10"

  }

  if (current_site == "HotBot") {

      top.location.href = "http://www.hotbot.com/?SW=web&SM=MC&MT=" + document.SearchForm.Search.value + "&DC=10&DE=2&RG=NA&_v=2&act.search.x=87&act.search.y=9"

  }



  return false;

}



function toggle_setdef() {

set_def = !(set_def);

}



function setsite(sitenow) {

current_site = sitenow;

}



// --></script>

<!-- A1 -->
<center><h1>Multiple Search Engines</h1></center>
<form method="GET" name="SearchForm" onsubmit="return fetch()">
<center><font size="-1">Yahoo</font><input type="radio" name="SITE" value="Yahoo" checked onclick="setsite('Yahoo')">  <font size="-1">AltaVista</font><input type="radio" name="SITE" value="AltaVista" onclick="setsite('AltaVista')">  <font size="-1">Lycos</font><input type="radio" name="SITE" value="Lycos" onclick="setsite('Lycos')">  <font size="-1">Excite</font><input type="radio" name="SITE" value="Excite" onclick="setsite('Excite')">  <font size="-1">Infoseek</font><input type="radio" name="SITE" value="Infoseek" onclick="setsite('Infoseek')">  <font size="-1">Hotbot</font><input type="radio" name="SITE" value="HotBot" onclick="setsite('HotBot')"></center>
<br>
<center><input type="Text" name="Search" size=30></center>
<br>
<br>
<center><input type="Submit" name="Submit"></center></form><hr>
<!-- -->

لعمل قائمة شفافة

كود:

<!-- Paste this between the HEAD tags of your html document -->

<script language="JavaScript">
  var isIE4 = false;
  function CheckBrowser()
  { if (navigator.appName == "Microsoft Internet Explorer" && navigator.appVersion.charAt(0) >= 4) { isIE4 = true; }}
  function mOvr(src,clrOver)
  { if (!src.contains(event.fromElement)) { src.style.cursor = 'hand'; src.bgColor = clrOver; src.children.tags('A')[0].style.color = '#ffffff';}}
  function mOut(src,clrIn)
  { if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn;  src.children.tags('A')[0].style.color = '#ffffff';}}
  function mClk(src)
  { if(event.srcElement.tagName=='TD'){src.children.ta  gs('A')[0].click();} }
  function mOvrTop(src,clrOver)
  { if (!src.contains(event.fromElement)) { src.style.cursor = 'hand'; src.bgColor = clrOver;}}
  function mOutTop(src,clrIn)
  { if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn;}}
</script> 


<!-- Paste this within the BODY of your document.  Customize the table, colors, fonts, etc -->

<table cellspacing="3" cellpadding="0" border="0" width="420" align="center" bgcolor="#003366">
<tr>
 <td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://www.yahoo.com/"><font face="Verdana" size="-2">YAHOO</font></a>
</td>
 <td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://hotbot.lycos.com/"><font face="Verdana" size="-2">HOTBOT</font></a>
</td>
 <td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://WWW.CNN.com/"><font face="Verdana" size="-2">CNN</font></a>
</td>
 <td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://www.faisal1.com/"><font face="Verdana" size="1">موقع فيـصـل</font></a>
</td>
</tr>
</table>

ثلوج متساقطة او ورود

كود:

<BODY>

<SCRIPT LANGUAGE="JavaScript1.2">

<!-- Web Site: http://www.geocities.com/tata982 -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
var no = 25; // snow number
var speed = 10; // smaller number moves the snow faster
var snowflake = "snow.gif";

var ns4up = (document.layers) ? 1 : 0; // browser sniffer
var ie4up = (document.all) ? 1 : 0;
var dx, xp, yp; // coordinate and position variables
var am, stx, sty; // amplitude and step variables
var i, doc_width = 800, doc_height = 600;
if (ns4up) {
doc_width = self.innerWidth;
doc_height = self.innerHeight;
} else if (ie4up) {
doc_width = document.body.clientWidth;
doc_height = document.body.clientHeight;
}
dx = new Array();
xp = new Array();
yp = new Array();
am = new Array();
stx = new Array();
sty = new Array();
for (i = 0; i < no; ++ i) {
dx[i] = 0; // set coordinate variables
xp[i] = Math.random()*(doc_width-50); // set position variables
yp[i] = Math.random()*doc_height;
am[i] = Math.random()*20; // set amplitude variables
stx[i] = 0.02 + Math.random()/10; // set step variables
sty[i] = 0.7 + Math.random(); // set step variables
if (ns4up) { // set layers
if (i == 0) {
document.write("<layer name=\"dot"+ i +"\" left=\"15\" ");
document.write("top=\"15\" visibility=\"show\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></layer>");
} else {
document.write("<layer name=\"dot"+ i +"\" left=\"15\" ");
document.write("top=\"15\" visibility=\"show\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></layer>");
}
} else if (ie4up) {
if (i == 0) {
document.write("<div id=\"dot"+ i +"\" style=\"POSITION: ");
document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: ");
document.write("visible; TOP: 15px; LEFT: 15px;\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></div>");
} else {
document.write("<div id=\"dot"+ i +"\" style=\"POSITION: ");
document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: ");
document.write("visible; TOP: 15px; LEFT: 15px;\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></div>");
}
}
}
function snowNS() { // Netscape main animation function
for (i = 0; i < no; ++ i) { // iterate for every dot
yp[i] += sty[i];
if (yp[i] > doc_height-50) {
xp[i] = Math.random()*(doc_width-am[i]-30);
yp[i] = 0;
stx[i] = 0.02 + Math.random()/10;
sty[i] = 0.7 + Math.random();
doc_width = self.innerWidth;
doc_height = self.innerHeight;
}
dx[i] += stx[i];
document.layers["dot"+i].top = yp[i];
document.layers["dot"+i].left = xp[i] + am[i]*Math.sin(dx[i]);
}
setTimeout("snowNS()", speed);
}
function snowIE() { // IE main animation function
for (i = 0; i < no; ++ i) { // iterate for every dot
yp[i] += sty[i];
if (yp[i] > doc_height-50) {
xp[i] = Math.random()*(doc_width-am[i]-30);
yp[i] = 0;
stx[i] = 0.02 + Math.random()/10;
sty[i] = 0.7 + Math.random();
doc_width = document.body.clientWidth;
doc_height = document.body.clientHeight;
}
dx[i] += stx[i];
document.all["dot"+i].style.pixelTop = yp[i];
document.all["dot"+i].style.pixelLeft = xp[i] + am[i]*Math.sin(dx[i]);
}
setTimeout("snowIE()", speed);
}
if (ns4up) {
snowNS();
} else if (ie4up) {
snowIE();
}
// End -->
</script>

</BODY>

حكمة تتغير

كود:

<script LANGUAGE="JavaScript">

<!-- Begin
var a = Math.random() + ""
var rand1 = a.charAt(5)
quotes = new Array
quotes[1] = "لايلدغ المؤمن من جحر مرتين"
quotes[2] = "لا يرمي الناس بالحجارة من كان بيته من زجاج"
quotes[3] = "اللهم علمني ما نسيت و ذكرني بما جهلت"
quotes[4] = "إن الله و ملائكته يصلون على النبي يا أيها اللذين آمنوا صلوا و سلموا عليه تسليما"
quotes[5] = "إنما الأعمال بالنيات "
quotes[6] = "اهلا بكم في صفحتي"
quotes[7] = "خير الامور أوسطها"
quotes[8] = "لتكن كبيرة أو صغيرة فهي بلادي و ليكن بعيد أو قريب فه ابن بلدي - مثل صيني"
quotes[9] = "لا إله إلا الله"
quotes[0] = "بلادي و إن جارت علي عزيزة"
var quote = quotes[rand1]
document.write(quote);
// End -->

لشرح الرابط عند مرور الماوس

كود:

head
                     
<STYLE TYPE="text/css">
<!--
BODY {OVERFLOW:scroll;OVERFLOW-X:hidden}
.DEK {POSITION:absolute;VISIBILITY:hidden;Z-INDEX:200;}
//-->
</STYLE>


وهذا يوضع في الـ body

<DIV ID="dek" CLASS="dek"></DIV>
<SCRIPT TYPE="text/javascript">
<!--
Xoffset=-60;    // modify these values to ...
Yoffset= 20;    // change the popup position.

var nav,old,iex=(document.all),yyy=-1000;
if(navigator.appName=="Netscape"){(document.layers)?nav=true:old=true;}

if(!old){
var skn=(nav)?document.dek:dek.style;
if(nav)document.captureEvents(Event.MOUSEMOVE);
document.onmousemove=get_mouse;
}

function popup(msg,bak){
var content="<TABLE  WIDTH=200 BORDER=1 BORDERCOLOR=black CELLPADDING=2 CELLSPACING=0 "+
"BGCOLOR="+bak+"><TD ALIGN=center><FONT COLOR=white SIZE=4>"+msg+"</FONT></TD></TABLE>";
if(old){alert(msg);return;}
else{yyy=Yoffset;
 if(nav){skn.document.write(content);skn.document.c  lose();skn.visibility="visible"}
 if(iex){document.all("dek").innerHTML=content;skn.visibility="visible"}
 }
}

function get_mouse(e){
var x=(nav)?e.pageX:event.x+document.body.scrollLeft;s  kn.left=x+Xoffset;
var y=(nav)?e.pageY:event.y+document.body.scrollTop;sk  n.top=y+yyy;
}

function kill(){
if(!old){yyy=-1000;skn.visibility="hidden";}
}

//-->
</SCRIPT>

اما هذه العبارة فتوضع داخل قوسي عنوان الرابطة وذلك بعد علامة التنصيص الاخيره قبل القوس

ONMOUSEOVER="popup('Link description here','yellow')"; ONMOUSEOUT="kill()"

بهذا الشكل

<p align="center"><a href="http://amory.8m.com" ONMOUSEOUT="kill()" ; ONMOUSEOVER="popup('زورونا تجدوا ما يسركم','blue')"><font face="Tahoma">عموري</font></a></p>

رقم سري لدخول الصفحة

كود:

<form>
<p>ENTER USER NAME :
  <input type="text" name="text2">
</p>
<p> ENTER PASSWORD :
<input type="password" name="text1">
  <input type="button" value="Check In" name="Submit" onclick=javascript:validate(text2.value,"ضع هنا اليوزرنيم",text1.value,"ضع هنا الباسوورد") >
</p>

</form>
<script language = "javascript">

function validate(text1,text2,text3,text4)
{
 if (text1==text2 && text3==text4)
 load('هنا تضع عنوان صفحة للذي يدخل باسوورد صح');
 else
 {
  load('هنا تضع عنوان صفحة للذي يدخل باسوورد خطأ');
 }
}
function load(url)
{
 location.href=url;
}
</script>

والف تحية لكم [/center] :essen

منقول من إبداعيات www.ebda3yat.com/vb:)

alkema 07-11-2004 09:33 AM

مشكور علي تعبك و المشاركة بالاكواد

mjh00l 07-11-2004 03:53 PM

مشكوووور على الاكواد

زمــzemamــام 07-11-2004 09:01 PM

يعطيك الف عافية

إبداعيات 08-11-2004 01:06 AM

مرحبا بكم أخواني الأفاضل .. ولا شكر على واجب


جميع الأوقات بتوقيت مكة المكرمة. الساعة الآن » 04:53 PM.

Powered by vBulletin
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright © ArabWebTalk.Com 2004-2012