Categorías destacadas
programacion php    
Código Fuente
2
¡votar!

 Chequear todo el sistema del cliente

Chequea todo el sistema del cliente para saber que es lo que tiene instalado. Las funciones se pueden sacar por separado para mirar lo que nos interese. Probado con IE5.x y IE6.

<!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<style>
body {cursor:hand}
</style>
<title>Checking your system...</title>

<script language=JavaScript>
<!--
//////////////////////////////////////////////////////////////////
// CheckSys v1.04.21-01 //
//////////////////////////////////////////////////////////////////
// //
// This JavaScript can be freely used as long as this message //
// stays here in the header of the script. Any modifications //
// and bugs found (and fixed) are appreciated. //
// Adding additional information of checking modules is //
// extremely appreciated and encouraged. //
// //
// Svetlin Staev, thewebmonster@altavista.com //
//////////////////////////////////////////////////////////////////
var place="#"; // Redirection page after check

//-----------------Initazing variables-------------------//
var jscript,vscript,language,resolution,colors,avalW,avalH,real,flash,browname,cookie;
var seq1="",seq2="";
var a=0,b=0,num=0;precent=0;
var realState=false;
var flashState=false;
var G2=false;
var FI=false;
var last=document.lastModified;
var historyP=history.length;
var dateP=new Date();
var ie=document.all?1:0;
var ns=document.layers?1:0;
var dom=document.getElementById?1:0;
var l=(ie||dom)?navigator.browserLanguage:navigator.language;
//-------------------End of variables-------------------//

//----------Cookie and JavaScript check module----------//
if (navigator.javaEnabled()>-1) jscript = "JavaScript present.";
else jscript = "JavaScript not present.";
if (navigator.cookieEnabled) cookie = "Cookies enabled.";
else cookie = "Cookies disabled.";
//--------------------End of module--------------------//

//----------Flash & Real Players check module----------//
numPlugins = navigator.plugins.length;
for(i=0;i<numPlugins;i++)
{
plugin = navigator.plugins[i];
if ((plugin.name.substring(0,10)=="RealPlayer")&&(plugin.name.indexOf("G2")>0)) realState=true;
if ((plugin.name.indexOf("Shockwave Flash")>-1)&&(plugin.description.indexOf("5")>-1)) flashState=true;
}

document.write(\\'<script language=VBScript> n\\');
document.write(\\'on error resume next n\\');
document.write(\\'G2 = (NOT IsNull(CreateObject("rmocx.RealPlayer G2 Control")))n\\');
document.write(\\'</script> n\\');
document.write(\\'<script language=VBScript> n\\');
document.write(\\'on error resume next n\\');
document.write(\\'FI = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.4"))) n\\');
document.write(\\'</script> n\\');
document.write(\\'<script language=VBScript>non error resume next nG2=(NOT IsNull(CreateObject("rmocx.RealPlayer G2 Control")))n</script>n\\');
document.write(\\'<script language=VBScript>non error resume nextnFI=(IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.4")))n</script>n\\');

if (flashState||FI) flash = "Flash Player precent."
else flash = "Flash Player missing."
if (realState||G2) real = "Real Player installed."
else real = "Real Player missing."
//--------------------End of module--------------------//

//------------------General info module----------------//
if (ie)
{
browname = "Microsoft Internet Explorer";
vscript = "VBScript present.";
avalW = screen.availWidth;
avalH = screen.availHeight;
langInfo();
}
else if (ns)
{
browname = "Netscape Navigator";
avalW = window.innerWidth;
avalH = window.innerHeight;
vscript = "VBScript missing.";
langInfo();
}
else if (dom)
{
browname = "Netscape 6 Gecko";
vscript = "VBScript missing.";
avalW = window.innerWidth;
avalH = window.innerHeight;
}
colors = screen.colorDepth;
resolution = \\'\\'+screen.width+\\' X \\'+screen.height+\\'\\';
//--------------------End of module--------------------//

function langInfo() // Detection of browser language
{
if (l.indexOf(\\'en\\')>-1)language=\\'English\\';
else if (l.indexOf(\\'nl\\')>-1) language=\\'Dutch\\';
else if (l.indexOf(\\'fr\\')>-1) language=\\'French\\';
else if (l.indexOf(\\'de\\')>-1) language=\\'German\\';
else if (l.indexOf(\\'ja\\')>-1) language=\\'Japanese\\';
else if (l.indexOf(\\'it\\')>-1) language=\\'Italian\\';
else if (l.indexOf(\\'pt\\')>-1) language=\\'Portuguese\\';
else if (l.indexOf(\\'es\\')>-1) language=\\'Spanish\\';
else if (l.indexOf(\\'sv\\')>-1) language=\\'Swedish\\';
else if (l.indexOf(\\'zh\\')>-1) language=\\'Chinese\\';
else language=\\'English\\';

}

boot = \\'Downloading..~~..~~..~..~.OK,~~ now booting the CheckSys.~~~<br>\\' // Splitting string used for Linux-like interface
+\\'CheckSys version 1.04.21-01~~ (thewebmonster@altavista.com)  ~~# \\'+last+\\'<br>\\'
+\\'Connecting to client\\\'s computer...~~...~....~~~....~...~..Done.<br>\\'
+\\'Operation system found.<br>\\'
+\\'Client\\\'s browser platform: \\'+navigator.platform+\\'<br>\\'
+\\'Detected client browser.~~~<br>\\'
+\\'Getting browser name.......Browser name:~~ \\'+navigator.appCodeName+\\'<br>\\'
+\\'Decoding and ajusting browser name........Successful.<br>\\'
+\\'Common browser name: \\'+browname+\\'<br>\\'
+\\'Getting browser version..~...~..~~~..Done.<br>\\'
+\\'Browser version: \\'+navigator.appVersion+\\'<br>\\'
+\\'Checking browser history...........OK<br>\\'
+\\'\\'+historyP+\\' PAGES found in browser history.~~<br>\\'
+\\'Autodetecting JavaScript..~.~.~.~.~..~.~.~.~.~.Done.<br>\\'
+\\'\\'+jscript+\\'<br>\\'
+\\'Looking for VBScript.~.~.~..~~..~.~..~.Done<br>\\'
+\\'\\'+vscript+\\'<br>\\'
+\\'Examining cookies.~.~.~..~~..~.~..~.<br>\\'
+\\'\\'+cookie+\\'<br>\\'
+\\'Logging in for additional information.~.~..~.~..~...~.Successfull.<br>\\'
+\\'Extracting client\\\'s date information...~.<br>\\'
+\\'Date: \\'+dateP+\\'~~~~<br>\\'
+\\'Language present in browser....~~...~..~.\\'+language+\\'<br>\\'
+\\'Screen resolution set to \\'+resolution+\\'<br>\\'
+\\'Getting color depth....~....~...~...\\'+colors+\\' bit<br>\\'
+\\'Estimating available browser space....~..~.~..Done. <br>\\'
+\\'Browser available width: \\'+avalW+\\' pixels<br>\\'
+\\'Browser available height: \\'+avalH+\\' pixels<br>\\'
+\\'Entering inside for plugins information.<br>\\'
+\\'Looking for Real Player.~~.~.~.~.~.~.~.~.~.~.~.Done.<br>\\'
+\\'\\'+real+\\'<br>\\'
+\\'Checking for Macromedia FLASH player.~.~.~.~.~.~.~.~.~.~.Done.<br>\\'
+\\'\\'+flash+\\'<br>\\'
+\\'CheckSys operation complete.~~~<br>\\'
+\\'Now redirecting to proper web page~.~...~.~..~...~OK.~~~<br>\\';

seq = boot.split("~"); // Spliting the string

function initCheck() // The Linux-like boot simulation function
{
seq1=\\'<tt>\\'+seq2+\\'<b style="color:silver">\\'+seq[num]+\\'</b></tt>\\';
seq2+=seq[num];

if(ns)
{
with(document.out.document.indoor)
{
document.write(seq1);
document.close();
}
}
if(ie) booty.innerHTML = seq1;
if(dom) document.getElementById("booty").innerHTML = seq1;
if (!(num>=seq.length-1))
{
num++;
down();
window.status=precent+"% complete.";
if (precent<100)precent++;
else window.status="Checking completed."
setTimeout(\\'initCheck()\\',1);
}
else window.location.replace(place);
}
function down() // Scrolling down function
{
b+=100;
window.scroll(0,a);
a=setTimeout("down()",1000);
}
onload=initCheck;
//-->
</script>
<style>
#booty {position:absolute;}
</style>
<body bgcolor=white text=black marginheight=5 marginwidth=5 topmargin=5 leftmargin=5>

<table cellpadding=0 cellspacing=0 border=0 width=100%>
<tr>
<td>
<ilayer id=out width=95% height=95%>
<layer id=indoor width=95% height=95%>
</layer>
</ilayer>
<div id=booty></div>
</td>
</tr>
</table>
</body>
</html>
Escrito por:
Administrador
Recomendar
a un amigo
Compartir
en redes
 
Comentarios
Anónimo dice:

1.- No se por que no revisan primero que estos códigos funcionen, tranquilamente alguien puede colgar un "exploit" y reventar a todos lo que usen el código. 2.- Nunca funcionará y hay que cambiar tantas cosas en este código que prácticamente es escribirlo de nuevo 3.- ¿Que es eso de poner "? a las comillas iniciales, no funciona en HTML ni XHTML 4.- Esto es una reverenda perdida de tiempo

08/07/2005, a las 15:26:42
Anónimo dice:

UN favor, podrias mandarnos el codigo correcto porfa??? te agradecere de antemano. Bye

09/11/2004, a las 19:11:45
Anónimo dice:

fgdxsdfgd

13/10/2004, a las 23:27:13
Anónimo dice:

dsfdfadsregffffffgfdddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd

09/10/2004, a las 21:58:55
Anónimo dice:

dsfdfa

09/10/2004, a las 21:57:59
Anónimo dice:

Poner debajo de Checking your system... Estos Script's: function stopError() { return true; } window.onerror = stopError; function stopError() { return true; } window.onerror = stopError; Un saludo

30/03/2004, a las 22:58:05
Anónimo dice:

Tambien me da error. una lastima!!

27/10/2003, a las 20:19:08
Anónimo dice:

gfhgfh

11/09/2003, a las 15:35:55
Anónimo dice:

a mi tambien me sucede eso

28/08/2003, a las 20:18:21
Anónimo dice:

No lo pude hacer funcionar, me dice error en el código en la línea 57 car: 20 "carácet no válido"

14/08/2003, a las 19:45:36
 
BBDD
Entornos de desarrollo
Entretenimiento
Herramientas
Internet
Lenguajes de script
Lenguajes imperativos
Lenguajes orientados a objeto
Otros lenguajes
Plataformas
Teoría
Varios
Copyright © 1998-2011 Programación en Castellano. Todos los derechos reservados
Datos legales | Politica de privacidad | Contacte con nosotros | Publicidad

Diseño web y desarrollo web. Un proyecto de los hermanos Carrero.

Red internet:
Juegos gratis | Servidores dedicados
Más internet: Password | Directorio de weblogs | Favicon