Script

Pdm Programacion...

Enlaces a Visual basic 6.0 encontrados en la red con ejemplos varios

http://www.planet-source-code.com/vb/default.asp?lngWId=1#categories

http://www.vb-helper.com/index_categories.html

http://www.portalvb.com/VB32CF.asp

http://www.freevbcode.com/

http://www.a1vbcode.com/default.asp Muy buena**

http://vbcode.com/

http://www.telecable.es/personales/jrubi/index.htm?trucos.htm

http://www.mentalis.org/tips/tips2.shtml Todo Apis..

Java script

Hora en el Navegador **************************************** <script language="JavaScript"> hora = new Date(); var minutos = hora.getMinutes (); if (minutos<=9) minutos = "0" + minutos; document.write(hora.getHours()+":"+minutos); </script>

Una Bonita Bienvenida Ja Ja Ja .......... **************************************************** <SCRIPT LANGUAGE="JavaScript">  </SCRIPT>

Pop Up ************** <SCRIPT LANGUAGE="JavaScript">  </SCRIPT>

Pagina de Inicio *********************** <a href="#" onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.weyx.iespana.es');return false">Página de inicio</a>

Agregar a Favoritos *************************** <SCRIPT LANGUAGE="JavaScript">  </SCRIPT>

Estatus ********** <body background="back2.gif" onLoad="window.defaultStatus='www.webrecurso.com';return true" text="#FFFFFF" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF">

Movimiento en el Estatus *********************************** <SCRIPT languague="JavaScript">  </SCRIPT>

Hora y Texto en el Estatus *********************************** <script language="JavaScript">  </script>

Frases en la Barra de Desplasamiento ************************************************** <html> <head> <SCRIPT>  </SCRIPT> </head> <BODY onLoad="Marquee()"> </body> </html>

Cambiar Titulo Cada x Tiempo ****************************************** <SCRIPT LANGUAGE="JavaScript"> var txt=" :: Web.com :: - weyx.iespana.es.com -"; var espera=200; var refresco=null; function rotulo_title() { document.title=txt; txt=txt.substring(1,txt.length)+txt.charAt(0); refresco=setTimeout("rotulo_title()",espera);} rotulo_title(); </SCRIPT>

Abrir html en Fullscreen ********************************* <script language="JavaScript">  </script>

Imprimir Web ****************** <a href="javascript:window.print()">Imprimir</a>

Copiar al Portapapeles ******************************** <script language="Javascript">  </script> <a href="javascript:HighlightAll('form.fuente')">Copiar al Portapapeles</a>

Funcion de Confirmacion *********************************** <script language="JavaScript">  </script>

Mira en la Pantalla ************************** <div id="leftright" style="width:expression(document.body.clientWidth-2)"></div><div id="topdown" style="height:expression(document.body.clientHeight-2)"></div> <script language="JavaScript1.2">  </script>

Dia, Mes Y Año ********************** <script language="JavaScript"></script>

Java script 2

Cerrar la Ventana despues de un tiempo ****************************************************** <script language="javascript">setTimeout("self.close();",7000)</script>

Abre Una Nueva Ventana Despues de un Tiempo ******************************************************************* <script> var horizontal=12; setTimeout("abre()",3000); function abre() {window.open("http://weyx.iespana.es/"); } </script>

Boton de Adelante, Atras, actualizar **************************************************** <input type="button" value="Atrás" onclick="history.back()" style="font-family: Verdana; font-size: 8 pt"> <input type="button" value="Actualizar" onclick="window.location.reload()" style="font-family: Verdana; font-size: 8 pt"> <input type="button" value="Adelante" onclick="history.forward()" style="font-family: Verdana; font-size: 8 pt">

Auto Refresh **************  <meta http-equiv="refresh" content="0">  <meta http-equiv="refresh" content="8;URL=http://www.webrecurso.com">>

No Guarde el Navegador en el Cache *************************************************** <META HTTP-EQUIV="pragma" content="no-cache">  <META HTTP-EQUIV="pragma" content="cache">

Rotacion de Banners ****************************** <SCRIPT LANGUAGE="JavaScript">  </SCRIPT>

Cambio de Banner Automatiko *******************************************  <script LANGUAGE="JavaScript">  </script>  <div id="banner"></div>

Enviar M@il con Subjekt *********************************** mailto:wey_x@hotmail.com.com?subject=Comentarios/Sugerencias

Validar Formulario **************************  <form method="post" action="http://www.tudominio.com/cgi-bin/formail.cgi" onSubmit="return validar(this.email.value)">  <SCRIPT LANGUAGE="JavaScript"> function validar(direccion) { if (direccion.indexOf("@") != -1) return true; else { alert('Debes escribir una dirección de e-mail válida'); return false; } } </SCRIPT>

Validar Formularios Completos Permite Escribir Caracteres Prohibidos **************************************************  <form method="post" action="http://www.tudominio.com/cgi-bin/formail.cgi" onSubmit="return validar(this)">  <script Language="JavaScript"></script>

Al Oprimir Boton Derecho, se Despliega un Menu ****************************************** <STYLE>  </style> <script language="JavaScript1.2"> var menuskin=0 var display_url=0 function showmenuie5(){ var rightedge=document.body.clientWidth-event.clientX var bottomedge=document.body.clientHeight-event.clientY if (rightedge<ie5menu.offsetWidth) ie5menu.style.left=document.body.scrollLeft+event.clientX-ie5menu.offsetWidth else ie5menu.style.left=document.body.scrollLeft+event.clientX if (bottomedge<ie5menu.offsetHeight) ie5menu.style.top=document.body.scrollTop+event.clientY-ie5menu.offsetHeight else ie5menu.style.top=document.body.scrollTop+event.clientY ie5menu.style.visibility="visible" return false } function hidemenuie5(){ ie5menu.style.visibility="hidden" } function highlightie5(){ if (event.srcElement.className=="menuitems"){ event.srcElement.style.backgroundColor="highlight" event.srcElement.style.color="white" if (display_url==1) window.status=event.srcElement.url } } function lowlightie5(){ if (event.srcElement.className=="menuitems"){ event.srcElement.style.backgroundColor="" event.srcElement.style.color="black" window.status='' } } function jumptoie5(){ if (event.srcElement.className=="menuitems"){ if (event.srcElement.getAttribute("target")!=null) window.open(event.srcElement.url,event.srcElement.getAttribute("target")) else window.location=event.srcElement.url } } </script>  <script language="JavaScript1.2"> if (document.all&&window.print){ if (menuskin==0) ie5menu.className="skin0" else ie5menu.className="skin1" document.oncontextmenu=showmenuie5 document.body.onclick=hidemenuie5 } </script>

Texto k´Cambia de Color ********************************* <script language="JavaScript">  </script>

Texto k´Sigue al Mous ****************** <html> <head> <style> .spanstyle { position:absolute; visibility:visible; top:-50px; font-size:9pt; font-family:Tahoma; font-weight:bold; color:blue; } </style> <script> var x,y var step=20 var flag=0 // Tienes que dejar un espacio al final de tu mensaje!!!!! var message="Tu mensaje va aqui... " message=message.split("") var xpos=new Array() for (i=0;i<=message.length-1;i++) { xpos[i]=-50 } var ypos=new Array() for (i=0;i<=message.length-1;i++) { ypos[i]=-50 } function handlerMM(e){ x = (document.layers) ? e.pageX : document.body.scrollLeft+event.clientX y = (document.layers) ? e.pageY : document.body.scrollTop+event.clientY flag=1 } function makesnake() { if (flag==1 && document.all) { for (i=message.length-1; i>=1; i--) { xpos[i]=xpos[i-1]+step ypos[i]=ypos[i-1] } xpos[0]=x+step ypos[0]=y for (i=0; i<message.length-1; i++) { var thisspan = eval("span"+(i)+".style") thisspan.posLeft=xpos[i] thisspan.posTop=ypos[i] } } else if (flag==1 && document.layers) { for (i=message.length-1; i>=1; i--) { xpos[i]=xpos[i-1]+step ypos[i]=ypos[i-1] } xpos[0]=x+step ypos[0]=y for (i=0; i<message.length-1; i++) { var thisspan = eval("document.span"+i) thisspan.left=xpos[i] thisspan.top=ypos[i] } } var timer=setTimeout("makesnake()",30) } </script> </head> <body onLoad="makesnake()" style="width:100%;overflow-x:hidden;overflow-y:scroll"> </body> <script>  </script> </html>

Terremoto en el Navegador ***************************************  <INPUT onclick=shake(40) type=button value=""Terremoto""> <SCRIPT language=JavaScript1.2>  </SCRIPT>

Cualquier Imagen Moviendose x la Pantalla ***********************************************************  <div id="webrecurso" style="position: absolute; left: 100; top: 242; width: 116; height: 58; z-index: 1"> <script> if (test) { document.write('<a href="noticias.htm" target="_blank"><img src="noticias.gif" border="0"></a>'); } </script> </div>

<script language="JavaScript1.2" type="text/JavaScript1.2"> /* Neon Lights Text By Website Abstraction (http://wsabstract.com) Over 400+ free scripts here! */ var message="Bienvenido a la pagina de HackPR.COM" var neonbasecolor="gray" var neontextcolor="yellow" var flashspeed=100 //in milliseconds ///No need to edit below this line///// var n=0 if (document.all){ document.write('<font color="'+neonbasecolor+'">') for (m=0;m<message.length;m++) document.write('<span id="neonlight">'+message.charAt(m)+'</span>') document.write('</font>') //cache reference to neonlight array var tempref=document.all.neonlight } else document.write(message) function neon(){ //Change all letters to base color if (n==0){ for (m=0;m<message.length;m++) tempref[m].style.color=neonbasecolor } //cycle through and change individual letters to neon color tempref[n].style.color=neontextcolor if (n<tempref.length-1) n++ else{ n=0 clearInterval(flashing) setTimeout("beginneon()",1500) return } } function beginneon(){ if (document.all) flashing=setInterval("neon()",flashspeed) } beginneon() </script>

Proteccion con contraseña	Texto flotant [cusor]	Anulacion del Boton derecho
Menu deplegable	OUT	OUT

deposito ScriptMaster