Pedro Oscar Cayetano Mares Rakzo Zeram

Por que no se pueden Crear Carpetas con el Nombre "AUX"

2010-12-02T13:02:00.003-06:00

Creo que a mas de uno le ha pasado, que al quere crear una carpeta con el nombre de "AUX", ésta vuelve al nombre de "Nueva Carpeta" y por mas que queramos cambiarle el nombre este siempre volverá a al nombre que tenia anterior...

¿Por que?

la razon es por que, windows tiene reservadas esas palabras ya sea para algunos de sus dispositivos, o algun comando de windows;

algunos de esas palabras reservadas son:

CON Keyboard and display
PRN System list device, usually a parallel port
AUX Auxiliary device, usually a serial port
CLOCK$ System real-time clock
NUL Bit-bucket device
COM1 First serial communications port
COM2 Second serial communications port
COM3 Third serial communications port
COM4 Fourth serial communications port
LPT1 First parallel printer port
LPT2 Second parallel printer port
LPT3 Third parallel printer port

aunque no creo q tengan problemas con los nombres de las carpetas.

DIFERENCIA ENTRE COMO MANEJAN LOS ARCHIVOS WINDOWS Y GNU/LINUX

2010-08-16T23:12:00.000-05:00

Hace tiempo leí en un artículo una explicación muy buena de cómo manejan los archivos Windows y GNU/Linux para comprender la diferencia. Venía a decir:

En nuestro ordenador los datos están guardados en archivos que son escritos sobre el disco duro que es como un gigantesco armario con millones de cajones y cada cajón tiene la misma capacidad (normalmente 512 bytes). Si los datos se guardan en cajones contiguos se puede acceder a ellos más rápido que si estuvieran de forma discontinua (fragmentados) dentro del armario. Hasta aquí todos sabemos que encontraremos las "cosas" más rápido en un armario ordenado que desordenado. El problema está en saber cómo conservar el armario ordenado cuando lo utilizamos frecuentemente.

Imaginemos ahora una empresa que guarda sus expedientes en un enorme armario con millones de cajones. El fin es que los documentos relativos a un mismo expediente se encuentren en cajones contiguos. Ahora necesitamos contratar una secretaria y se nos presentan dos candidatas:

La primera (Windows) trabaja de la siguiente forma: cuando un expediente se elimina del archivo, se limita a vaciar los cajones, y cuando entra uno nuevo lo separa en pequeños grupos de documentos de la medida de un cajón (512 bytes) y archiva cada grupo al azar en los primeros cajones vacíos que encuentra en el armario. Llega un momento en que va a ser muy difícil encontrar rápido todos los documentos que tienen que ver con un expediente y tendremos que contratar todos los fines de semana una docena de ayudantes para poner de nuevo todo en orden.

La segunda (GNU/Linux), conserva sobre su escritorio una lista de cajones vacíos contiguos, la cual pone al día cada vez que un expediente es cerrado y eliminado de los cajones. Cuando entra un expediente nuevo, busca en su lista un conjunto de cajones vacíos contiguos de la medida necesaria, y es ahí donde coloca el nuevo expediente. Así el armario permanecerá siempre bien ordenado, incluso aunque haya muchos movimientos de expedientes.

El Experto y El Decepcionado - Usuarios de Ubuntu

2010-07-15T23:14:00.001-05:00

Rodolfos y Nancys

Rodolfo, llamémoslo así, es un usuario de computadoras como tantos. Su sistema y el único que conoce es el popular Windows, no le trabaja mal, como en todo ya está adaptado a las virtudes y desaciertos del mismo. Sin embargo ya son varias las veces que escucha de un tal sistema llamado Ubuntu, conocido por su facilidad de uso y las libertades que da al usuario.

Ha escuchado de todo un poco: no tiene antivirus porque no lo necesita, no tiene más costo que el de descargarlo y grabarlo en un CD, es más lo puede copiar y regalar sin que esto se vea mal. Pero lo que más le ha llamado la atención es lo amigable que dicen que es, cualquiera puede usarlo le afirman.

Rodolfo entonces decide probar el tal Ubuntu, aprovecha un festival de instalación donde amablemente le instalan el sistema en su máquina. Lo prueba, se ve muy bonito, trae muchas aplicaciones, puede navegar en Internet, y se mueve rápido. Pero claro, como es de esperar surgen múltiples inquietudes. Por ejemplo Rodolfo se percata de que el teclado virtual del Banco Nacional no funciona adecuadamente, entonces pregunta a través de un foro de Ubuntu donde le responden:

- Ahh, en este caso debes usar el plugin Java de Sun Microsystems en lugar del plugin libre que trae Ubuntu. El teclado virtual usa bibliotecas no libres y nos obliga a usar esta otra opción.
- Ok, no se ve difícil, ¿qué debo hacer? - pregunta Rodolfo
- ¡Sencillísimo!, primero haces un sudo add-apt-repository "deb http://archive.canonical.com/ubuntu lucid partner" para añadir el repositorio parther de Cannonical, por supuesto seguido de un sudo aptitude update, entonces ya puedes hacer un sudo aptitude -y install sun-java6-plugin. ¡Ah! y no olvides hacer un sudo aptitude -y remove icedtea6-plugin para que quites el otro plugin.
- Que tuanis -piensa Rodolfo con un tanto de ironía- ¿No se supone que Ubuntu es para “seres humanos”?

Quizás hubiera sido más conveniente responder algo como: te vas a Orígenes del Software, marcas el repositorio parther, al cerrar te pregunta si quieres recargar la información acerca del software disponible entonces le dices que si. Luego te vas al Gestor de Paquetes Synaptic, instalas el paquete sun-java6-plugin y desinstalas icedtea6-plugin. ¡Listo! Todo sencillo, de manera gráfica como Rodolfo está acostumbrado a hacer las cosas y como espera seguir haciéndolas.

Por otro lado tenemos el caso de Nancy, una chica que, al igual que Rodolfo, no tiene mucho conocimiento técnico en cuando a computadoras pero, a diferencia, quiere aprender a hacer las cosas como su amigo Mario, todo un experto en lo que a computadoras se refiere.

A Nancy no le importa invertir un poco más de tiempo en aprender a hacer las cosas como lo hacen los expertos: escribiendo comandos para ejecutar acciones o modificando archivos de configuración con el editor de texto para definir la funcionalidad de su sistema. A ella no le importa que le sugieran las opciones que para muchos se verán extrañas, luego de una o dos preguntas de más a la comunidad y unas cuantas búsquedas en Internet probablemente ya tendrá una idea de lo que está haciendo y se sentirá complacida.

No hay duda de la eficiencia del soporte que brindan las diversas comunidades de Software Libre a los usuarios, sin embargo pareciera que no hemos aprendido a diferenciar un Rodolfo de una Nancy, de hecho difícilmente brindamos espacios para Rodolfos.

Rodolfo es una persona que podría contribuir enormemente a la comunidad, quizás es diseñador, músico, pedagogo o tal vez orador. Es decir perteneciente a un área ajena a la computación pero por ello un excelente complemento para este gran mundo que llamamos Software Libre o bueno, vamos un poco más allá, Cultura Libre.

Al ver tal respuesta (y posiblemente otras más de este tipo) Rodolfo se percató de que esto no es lo suyo, o por lo menos así se lo hicieron ver. Por supuesto los cuestionamientos sobre la facilidad que le prometieron no se hicieron esperar. No dejemos que los Rodolfos se vayan frustrados llevándose con sí lo que pudieron ser grandes aportes a la comunidad.

Tecla de Windows

2010-07-15T11:33:00.001-05:00

Tecla Windows: abre y cierra el menú de inicio.

Tecla Windows + E: abre el explorador de archivos.

Tecla Windows + R: abre ventana ejecutar.

Tecla Windows + F: abre la ventana buscar.

Tecla Windows + D: minimiza o restaura todas las ventanas a la vez.

Tecla Windows + L: bloquea la estación de trabajo.

Tecla Windows + U: abre el administrador de utilidades.

Tecla Windows + M: minimiza todas las ventanas.

Tecla Windows + Shift + M: deshace la minimización de las ventanas.

Tecla Windows + F1: abre la ventana de ayuda y soporte técnico.

Tecla Windows + Tecla Pause/Break: abre la ventana de propiedades del sistema.

Tecla Windows + Tecla Tab: se mueve entre las diferentes aplicaciones en la barra de tareas y con la barra espaciadora se activa la aplicación seleccionada.

Tecla Windows + Tecla Ctrl + F: abre la búsqueda de equipos.

Tecla Windows + Tecla Ctrl + Tecla Tab: permite moverse entre pestañas de una aplicación.

Bloqueo de USB

2010-07-12T10:08:00.007-05:00

Hola que tal Gente ... este es un proyecto que realice en mi trabajo,
como muchos tenemos el problema que los usuarios meten las memorias usb, y sabra Dios en donde mas las habran metido, por lo que tal vez la galeria de virus que traen es muy buena, para evitarme este problema, hice un programa que me bloqueara solo las memorias usb; las impresoras, mouse, y demas accesorios usb si se pueden accesar.

El programa necesita ejecutarse una sola vez y lo que hace es:
- Crea un registro en el que hace que se inicie junto con Windows
- Deshabilita los puertos USB; Bloquea el registro, y cambia el nombre de los archivos que contienen los drivers, por lo que si es la primera vez que se conecta la memoria no lo va a instalar, y si ya estaba instalado, no lo permite por que el registro esta deshabilitado.
- Tanto la ruta como la contraseña son fijas, es decir, no se pueden cambiar, al menos que se cambie desde código.
- Para habilitar los puertos, es necesario dar clic derecho en él, este estará iconizado (al lado izquierdo del reloj)
- Al introducir la contraseña este mostrara un botón para habilitar el puerto, y entonces si puedes conectar la memoria USB
- La próxima vez que se inicie, este deshabilitará los puertos USB solo para memorias

aqui les dejo el enlace...

http://cid-dd6c7076675d0866.office.live.com/self.aspx/P%c3%bablico/Programas%20Varios/UsbLocal.rar

el programa se tendria que poner en "C:\Archivos de Programa\" para que se ejecute siempre desde ahi.....

el programa esta hecho en delphi 7.0, por lo que aqui les dejo el código
unit FUsb;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,Registry,ShellAPI, StdCtrls, ExtCtrls, TlHelp32, Buttons;

const
WM_ICONTRAY = WM_USER + 1; // Mensaje definido por el usuario

type
Tusbs = class(TForm)
BHabilitar: TButton;
BDeshabilitar: TButton;
Pass: TEdit;
Minimizar: TButton;
BMostrar: TButton;
Timer1: TTimer;
Label1: TLabel;
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure MinimizarClick(Sender: TObject);
procedure BMostrarClick(Sender: TObject);
procedure Icontray(var Msg: TMessage); message WM_ICONTRAY;
procedure BDeshabilitarClick(Sender: TObject);
procedure BHabilitarClick(Sender: TObject);
procedure PassKeyPress(Sender: TObject; var Key: Char);
procedure Timer1Timer(Sender: TObject);
Procedure MadrearArchivo(Sender: TObject);
Procedure ComponerArchivo(Sender: TObject);
private
{ Private declarations }

public
{ Public declarations }
end;

var
usbs : Tusbs;

NotifyIconData : TNotifyIconData;
Hecho : Boolean;
Intentos: Integer;
SearchRec: TSearchRec;

implementation

Uses PopupMenu1;
{$R *.dfm}

{-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+
este proceso cambia el nombre del usbtor para
que no se instale la memoria usb
-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+}
Procedure Tusbs.MadrearArchivo(Sender: TObject);
Var
lpFileOp: TSHFileOpStruct;
ArchivoABuscar1,ArchivoABuscar2:String;
Begin
ArchivoABuscar1:='C:\WINDOWS\inf\usbstor.inf';
If FindFirst(ArchivoABuscar1, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Self.Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINDOWS\inf\usbstor.inf' + #0#0);
lpFileOp.pTo := PChar('C:\WINDOWS\inf\usbstorinf.Txt' + #0#0);
lpFileOp.fFlags:= FOF_SIMPLEPROGRESS or FOF_FILESONLY;
lpFileOp.fAnyOperationsAborted := FALSE;
lpFileOp.hNameMappings := nil;
lpFileOp.lpszProgressTitle := PChar('Trasladando archivos al disco D' + #0#0);
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstor.inf a usbstorinf.Txt');
end
Else
Begin
ArchivoABuscar1:='C:\WINNT\inf\usbstor.inf';
If FindFirst(ArchivoABuscar1, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINNT\inf\usbstor.inf' + #0#0);
lpFileOp.pTo := PChar('C:\WINNT\inf\usbstorinf.Txt' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstor.inf a usbstorinf.Txt');
End;
End;

ArchivoABuscar2:='C:\WINDOWS\inf\usbstor.PNF';
If FindFirst(ArchivoABuscar2, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINDOWS\inf\usbstor.PNF' + #0#0);
lpFileOp.pTo := PChar('C:\WINDOWS\inf\usbstorPNF.Txt' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstor.PNF a usbstorPNF.Txt');
End
Else
Begin
ArchivoABuscar2:='C:\WINNT\inf\usbstor.PNF';
If FindFirst(ArchivoABuscar2, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINNT\inf\usbstor.PNF' + #0#0);
lpFileOp.pTo := PChar('C:\WINNT\inf\usbstorPNF.Txt' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstor.PNF a usbstorPNF.Txt');
end;
End;

End;
{-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+
Regresa a la nomralidad los archivos para que se
instalen las memorias
-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+-*/+}
Procedure Tusbs.ComponerArchivo(Sender: TObject);
Var
lpFileOp: TSHFileOpStruct;
ArchivoABuscar1,ArchivoABuscar2:String;
SearchRec: TSearchRec;
Begin

ArchivoABuscar1:='C:\WINDOWS\inf\usbstorinf.Txt';
If FindFirst(ArchivoABuscar1, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINDOWS\inf\usbstorinf.Txt' + #0#0);
lpFileOp.pTo := PChar('C:\WINDOWS\inf\usbstor.inf' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstorinf.Txt a usbstor.inf');
End
Else
Begin
ArchivoABuscar1:='C:\WINNT\inf\usbstorinf.Txt';
If FindFirst(ArchivoABuscar1, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINNT\inf\usbstorinf.Txt' + #0#0);
lpFileOp.pTo := PChar('C:\WINNT\inf\usbstor.inf' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstorinf.Txt a usbstor.inf');
End;
end;

ArchivoABuscar2:='C:\WINDOWS\inf\usbstorPNF.Txt';
If FindFirst(ArchivoABuscar2, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINDOWS\inf\usbstorPNF.Txt' + #0#0);
lpFileOp.pTo := PChar('C:\WINDOWS\inf\usbstor.PNF' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstorPNF.Txt a usbstor.PNF');
end
Else
Begin
ArchivoABuscar2:='C:\WINNT\inf\usbstorPNF.Txt';
If FindFirst(ArchivoABuscar2, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
lpFileOp.Wnd := Handle;
lpFileOp.wFunc := FO_RENAME;
lpFileOp.pFrom := PChar('C:\WINNT\inf\usbstorPNF.Txt' + #0#0);
lpFileOp.pTo := PChar('C:\WINNT\inf\usbstor.PNF' + #0#0);
lpFileOp.fFlags:= FOF_ALLOWUNDO or FOF_RENAMEONCOLLISION;
if ShFileOperation(lpFileOp) <> 0 then
ShowMessage('Ha Fallado El cambio de Nombre de Archivo de usbstorPNF.Txt a usbstor.PNF');
end;
end;

End;

procedure Tusbs.Icontray(var Msg: TMessage);
var
CursorPos : TPoint;
begin
if Msg.lParam = WM_RBUTTONDOWN then begin
GetCursorPos(CursorPos);
usbs.Show;
end else
inherited;
end;

{procedimiento para habilitar o deshabilitar el usb}
procedure EnableUSB(Value: Boolean);
begin
with TRegistry.Create do
try
RootKey:= HKEY_LOCAL_MACHINE;
if OpenKey('\SYSTEM\CurrentControlSet\Services\USBSTOR',TRUE) then
begin
if Value then WriteInteger('Start',3)
else WriteInteger('Start',4);
CloseKey;
end;
finally
Free;
end;
end;

{procedimiento para hacer que el programa se inicie con windows}
procedure RunForEver(pCaption, pPath : String);
var Registro :TRegistry;
begin
//pCaption es el caption del programa, y path la ruta completa donde se encuentra el .exe
Registro:=TRegistry.create;
Registro.RootKey := HKEY_LOCAL_MACHINE;
If Registro.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run\',FALSE) then
If Not (Registro.ReadString(pCaption) = pPath) Then
Registro.WriteString(pCaption, pPath);

Registro.Free;
end;

{Al Crearse la forma}
procedure Tusbs.FormCreate(Sender: TObject);
begin
{ Desabilitamos el Puerto USB}
EnableUSB(False);
{mandamos llamar el procedimiento para que truene los archivos}
MadrearArchivo(Sender);
{Activamos el programa para que se inicie con windows}
RunForEver('Usb.exe','C:\Archivos de Programa\Usb.exe');

end;

{Oculta la Aplicacion de la barra de tareas}
procedure Tusbs.FormShow(Sender: TObject);
begin
ShowWindow(application.Handle, SW_HIDE );
Intentos:=0;
Pass.Text := '';
end;
{*******************************************************
BOTON PARA MINIMIZAR LA PANTALLA
*******************************************************}
procedure Tusbs.MinimizarClick(Sender: TObject);
begin
usbs.Hide;
with NotifyIconData do begin
hIcon := Icon.Handle;
StrPCopy(szTip, Application.Title);
Wnd := Handle;
uCallbackMessage := WM_ICONTRAY;
uID := 1;
uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
cbSize := sizeof(TNotifyIconData);
end;
Shell_NotifyIcon(NIM_ADD, @NotifyIconData);
end;
{*******************************************************
BOTON PARA QUITAR EL ICONO DE LA BARRA DE TAREAS
*******************************************************}
procedure Tusbs.BMostrarClick(Sender: TObject);
begin
Show;
Shell_NotifyIcon(NIM_DELETE, @NotifyIconData); //para quitar el icono de la barra de notificación
end;

procedure Tusbs.BDeshabilitarClick(Sender: TObject);
begin
EnableUSB(False);
MadrearArchivo(Sender);
BHabilitar.Visible :=False;
end;

procedure Tusbs.BHabilitarClick(Sender: TObject);
begin
EnableUSB(True);
ComponerArchivo(Sender);
end;

procedure Tusbs.PassKeyPress(Sender: TObject; var Key: Char);
begin
If Intentos >= 3 Then
MinimizarClick(Sender);
If key=#13 Then
If pass.Text ='entra2' Then
BHabilitar.Visible := True
else
Begin
BHabilitar.Visible := False;
Intentos := Intentos +1;
End;
end;

procedure Tusbs.Timer1Timer(Sender: TObject);
begin
If Hecho =False then
Begin
MinimizarClick(sender);
hecho:=True;
end;

end;

iconos de todo

2010-05-06T08:04:00.004-05:00

Como desarrollador de sistemas, siempre he tenido un problema al buscar íconos para mis aplicaciones, entre tanta búsquda me encontre con esta excelente página, que nos permite hacer una búsqueda de los íconos por categoria, para de esta forma poder seleccinoar el que sea de nuestro agrado y no descargar una archivo con 100 o 1000 íconos para solo utilizar uno solo.

aqui les dejo el enlace para que descarguen sus imagenes en tipo png o en ico

http://www.iconfinder.com/

Manejo de Fechas Delphi

2010-02-16T08:30:00.004-06:00

Manejo de fechas en delphi

funciones para fechas delphi – TDate – TDateTime – TTime – rutinas de fechas en delphi

El siguiente articulo vamos a ver como manejar fechas y horas en delphi
las funciones que veremos pertenecen a la unidad SysUtils y la mayoría en DateUtils que a partir de delphi 6 están con nosotros, con ellas podremos resolver dilemas como:

• extraer parte de la fecha, año, mes, día
• incrementar años, meses, días en una fecha y viceversa
• comparar dos fechas
• saber cuántos días faltan por una fecha
• validar una fecha
• saber si es un año bisiesto
• día de la semana de una fecha

Definición de variables de tipo fecha

Para manejar fechas en delphi necesitamos definir las variables con el tipo adecuado para fechas, para ello tenemos en disposición de tres tipos TDate – TTime y TDateTime

TDate Para almacenar una fecha día/mes/año
TTime Para almacenar una hora, hora: minuto: segundo
TDateTime Es una combinación de las dos anteriores: día/mes/año hora: minuto: segundo

Ejemplo:

var
MiData: Tdate; //variable de data 00/00/00
MiHora: TTime; //variable de hora 00:00:00
MiFecha: TDateTime; //variable con data y hora 00/00/00 00:00:00

Funciones básicas para obtener fechas

unidad: SysUtils
date() : devuelve la data actual
time() GetTime() : devuelve la hora actual
now() : devuelve la data y hora actual

Ojo si utilizamos variables de tipo TDateTime y usamos time() o GetTime() el data por defecto es 30/12/1899
Ejemplo:

MiData := date(); //29/06/08
MiHora := time(); //14:08
MiFecha := now(); //29/06/08 14:08
MiFecha := GetTime(); // 30/12/1899 14:08

Funciones de salida para fechas “OUTPUT”

Para mostrar una variable de contenedor fecha en pantalla, en un editbox,label,listbox etc.. tenemos que pasar la fecha en formato cadena “string”, para ello usaremos la funciones convertidoras de tipos “casting” apropiadas

unidad: SysUtils
DateToStr :Convierte de Data a texto
TimeToStr :Convierte de Hora a texto
DateTimeToStr :Convierte de Data y Hora a texto

Ejemplo:

edit1.text := DateToStr(MiData);
edit1.text := TimeToStr(MiHora);
edit1.text := DateTimeToStr(MiFecha);

Funciones de entrada para fechas “INPUT”

Podemos utilizar (StrToDate – STrToTime – StrToDateTime) para que el usuario puede agregar datas manualmente o bien para predeterminar la fecha o hora

unidad: SysUtils
StrToDate :Convierte de texto a Data
STrToTime :Convierte de texto a Hora
StrToDateTime :Convierte de texto a Data y Hora
Para componer una fecha en delphi tenemos el siguiente formato Dia/Mes/Año Hora:Minuto:Segundo,Milisegundo

Ejemplo:

MiData := StrToDate('01/06/2008');
MiHora := StrToTime('10:20:30');
MiFecha := StrToDateTime('01/06/2008 10:20:30,232');

Nota: si se pasa una fecha o tiempo incorrecto salta una excepción de tipo EConvertError

Funciones typecast validadoras de fechas

Podemos usar el manejo de excepciones (try, except, finally) o bien usar la funciones TryStrToDate, TryStrToTime, TryStrToDateTime que veremos después
cuando pasamos una fecha o tiempo incorrecto delphi salta con una excepción de tipo EConvertError la podemos capturar con “on EConvertError”

Ejemplo
var
MiFecha:Tdatetime;
Begin
Ttry
MiFecha := StrToDate('01/06/2008');
Except
on EConvertError do
ShowMessage('Fecha incorrecta');
End;
End;

Funciones TryStrToDate, TryStrToTime y TryStrToDateTime, todas se llaman de la siguiente manera nombrefuncion(donde_guardar,fecha_a_pasar) nos devuelve con un booleano si ha sido correcta o no la conversión

Ejemplo
var
MiFecha:Tdatetime;
cadena:string;
Begin
cadena := '31/02/2009';
If (TryStrToDateTime(cadena,mifecha)) then
showmessage('conversion correcta')
else
showmessage('conversion incorrecta');
end;

10 cosas para no Odiar Windows

2009-11-23T18:59:00.002-06:00

1) Para odiar: Tras el arranque vemos el escritorio, pero todavía no se puede utilizar nada…

1) Para no odiar: ¡Hey!, Ubuntu tampoco hace milagros, si tu equipo es lento por poca capacidad de procesador o memoria, ni en Windows ni en Ubuntu correrá rápido. Se ha probado en un equipo Windows y Ubuntu y corren casi a la misma velocidad. Gran parte de la velocidad de inicio de Windows depende del número de aplicaciones que corren desde la partida, y esto es un ítem que puede solucionarse con bastante facilidad.

2) Para odiar: Arreglar problemas, ciencia infusa. Debido a que nunca sabemos bien qué es lo que Windows está haciendo por debajo, ni disponemos de logs que podamos revisar para ver qué ha pasado…

2) Para no odiar: ¿Logs? Inicio - Panel de Control - Herramientas Administrativas - Visor de sucesos…. ¡Ups! ¡Sí hay logs! , y en este caso sea Windows o Linux, para un usuario común, ¿de que sirven esos logs (registros del sistema)?, Claro, como todos somos programadores y amamos el código fuente, encontraremos ahí la solución a nuestros problemas.

3) Para odiar: El registro de configuraciones, otro agujero negro más. Probablemente sepas qué es el registro de configuraciones (se entra ejecutando regedit.exe), y quizá has tenido que abrirlo alguna vez para algo, pero, ¿realmente es posible encontrar algo ahí ?

3) Para no odiar: ¿Quien va a entrar al registro a modificar algo sin saber lo que está haciendo?, o sea si apenas tengo los conocimientos para usar el correo electrónico, ¿acaso puedo modificar por consola configuraciones de Ubuntu?, Eso es difícil, si no imposible. Recuerdo que tuve quebuscar información en varios sitios para poder trabajar con archivos .RAR en Ubuntu. Nuevamente se asume que todos los usuarios son personas que realmente les interesa hurgar en las configuraciones, cuando la verdad es todo lo contrario. La gran mayoría sólo quiere conducir su automóvil, no aprender ingeniería mecánica para modificar el motor.

4) Para odiar: El Internet Explorer, la aplicación más dañina de la historia de la Informática. No se puede desintalar.

4) Para no odiar: ¿Quien dice que Explorer es la aplicación más dañina en la historia de la informática? ¿Alguna base, estudio o estadística al respecto? No estoy defendiendo a Internet Explorer, es un programa que tiene serios problemas de seguridad y todos lo sabemos, pero si es por hacer acusaciones sin respaldo, puedo decir que la aplicación más dañina es Kazaa, o Messenger, o cualquier otra. ¿Problemas con Internet Explorer? Simple, instala Mozilla u Opera o algun otro explorador de internet, Explorer SI se puede desintalar.

5) Para odiar: Publicidad. ¿Quién no tiene el Windows lleno de publicidad? Si no es Messenger es Yahoo, si no es tu aplicación Adware favorita. Muchas aplicaciones interesantes están llenas de banners publicitarios o conectan con páginas de Internet que ofrecen publicidad.

5) Para no odiar: (No me gusta ser autoreferente pero en fin) Yo no tengo ninguna publicidad en mi equipo, y si esas aplicaciones interesantes tienen publicidad ¿de quien es la culpa de Windows o de las aplicaciones?. Nótese que nadie se queja mucho contra Google, que con su programa de Adwords-Adsense tiene millones de páginas llenas de esos links publicitarios que a nadie le gustan. La publicidad costea muchas cosas, y si no se quejan contra Google y sí contra Windows, es porque detestan a Microsoft, y no porque critiquen el modelo de negocios basado en publicidad.

6) Para odiar: Las aplicaciones importantes son imposibles de costear por un usuario doméstico.

6) Para no odiar: Si te sientes mal profanando la propiedad intelectual al ocupar un Office pirata entonces ocupa OpenOffice, Gimp, AVG, Paint.net, si no pídele a tu amigo informático que te preste un crack o keygen y listo (no estamos aquí para moralismos baratos). Hay aplicaciones gratuitas. Y decir que son imposibles de costear de nuevo es una afirmación con, a lo menos, una base poco clara. El usuario promedio NO necesita Photoshop, por ejemplo, y puede arreglarse de los más bien con Paint.Net, que es gratuito.

7) Para odiar: Suites antivirus, dinero desperdiciado.

7) Para no odiar: Ocupa AVG o AVAST. son Gratis.

8 ) Para odiar: Opciones escondidas. Muchas de las opciones que habitualmente utilizas, como la configuración de la dirección IP, la configuración multimedia, configuración del proxy de Internet, están escondidas, están detrás de un botón Avanzadas, o detrás de otra pantalla de configuración.

8 ) Para no odiar: ¿Cuantas veces un usuario común necesita configurar el proxy? Muchas de las configuraciones avanzadas de Windows están escondidas para que el usuario promedio no dañe algún archivo crítico para el sistema. Linux tampoco funciona bien cuando alguien le mete mano a los archivos críticos sin saber lo que está haciendo.

9) Para odiar: Windows es incompatible.

9) Para no odiar: Esta es la mas chistosa de todas, instala un Plotter en menos de 3 horas con Ubuntu y despues hablamos. ¿INCOMPATIBLE?, pero por favor, el 99,7% de las aplicaciones son hechas para Windows. Algunos dispositivos de hardware no tienen drivers para Linux. y lo digo con mucha certeza, monta 2 monitores en una tarjeta de viideo cual sea la marca, con los driver que toman tanto windows como linux, no lo vas a poder hacer, pero si actualizas el driver, en 5 minutos (por la descarga) lo tienes en windows, y en linux....... La compatibilidad de Windows es incuestionable. De vez en cuando todavía aparecen personas que se acaban de comprar un teléfono móvil de última generación y no pueden usarlo con Linux.

10) Para odiar: Es irritante que si realizamos una acción simple en windows, como activar una conexión de red, lo que estamos haciendo en realidad es una colección de tareas desconocidas por el usuario que se ejecutan detrás de nuestra vista. Windows decide por tí , Windows realiza multitud de tareas sin que tú lo sepas, convirtiendo la resolución de problemas en un puzzle incomprensible.

10) Para no odiar: Esa es la idea de un sistema automatizado, que haga las cosas de manera automática, ¿de qué te sirve saber los miles de algoritmos que realiza el SO por cada minuto?, perdón pero ¿conoces todas y cada una de las tareas que realiza Ubuntu cuando activas una conexión de red?, y si es asi ¿qué ganas con eso?. Diablos, ¿donde está el código binario? ¡Es la única manera de saber qué es lo que está haciendo!

Bonus TRACK!!

11) Para odiar: WINDOWS REQUIERE CONSTANTES REINICIOS. Cada vez que instalamos una aplicación, un plug-in un parche o una actualización automática, Windows necesita reiniciarse.

11) Para no odiar: Bueno, Ubuntu pide a veces reiniciar pero son muchas menos veces. Ahora bien... cuantas veces al dia tienes que reinicar Windows. Odiemos a Windows por los reinicios.
¿Y por una razón cambiarse a Linux?, creo que no son los 10 motivos más importantes para dejar Windows (que por cierto los hay).

Autor Desconocido.... Sacado de Internet.

5 consejos para evitar correo fraudulento

2009-03-05T09:17:00.006-06:00

cuando uno es nuevo en esto del internet, nos topamos con que tenemos mensajes nuevos en nuestra bandeja de entrada, pero no sabemos, que onda

aqui te van 5 consejos para evitar correo fraudulento.

1) Sé precavido con los mensajes de correo electrónico en los que se te pide que indiques tus datos personales.

Todos los mensajes en los que se pide que indiques tu nombre, fecha de nacimiento, número de la seguridad social, nombre de usuario de correo electrónico, contraseña de correo electrónico o cualquier otro tipo de información personal, cualquiera que sea el remitente, son casi con total seguridad mensajes fraudulentos.

Si por algún motivo piensas que se trata de un mensaje fraudulento, no respondas al mensaje ni hagas clic en ningún hipervínculo. Copia y pega la dirección URL de Internet y visita el sitio web de la empresa para obtener información de contacto. No dudes en ponerte en contacto con el servicio de soporte técnico de la empresa para confirmar que se trata de un mensaje de correo legítimo.

2) Lee con atención los mensajes de correo electrónico que parezcan sospechosos.

Los mensajes de correo electrónico que están mal redactados, contienen errores tipográficos o incluyen frases como "esto no es una broma" o "reenvía este mensaje a tus amigos" suelen ser fraudulentos. Algunas veces los nombres o las marcas de las empresas están mal escritos o son inexactos, como escribir Windows Hotmail en lugar de Windows Live™ Hotmail.

3) Protege tu contraseña.

Crea una contraseña segura para tu cuenta de correo que tenga más de siete caracteres y una combinación de caracteres en mayúsculas y minúsculas, números y caracteres especiales, como los signos @ o #. También es aconsejable cambiar la contraseña periódicamente.

Si recibes una notificación del Servicio de soporte al cliente en la que se confirma tu solicitud de cambio de contraseña, como la que enviamos la semana pasada, y no has cambiado recientemente tu contraseña, eso es un indicio claro de que alguna persona está intentando obtener acceso a tu cuenta de correo, y debes cambiar inmediatamente la contraseña.

4) Toma medidas.

Si piensas que alguien ha tenido acceso a tu cuenta de Hotmail, que la página de inicio de sesión parece fraudulenta o recibes un mensaje de correo electrónico sospechoso que intenta confirmar un cambio de contraseña que no has autorizado, cambia inmediatamente la contraseña siguiendo las instrucciones de tu proveedor de correo electronico.

5) Ayúda a identificar nuevos fraudes.

Cuando detectes un correo electronico fraudulento, informa a tu proveedor de correo electronico para que este vea la forma de que no vuelvan a llegar esos correos.

y debes elegir "Informar acerca de correo de suplantación de identidad (phishing)". y algo muy importante "Bajo ningún concepto respondas al remitente del mensaje".

* Suplantación de identidad o "phishing" es la práctica de atraer a personas confiadas a un sitio web falso mediante un mensaje de correo electrónico de aspecto legítimo, algunas veces con el logotipo de una organización real, con la intención de apoderarse de datos personales valiosos, como los números de tarjeta de crédito, contraseñas u otra información.

informacion sacada de:

http://www.windowslive-hotmail.com/protectyourself/es/default.htm

Configuracion de Cables de Red

2009-02-09T10:10:00.002-06:00

Para montar una red es pieza fundamental los cables que unen los PC's con el HUB ó Switch. Por eso es importante tener en cuenta el tipo de cable el conector y el orden de los hilos.

Normalmente, para redes de 10 Mb/s utilizaremos cable par trenzado UTP categoría 5 que consta de 8 hilos que vienen colocados en pares de 2.

Los pares internamente vienen de la siguiente forma:
- Primer par de hilos: Blanco-Naranja. Naranja.
- Segundo par de hilos: Blanco-Verde. Azul.
- Tercer par de hilos: Blanco-Azul. Verde.
- Cuarto par de hilos: Blanco-Marrón. Marrón

Si queremos hacer un cable con las menores interferencias posibles para redes 10~100Mb/s. podemos seguir el siguiente orden:

Conector 1 .
1.- Blanco-Naranja
2.- Naranja
3.- Blanco-Verde
4.-Azul
5.-Blanco-azul
6.-Verde
7.-Blanco-Marron
8.-Marron

Conector 2 .
1.- Blanco-Naranja
2.- Naranja
3.- Blanco-Verde
4.- Azul
5.- Blanco-Azul
6.- Verde
7.- Blanco-Marrón
8.- Marrón

En redes a 10Mb/s la velocidad de transferencia es pequeña (5 ó 6 Mb/s.) con lo que podemos hacer el cable aunque los hilos que transportan señal + y - estén en pares diferentes, las interferencias entre ellos es menor.

En redes a 100 Mb/s. es imprescindible utilizar cable FTP, categoría 5, que se diferencia fundamentalmente con el UTP en la capa metálica sobre los hilos y bajo el forro, que sirve de apantallamiento.

El sistema par trenzado permite conseguir velocidades de datos elevadas; hasta 100Mb/s, pero es importante respetar el orden de cableado y la calidad del cable.

Si se quiere montar sólo dos equipos en red sin HUB ni Switch podemos hacer un cable con RJ45, y cruzamos los cables que cruza internamente el HUB ó switch.

Ésta configuración de cables que aparecen a continuación por la forma que están colocados en los pares nos permitirá con las menores interferencias posibles utilizarlo para conectar dos ordenadores directamente sin HUB, con tarjetas de red a 100Mb/s.

Conector 1.
1.- Blanco-Naranja
2.- Naranja
3.- Blanco-Verde
4.-Azul
5.-Blanco-azul
6.-Verde
7.-Blanco-Marron
8.-Marron

Conector 2.
1.- Blanco-Verde
2.- Verde
3.- Blanco-Naranja
4.- Azul
5.- Blanco-Azul
6.- Naranja
7.- Blanco-Marrón
8.- Marrón

Ocultar tu Aplicacion de la barra de tareas (delphi)

2009-01-22T07:53:00.002-06:00

En Ocaciones por casusas de fuerza mayor cuado desarrollamos pequeñas aplicaciones, nos vemos en la necesidad de que nuestra aplicacion no se muestre en el la barra de tareas (como muchos la conocen barra de inicio)

el procedimiento es muy sencillo, en el formshow

ponemos:

ShowWindow(application.Handle, SW_HIDE );

y es todo, de esta forma quedaria:

procedure TForm1.FormShow(Sender: TObject);

begin

ShowWindow(application.Handle, SW_HIDE );

end;

deshabilitar la memoria usb delphi

2009-01-20T11:45:00.004-06:00

Para mucha gente que tiene problemas con los virus que se pasan gracias a las memorias usb, una de las opciones que tube que poner es bloquear las memorias usb,

el procedimiento en delphi es el siguiente

procedure EnableUSB(Value: Boolean);

begin

with TRegistry.Create do

try

RootKey:= HKEY_LOCAL_MACHINE;

if OpenKey('\SYSTEM\CurrentControlSet\Services\USBSTOR',TRUE) then

begin

if Value then WriteInteger('Start',3)

else WriteInteger('Start',4);

CloseKey;

end;

finally

Free;

end;

y el procedimiento lo mandas llamar en cada boton por serado

EnableUSB(True); {para habilitar}

EnableUSB(False); {para deshabilitar}

recuerda que para este tipo de procedimientos donde se ahce referencia al registro, hay que utilizar la libreria Registry,

Marquesina Desplazante (Delphi)

2008-09-18T09:09:00.009-05:00

para este proyecto lo que vamos a necesitar en la form es: un timer, un label, y un edit, una variable llamada Txt, de tipo String, un boton para mostrar el Texto

suponiendo que a cada componente le dejamos el nombre por defaul, seguimos con lo siguiente

al edit, leponemos en su propiedad de texto: "Este es el texto que se va a estar moviendo".
al timer el intervalo lo dejamo en 100.
al label en su propiedad caption lo dejamos en blanco.

Codigo del boton:
Txt:= Edit1.Text;
Txt:=Label1.Caption;

En el Timer

Timer1Timer(Sender: TObject);

Txt := Label1.Caption;
Label1.Caption := Copy(txt, 2, Length(txt) - 1) + Copy(txt,1,1);

Esto es, si queremos que el texto se desplace hacia la Izquierda; ahora bien si queremos que se desplace hacia la derecha

Txt := Label1.Caption;
Label1.Caption := Copy(txt,Length(txt)-1,1) + Copy(txt,1, Length(txt)-1) ;

y listo tenemos nuestra marquesina desplazante.

Metodo para mensajes delphi

2008-09-17T10:57:00.004-05:00

primero, Declaramos la funcion antes del type, esto con el fin de solo mandar llamar el procedimiento como msgbox.

Function MsgBox(Texto, Titulo: String; Flags: Word): Integer;

la funcion en si

Function MsgBox(Texto, Titulo: String; Flags: Word): Integer;

var

TextoMost, TituloMost: array[0..300] of Char;

begin{________________________________________________________________
0 S/Botones ->16 Error ->32 Inter ->48 Adev ->64 Info
1 A C---->17 Error ->33 Inter ->49 Adev ->65 Info
2 A R O-->18 Error ->---------->50 Adev ->66 Info
3 S N C-->19 Error ->35 Inter ->51 Adev ->67 Info
4 S N---->20 Error ->36 Inter ->52 Adev ->68 Info
5 R C---->21 Error ->37 Inter ->53 Adev ->69 Info
6 C R Co->22 Error ->38 Inter ->54 Adev ->70 Info
A=Aceptar;C=Cancelar;R=Reintentar;N=No,S=Si;Co=Continuar;O=Omitir
__________________________________________________________________}

StrPCopy(TextoMost, Copy(texto, 0, 299));

StrPCopy(TituloMost, Copy(titulo, 0, 299));

MsgBox := Application.MessageBox(TextoMost, TituloMost, Flags);

end;

y se manda llamar

MsgBox(' Este es el mensaje ','barra de titulo ',48);

MEMORIA VIRUTAL

2008-09-17T09:33:00.002-05:00

Es un tipo de memoria que utiliza el sistema, pero en vez de almacenarse en los chips de la memoria RAM, se almacena en un archivo que está en nuestro disco duro.

Para descubrir los orígenes de la memoria virtual, tenemos que remontarnos a los años 40. En esa época tan solo existía un ordenador programable: el ENIAC, que debía ocupar como una habitación entera, lleno de válvulas y relés por todos los lados, y programable con tarjetas perforadas. Los programadores de semejante aparato se dieron cuenta de que los tiempos de búsqueda de sus programas eran enormes, así que propusieron asignar un bloque de memoria antes de iniciar la ejecución del programa, y después mantener este bloque creado durante toda su vida. Esto aceleraba los accesos de memoria, ya que ya estaba creada para el programa, sin embargo era un sistema muy rígido, ya que una vez asignada la memoria no se podía ampliar ni reducir su tamaño, y en esa época la cosa no estaba como para desperdiciar ni un solo octeto. Ya en los años 50, investigadores de la universidad de Manchester inventaron un método más astuto: dividirían la memoria en zonas (llamadas páginas lógicas) y almacenarían todas estas páginas en un tambor magnético (los abuelos de los discos duros que conocemos actualmente) . Cuando se fuera a ejecutar un programa, se llevaban a memoria central un grupo de páginas, dependiendo de los requisitos de memoria del programa a ejecutar. Podía ser una sola página (si el programa era pequeño), o todo el tambor completo (si el programa tenía mucho código o datos). Incluso durante la ejecución del programa, si era necesaria más memoria, se almacenaban en el tambor aquellas páginas que ya no fueran necesarias, y se volcaban en memoria nuevas páginas desde el tambor.Este método no llego a implementarse hasta 1962, cuando se construyó el ordenador Atlas, que fue el primer ordenador del mundo en utilizar un sistema de lo que hoy conocemos como “memoria virtual”.
Bien, volvamos a nuestro tiempo. Decíamos y que la memoria virtual es aquella que no se almacena en los chips de memoria, sin en un archivo de nuestro disco duro, que normalmente tiene extensión SWP (de Swap = intercambio). Este archivo, llamado archivo de paginación o de intercambio, sirve como una ampliación auxiliar de memoria cuando las cosas se ponen feas, es decir, cuando el sistema escasea de memoria (y en los tiempos que corren eso es demasiado habitual).Cuando tenemos muchas aplicaciones abiertas y el tamaño de todas ellas supera el total de memoria RAM física instalada, Windows mueve parte del contenido de la memoria al disco, para dejar espacio libre para nuevas aplicaciones, concretamente, mueve aquellas partes que hace más tiempo que no han sido accedidas. Cuando esos datos se necesitan de nuevo, se cargan otra vez en memoria. Por esta razón, cuando nuestro equipo está escaso de memoria, notamos que no para de leer del disco duro, porque está continuamente moviendo zonas de memoria del disco a RAM y viceversa (y por eso va lento).
Como veis, esto de la memoria virtual no es ninguna idea revolucionaria, y ya en los años 50 se pensaba en este sistema, aunque con las limitaciones de hardware que había en esa época.

Modelo de memoria plano

2008-09-17T09:33:00.001-05:00

Cada vez que hacemos doble clic sobre un ejecutable (o cualquier otra manera de iniciar un programa), Windows llamará a la función CreateProcess para iniciar un nuevo proceso. Una de las cosas que hace esta función (entre otras muchas) es crear un espacio privado de direcciones virtuales de 4 GB… ¿Mandeeeeeeeee? A muchos lo único que le sonará familiar son los 4 GB, porque el resto parece chino. No es tan complicado, esto significa que Windows considera que tenemos una memoria de 4 GB (casi ná) y encima toda para nosotros. Así que disponemos de un rango de direcciones desde $00000000 hasta $FFFFFFFF, desde 0 hasta 11111111111111111111111111111111 (que nadie los cuente, que son 32 bits) o en cristiano: desde el byte 0 al byte número 4.294.967.295.
En teoría podríamos recorrernos ese rango a través de un puntero y todo funcionaría. Y digo en teoría porque las cosas no son tan sencillas, pero luego veremos por qué. A este modo de gestionar la memoria se le denomina “Modelo de memoria plano”.
Que tengamos un espacio de direcciones de 4 GB no significa que tengamos 4 GB de memoria RAM instalada (a ver quien es el afortunado), sino que la suma entre la memoria RAM física, y la memoria virtual puede llegar a 4 GB. ¿Y qué es la memoria virtual?

varias formas de quitar mensaje windows original

2008-09-17T09:02:00.004-05:00

Algunos de uds, por no decir muchos deben tener las actualizaciones automáticas de su Windows XP activas y se encontraron con esta sorpresita. Ahora luego de haber actualizado su Windows les recuerda que son un gran apoyo a la piratería. Pues esta sección ha sido posteada para que ninguno de Uds se sienta mal por ello y elimine ese mensaje. A continuación los pasos para realizar esta tarea.
Inicia el Administrador de Tareas (Ctrl+Alt+Del).
Mata el proceso WgaTray.exe con el Administrador de Tareas.
Reinicia Windows XP en Modo Seguro (Safe Mode).
Borra el archivo WgaTray.exe de c:\Windows\System32.
Borra el archivo WgaTray.exe de c:\Windows\System32\dllcache.
Ve a Inicio->Ejecutar y escribe ‘RegEdit’.
Encuentra la carpeta en la dirección:HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft Windows\ NT\CurrentVersion\Winlogon\Notify
Borra la carpeta ‘WgaLogon’ y todos sus contenidos
Reinicia Windows XP.
Deshabilita las actualizaciones automáticas
Y adiós mensaje de piratería. Esto es realmente bueno.

Sacado de:
http://tech2live.wordpress.com/2006/10/19/eliminar-mensaje-copia-de-windows-no-es-original/

___________________________________________________________

Windows Genuine Advantage (WGA) es una utilidad antipiratería creada por Microsoft que, cuando se instala en Windows (a través de las actualizaciones automáticas), hace que nuestro ordenador se conecte automaticamente a los servidores de Microsoft de forma periódica para comprobar si nuestro Windows es original (esta herramienta se parece sospechosamente a un spyware).
Si no es original, muestra continuamente un molesto mensaje en la barra de tareas indicando que la copia de Windows no es legal. Muchas veces muestra este mensaje aunque nuestro Windows sea 100% original.
Para quitar ese mensaje, tenemos la herramienta removewga. Basta con abrir el programa y nos dirá si el WGA está ejecutándose en nuestro sistema y si es así, nos da la opción de deshabilitarlo, de forma que el mensaje no volverá a aparecer.
Si bajamos actualizaciones de Windows,el mensaje volvera a aparecer y será necesario volver a ejecutar el programa. Si esto te parece pesado, puedes bajar este fichero y guardarlo en la carpeta donde tienes el programa removewga. Después haces un acceso directo del fichero que acabas de bajar y lo pones en el menu inicio, programas, inicio. Así el programa se ejecutará cada vez que inicie Windows, pero solo nos mostrará un mensaje si el WGA está activo.
Si lo que quieres es activar Windows 2003, aquí tienes la solución.
Página oficial del programa
Información sobre WGA en Wikipedia (Inglés)

Sacado de:
http://igorgarcia.es/blog/quitar-genuine-advantage

____________________________________________________________

1. Inicie sesión en el equipo con una cuenta que tenga permisos administrativos.
2. Compruebe que la versión de Notificaciones WGA que existe en el equipo es una versión piloto. La versión piloto es la 1.5.0532.x. En este caso, solamente puede desinstalar las versiones 527-532.
Por ejemplo, usted puede desinstalar las versiones que van de la 1.5.0527.0 a la 1.5.0532.2. Para encontrar la versión de Notificaciones WGA, siga estos pasos:
a. Haga clic en Inicio y, después, en Panel de control.
b. Haga doble clic en Agregar o desinstalar programas, haga clic en Notificaciones de Ventajas de Windows Original y en Haga clic aquí para obtener información de soporte.c. En el cuadro de diálogo Información de soporte, compruebe el número de versión y haga clic en Cerrar.
3. Cambie el nombre de los archivos siguientes cambiando la extensión a .old:
• Cambie el nombre de %Windir%\system32\WgaLogon.dll por el de %Windir%\system32\WgaLogon.old• Cambie el nombre de %Windir%\system32\WgaTray.exe por el de %Windir%\system32\WgaTray.old
4. Reinicie el equipo.
5. Quite del Registro LegitCheckControl.dll utilizando Regsvr32. Para ello, siga estos pasos:
a. Haga clic en Inicio y en Ejecutar, escriba cmd y haga clic en Aceptar.
b. En el símbolo del sistema (cmd), escriba lo siguiente y presione ENTRAR:
Regsvr32 %Windir%\system32\LegitCheckControl.dll /u
6. Reinicie el equipo.
7. Haga clic en Inicio y en Ejecutar, escriba cmd y haga clic en Aceptar.
8. En el símbolo del sistema, elimine los archivos siguientes escribiendo el comando Del. Presione ENTRAR después de cada comando.
• Del %Windir%\system32\wgalogon.old• Del %Windir%\system32\WgaTray.old• Del %Windir%\system32\LegitCheckControl.dll
9. En el símbolo del sistema, escriba regedit.
10. Busque la siguientes subclaves del Registro y haga clic con el botón secundario del mouse (ratón) en ellas. Haga clic en Eliminar después de buscar cada subclave.• HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon\Notify\WgaLogon• HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\Uninstall\WgaNotify

sacado de
http://www.forospyware.com/t46542.html
_______________________________________________________________

Configurar el Modem 2Wire para Wireles

2008-01-20T18:15:00.000-06:00

hola que tal tal vez algunos se han topado con el problema de que la lap no funciona, con la configuracion del modem 2 wire que telmex da, pues bien aqui les explicare, las soluciones de los problemas mas comunes que pueden ser:

1. En ocasiones el Wireles de la lap esta desactivado, esto es solo para ahorrar un poco de energia, ya que como en los celulares el bluetooth esta desactivado en las lap, es igual, solo tienes que buscar en un lado de ella, un interruptor, y ponerlo en on, para activarlo, si en su defecto, no encuentras uno, busca en el el teclado una pequeña antenitta, esta debe de estar de color azul, que indica que lo puedes activar, o desactivar con el teclado, presionando la tecla de funcion del teclado seguido de la tecla donde se encuentra esta ícono antes mencionado.

Si al hacer esto no logras conectarte, y recives un mensaje que de que no se puede activar, entonces habria que checar lo que es el software, que controla, la tarjeta wireles, para saber cual es, es muy fácil, cuando abres las conexiones, te muestra cual es el software y como activarlo, si despues de esto no hay ninguna respuesta entonces debemos de checar la configuracion del modem.

2. En Ocasiones el modem, no tiene configurado ninguna contraseña, pero esta habilitada la seguridad inalámbrica, y en la configuracion de la lap, por fuerza tenemos que ponerle contraseña, pues bien lo que hay que hacer es:

en cualquier explorador de internet (ie, mozila, etc.) ponemos la siguiente direccion: 192.168.1.254, nos enviara a la página principal del modem

despuesdaremos click en el ícono de Red Domestica que es el tercero de la parte de arriba, y en el sub menu, seleccionamos configuracion inalámbrica,

Aqui debemos de checar que el boton de inalámbrico debe de estar " DESABILITAR", esto nos indica, que esta habilitado, pues bien si esta todo correcto, damos click a el boton de "MODIFICAR CONFIGURACION"

En esta parte solo debemos de desactivar la opcion de seguridad inalambrica, si esque queremos que cualquier persona entre, si no es asi, le ponemos una clave, y esta es la que ponemos en la lap, y ya tenemos una configuracion de nuestro modem

buscar archivos de txt sin conocer el nombre

2008-01-15T09:03:00.001-06:00

este procedimiento es para delphi 7.0, solamente ahi lo he probado

Procedure TInterfaz.Cargar Sender:TObject);
Var
MiArchivoTxt:TextFile;
NombreArchivo, ArchivoABuscar,RutaArchivo:String;
SearchRec: TSearchRec;
Begin
ArchivoABuscar:='C:\*.Txt';
RutaArchivo:= 'C:\';
Try Begin
If FindFirst(ArchivoABuscar, faAnyFile and not (faVolumeID or faDirectory), SearchRec) = 0 then
Begin
Repeat
NombreArchivo:= SearchRec.Name;
AssignFile(MiArchivoTxt, NombreArchivo);
Memo1.Clear;
Memo1.lines.LoadFromFile(RutaArchivo + NombreArchivo);
DeleteFile(NombreArchivo);
Until FindNext(SearchRec) <> 0;
FindClose(SearchRec);
End;
End;
Except end;
End;

Checar Fuente de Poder

2008-01-02T09:54:00.000-06:00

En Ocasiones nos pasa que el equipo se nos reinicia, o solo entra y en unos cuantos segundos se reinicia o se apaga; una de las razones es por que la fuente de poder no esta aguantando el voltaje que requiere la tarjeta madre, o que tenga polvo en las conexiones y no haga bien contacto, ahora que si no prende lo que puedes ser esque la fuente de plano ya no sirve, ya se te murio.

pues bien para la primera opcion de que no este dandote el ancho, puedes o mas bien debes comprarte otra fuente de poder mas grande, y para no volver a regarla, checate las especificaciones de la tarjeta madre.

Si lo que tiene es polvo, solo quita las conexiones, y con aire comprimido, le das una soplada, para quitar el exceso de polvo,vuelves a conectar y listo.

Ahora para checar si tu fuente de poder sigue funcionando, sácala completamente de tu gabinete y mantenla desconectada, solo para tener un poco mas de comodidad;

Con un clip o algo que haga corriente, un alambre o algo por el estilo, lo vas introducir en el conector mas grande regularmente es el ATX, en el cable verde y la otra punta a uno de los cables negros que sería la tierra, Despues conectas la corriente; si la prende la fuente de poder, esque aun funciona, pero si esta no prende, o se apaga despues de un ratito, quiere decir que tu fuente de poder ya no sirve.

Hay algo que no debes de dejar pasar, que es los voltajes, esto lo puedes hacer con un multimetro, y checaras que tegan 3.3v (amarillo), 5v (rojo) y 12 (Naranja), cada uno con un cable negro, que son las tierras, y nadamas te sercioras que sean de ese voltaje y que no sobrepasen o les falte, por que si esto pasa, quiere decir que la fuente esta dañada.

comandos de ms-dos

2007-12-17T10:15:00.000-06:00

Comandos bajo MSDOS en Windows XP

Para acceder a la consola de comandos, tan sólo tendremos que ir al menú Inicio, seleccionar la opción ejecutar y escribir cmd.exe

Archivos y sistemas de ficheros:

cacls - Permite modificar los permisos en ficheros y carpetas, permitiendo o prohibiendo a cada usuario leer, escribir o modificar el contenido de dichos archivos o carpetas.

chkdsk- Comprueba el estado de una partición y repara los daños en caso de que encuentre alguno. Si lo ponemos sin ningún parámetro simplemente escaneará la partición, si queremos que además corrija los errores, deberemos añadir la opción /F, es decir, chkdsk /F

cipher- Permite cifrar archivos, directorios o particiones siempre que se encuentren en el sistema de archivos NTFS.

comp- Compara archivos o carpetas y muestra las diferencias existentes entre ellos.

compact- Permite comprimir archivos o carpetas para ahorrar espacio en el disco duro. Para comprimir los archivos deberemos utilizar el modificador /c y para descomprimirlo en modificador /u. Por ejemplo, para comprimir la carpeta c:\pruebas debemos utilizar el comando compact /c c:\pruebas y para descomprimirla compact /u c:\pruebas

convert- Convierte particiones FAT ó FAT32 a NTFS. Antes de utilizar este comando es recomendable realizar una copia de seguridad puesto que es posible que durante la conversión se pierdan datos.

defrag- herramienta para el intérprete de comandos que nos permitirá defragmentar volúmenes.

diskpart- utilidad con la que administraremos las particiones de nuestros discos. Al introducir *diskpart* en el intérprete de comandos, nuestro prompt se cambiará por DISKPART>. Con *diskpart /?* obtendremos ayuda sobre esta utilidad y para volver a c/ debemos escribir la palabra EXIT.

driverquery- Obtendremos una lista de los controladores de sistema y sus propiedades.

find y findstr-Estos comandos buscan cadenas de textos en el interior de uno o varios archivos. Sin embargo, el comando findstr ofrece más opciones de búsqueda que el comando find.

fsutil- Con este comando podemos administrar muchos aspectos de nuestro sistema, desde consultar el espacio libre en un volumen, hasta administrar las cuotas de usuario.

getmac- Con esta utilidad obtendremos la dirección MAC (Media Access Control) del adaptador de red.

gpresult- Conseguiremos el RSOP (Resultant Set Of Policies), es decir, la configuración de directivas de grupo y la configuración del usuario.

iexpress- Este comando lanzará un asistente para crear archivos comprimidos .CAB autodescomprimibles.

netsh- La herramienta de configuración de red. Escribiendo *netsh* entraremos en la herramienta y nuestro prompt se cambiará por NETSH>. Con *netsh /?* aprenderemos más sobre esta herramienta.

openfiles- Herramienta que permite al administrador mostrar o desconectar archivos abiertos a los que estén accediendo de forma remota otros usuarios.

recover- Con este comando intentaremos recuperar toda la información legible de un disco dañado.

reg- La herramienta de edición del registro en modo texto. Con ella podremos exportar, copiar, restaurar, comparar registros y muchas otras tareas.

sfc- El comprobador de archivos de sistema verificará todos los archivos críticos y reemplazará aquellos que nosotros o alguna aplicación hayan modificado o reemplazado con la versión oficial de Microsoft.

Configuración del sistema:

bootcfg: Permite ver y modificar las entradas del archivo boot.ini. Estas entradas nos permiten seleccionar con que sistema operativo deseamos iniciar el equipo.

control userpasswords2: Permite modificar las claves y los permisos de los diferentes usuarios, así como requerir la pulsación de control+alt+suprimir para poder iniciar sesión, haciendo el inicio de sesión más seguro.

driverquery: Hace un listado de todos los drivers instalados en el sistema y muestra información sobre cada uno de ellos.

dxdiag: Lanza la herramienta de diagnóstico de Direct X, con la cual podremos comprobar la versión Direct X que tenemos instalada y permite comprobar mediante tests que todo lo referente a estos controladores funcione correctamente.

gpresult: Muestra información sobre las políticas de grupo aplicadas a un usuario.

gpupdate: Vuelve a aplicar las políticas de grupo.

msconfig: Desde esta aplicación en modo gráfico podremos seleccionar que programas y servicios se cargan durante el inicio de Windows así como los sistemas operativos que el usuario puede seleccionar para iniciar el ordenador.

pagefileconfig: Permite configurar el archivo de paginación de Windows.

prncnfg: Muestra información sobre las impresoras instaladas

prnjobs: Muestra información sobre los trabajos de impresión en cola.

sc: Este commando nos permite administrar los servicios, ya sea iniciar uno, detenerlo, mandarle señales, etc.

sfc: Este comando permite buscar archivos del sistema dañados y recuperarlos en caso de que estén defectuosos (es necesario el CD de instalación del sistema operativo para utilizarlo). Para realizar una comprobación inmediata, deberemos ejecutar la orden sfc /scannow.

systeminfo: Muestra información sobre nuestro equipo y nuestro sistema operativo: número de procesadores, tipo de sistema, actualizaciones instaladas, etc.

taskkill: Permite eliminar un proceso conociendo su nombre o el número del proceso (PID).

tasklist: Realiza un listado de todos los procesos que hay. Útil si deseamos eliminar un proceso y no conocemos exactamente su nombre o su PID.

Redes:

arp: Muestra y permite modificar las tablas del protocolo ARP, encargado de convertir las direcciones IP de cada ordenador en direcciones MAC (dirección física única de cada tarjeta de red).

ftp: Permite conectarse a otra máquina a través del protocolo FTP para transferir archivos.

getmac: Muestra las direcciones MAC de los adaptadores de red que tengamos instalados en el sistema.

ipconfig: Muestra y permite renovar la configuración de todos los interfaces de red.

nbtstat: Muestra las estadísticas y las conexiones actuales del protocolo NetBIOS sobre TCP/IP, los recursos compartidos y los recursos que son accesibles.

net: Permite administrar usuarios, carpetas compartidas, servicios, etc. Para un listado completo de todas las opciones, escribir net sin ningún argumento. Para obtener ayuda sobre alguna opción en concreto, escribier net help opción.

netsh: Este programa en modo consola permite ver, modificar y diagnosticar la configuración de la red

netstat: Mediante este comando obtendremos un listado de todas las conexiones de red que nuestra máquina ha realizado.

nslookup: Esta aplicación se conecta a nuestros servidores DNS para resolver la IP de cualquier nombre de host.

pathping: Muestra la ruta que sigue cada paquete para llegar a una IP determinada, el tiempo de respuesta de cada uno de los nodos por los que pasa y las estadísticas de cada uno de ellos.

ping: Poniendo detrás del comando ping el nombre o la dirección IP de la máquina, por ejemplo ping 192.168.0.1 enviaremos un paquete a la dirección que pongamos para comprobar que está encendida y en red. Además, informa del tiempo que tarda en contestar la máquina destino, lo que nos puede dar una idea de lo congestionada que esté la red.

rasdial: Permite establecer o finalizar una conexión telefónica.

route: Permite ver o modificar las tablas de enrutamiento de red.

tracert: Muestra el camino seguido para llegar a una IP y el tiempo de respuesta de cada nodo.

Cambiar de ip con Modem De Telmex o 2wire

2007-11-22T11:41:00.001-06:00

Creo que a muchos nos ha pasado que cuando queremos bajar mas de un archivo de las paginas de Rapidshare Depositfiles, y servidores similares, estos detectan tu ip, y no te permiten descargar hasta pasado cierto tiempo... y la verdad esto es bastante desesperante sobre todo cuando los archivos que estas descargando los pueden eliminar, por quien sabe que razon verdad.

Lo que puedes hacer es muy sencillo (teniendo en cuenta que tengas un modem 2wire de telmex, me imagino que ha de funcionar similarmente para los demas).

Abres el explorador de Internet, cualquiera que utilices, ya sea, mozila firefox o internet explorer, opera, Etc. y pones 192.168.1.254 y enter.

Esto es para poder eccesar a la pagina de configuracion del modem, una vez, que hayas entrado a la configuracion, te vas a la seccion de "Banda Ancha" y anotas la ip que aparece, solo con fines de referencia,

El das click a configuracion avanzada, en la parte superior derecha, esta activada "Obtener dirección IP automáticamente"; pues activas "Configurar manualmente la configuración de la dirección IP:" y se activara una caja de texto en la cual vas a poner la ip que tenias, pero cambiando la última parte

Ejemplo:
ip que tenias: 189.187.15.11
ip que pondrias 189.187.15.10
Por último guardas.

El último grupo de numeros es el que debes de cambiar, sin rebasar el 255, osea que el rango que debes poner va desde el 1 hasta el 255. Si cambias uno de los otros grupos de numeros la ip ya no funcionara de ninguna forma.

Esto no te garantiza que cualquier ip que pongas, te va a funcionar, ya que alguna ip pudiese estar ocupada, por otro modem, recuerda que la ip, es el que identifica a cada maquina, o a cada peticion que se haga en internet, por lo que no puede existir ninguna ip repetida.

por lo cual si la ip que pusiste esta ocupada, a el modem le predera un led de color rojo, indicando que no hay internet, esto no hay ningun problema, puedes seguir amuentando el numero, hasta que lo consigas, no te preocupes por tu modem, no le pasara nada, ya que estos son procesos que regularmente los hace tu modem.

bueno pues suerte

historia de windows

2007-10-25T18:40:00.000-05:00

una peuqña reseña de lo que ha sido el boot de windows

Recuperar Contraseñas de Windows (OphCrack)

2007-10-23T17:49:00.000-05:00

Buscando Tonterias y cosas por el estilo me encontré un programita para darle en la madre a las contraseñas de windows tanto del xp como del vista WOW si del vsita Tañen,
el programa se llama OphCrack... y si como se imaginan esto solo podía ser por linux, osease que truena las de linux como las de windows (la primera no la he comprobado), el sistema de OphCrack, trabaja sobre el sistema SAM (Security Accounts Manager), que es el sistema que se encarga de la seguridad de casi todos los Windows,

para recuperar la contraseña es muy sencillo, lo que debes de hacer es lo siguiente:
te bajas la imagen del archivo aqui
quemas la imagen en un cd
en el equipo en el que vallas a recuperar la contraseña, te aseguras de que tenga el boot primario en el cd
y cuando la prendas metes el cd par que incie desde el cd, lo dejas que corra, y listo, ya tienes las contraseñas de los o del usuario.

coste, pero coste que la información es mera informativa, nunca para lucrar, solo para informar

aqui les dejo el vídeo par que vena que si jala

Windows Xp Edicion Desatendida (EU Unattended Edition)

2007-10-20T10:05:00.000-05:00

que onda jóvenes, buscando pendejadas y chingaderas, me encontré con la versión desatendida del windows xp con el paquete de servicios (SP) 2, y con unas cuantas mejoras y eliminacion de software, que no valia la pena tener instalado en el equipo, bueno para usuarios convencionales que solo utilizan la mínima parte del windows.

a el chavo que se dedicaba a este cotorreo, el que lo modificaba, lo obligaron a que cerrara la pagina, por motivos que ya todos hemos de imaginar... aqui les dejo la pagina para que chequen su despedida, casi me hace llorar..

http://www.windowsue.com/
y aqui esta lo que habia en su pagina:

Actualizaciones:

msxml2.msi
msxml2sp6-KB887606
msxml4-KB927978
msxml6_x86.msi
WindowsInstaller-KB893803-v2
WindowsMedia-KB911564
WindowsMedia6-KB925398-v2
WindowsMedia6-KB925398
WindowsMedia9-KB917734
WindowsUpdateAgent30-x86.exe

KB873333 KB873339 KB885222 KB885250 KB885626
KB885835 KB885836 KB886185 KB887472 KB887742
KB887797 KB888111 KB888113 KB888302 KB889527
KB890046 KB890830 KB890859 KB891781 KB893086
KB893357 KB893756 KB894391 KB896256 KB896358
KB896422 KB896423 KB896424 KB896428 KB896688
KB897663 KB898461 KB899587 KB899588 KB899589
KB899591 KB900485 KB900725 KB900930 KB901017
KB901214 KB902400 KB904412 KB904706 KB904942
KB905414 KB905474 KB905749 KB905915 KB906569
KB907865 KB908519 KB908521 KB908531 KB909095
KB909520 KB910437 KB911280 KB911562 KB911567
KB911927 KB912812 KB912919 KB913446 KB913580
KB914388 KB914389 KB914440 KB916281 KB916595
KB916846 KB917344 KB917953 KB918005 KB918118
KB918439 KB918899 KB918997 KB919007 KB920213
KB920214 KB920342 KB920670 KB920683 KB920685
KB920872 KB921398 KB921883 KB922582 KB922616
KB922760 KB922819 KB923191 KB923414 KB923689
KB923980 KB924191 KB924270 KB924667 KB924867
KB925454 KB925486 KB925902 KB926247 KB926255
KB926436 KB927779 KB927802 KB927891 KB928090
KB928255 KB928388 KB928843 KB929120 KB929123
KB929338 KB929969 KB930178 KB930916 KB931261
KB931784 KB931836 KB933566 KB935448 KB935839
KB935840 KB936357 KB938828 KB939373

En total son 139.
He quitado algunas que ya eran obsoletas porque están sustituidas por otras más nuevas.

Características básicas:

• WGA 1.7 - Parche para Windows Geniune Advantage 1.7
• WU6 - Windows Update 6
• DirectX 9.0c - Agosto 2007
• UXTheme - UXTheme.dll modificado para soportar temas no firmadas
• 5.000 conexiones simultaneas sin terminar (antes 10)
• SFC Deshabilitado - protección de archivos de sistemas deshabilitada
• Sin requerimientos mínimos (RAM & HDD) para la instalación
• Prefetch Cache - arranque
• 95% instalable en cualquier partición - ahora ya casi no es necesario que sea C:
• OEM desactivado - podrás cargar los controladores SATA desde el disquete como con cualquier Windows XP
• Windows Firewall - desactivado
• WPI ahora con barra de progreso - podrá ver lo que falta para terminar la instalación
• WPI ahora funciona en resolución 800×600 pero se recomienda 1024×768 como mínimo
• Se limpian algunos registros después de la instalación
• Limpieza automáticamente después de la instalación (temporarios)
• Ya no tiene contraseña

Lista aplicaciones que se incluyen:

1. .Net Framework 1.1 SP1 (+Up)
2. .Net Framework 2 (+Up)
3. Adobe Reader 8.1 (Lite)
4. Alcohol 120% 1.9.6.5429
5. BSPlayer Pro 2.22
6. CCleaner 1.41
7. Damn NFO Viewer
8. DVD Shrink 3.2.0.16
9. eMule 0.48a {Oficial}
10. Everest Ultimate Edition 4.0.976
11. GMail Drive 1.0.11
12. Google Toolbar 4
13. HashTab Shell Extension 1.11
14. Image Resizer Powertoy
15. ImageShack QuickLoad 1.0.36
16. Internet Explorer 7 (+ 4 Up)
17. Java RE Version 6 Up2
18. K-Lite Codec Pack 3.3.0 Standard
19. Live Messenger 8 (-Pub)
20. Microsoft Office 2003 SP2 (OGA + Up)
21. Mozilla Firefox 2.0.0.5 + Plugins
22. Nero Burning Rom 7.10.1.0 Lite
23. NOD32 Antivirus System 2.70.39
24. Windows uE Sound Scheme v2
25. Picasa 2.7
26. Windows Media Player 11
27. PowerDVD 7 Deluxe
28. PuTTY 0.60
29. QT Lite 1.11
30. Real Alternative 1.52
31. Shockwave 10.2.0.22
32. Skype 3.2.32.175
33. TaskSwitchXP Pro 2.0.11
34. TuneUp Utilities 2007 6.0.2200.0
35. Unlocker 1.8.5
36. uTorrent 1.7.2
37. Virtual Desktop Manager Powertoy
38. Winamp 5.35 Pro + MMD3 Theme
39. WinRAR 3.70
40. WinSnap 2.0.7
41. XPize 4.6 Lite
42. Yahoo! Instant Messenger 8.1 (-Pub)

Tweaks (registros para configurar opciones):

43. Desactivar la barra de idioma
44. Activar Auto-Arranque CD/USB
45. Activar carpeta TEMP clásica
46. Activar la cuenta de Administrador
47. Activar Restaurar Sistema
48. Activar IMAPI - Grabador Windows XP

Algunas especificaciones:

• .Net Framework 1.1 SP1 (+ Actualizaciones) - incluye además de SP1 - KB928366 y español
• .Net Framework 2 (+ Actualizaciones) - incluye KB928365 y español
• Adobe Reader 8.1 (Lite) - versión básica
• eMule 0.48a {Oficial} - versión oficial - no modificada
• Internet Explorer 7 (+ 4 Actualizaciones) - incluye KB929969 KB931768 KB933566 y Roots-Update: KB933566
• Live Messenger 8 (- Publicidad) - incluye parche para quitar la publicidad
• Microsoft Office 2003 SP2 (OGA + Up) - incluye OGA (Office Genuine Advantage) ademas de muchas actualizaciones
• Mozilla Firefox 2.0.0.5 + Plugins - incluye plugins para Flash, Shockwave y Windows Media Player
• Nero Burning Rom 7.10.1.0 Lite - version basica - incluye Nero Burning ROM y Nero Express
• Windows uE Sound Scheme v2 - sonidos únicos de esta versión - compilación realizada por AdrenalinE
• WinSnap 2.0.7 - versión PRO
• Yahoo! Instant Messenger 8.1 (- Publicidad) - incluye parche para quitar la publicidad

aqui les dejo los enlaces para que bajen las version, yo ya la cheque, esta muy chida y la neta, para gente que nos dedicamos a desmadrar las computadoras de los demas esta chido, metes el cd, te vas a hecharte unas cheves, te puedes poner ebrio, y no la cagas por que todo se instala,

nadas faltan los drivers que siempre van a ser problemas

http://torrents.thepiratebay.org/3759021/Windows_XP_Service_Pack_2_Unattended_Edition_version_7.3759021.TPB.torrent

http://www.gigasize.com/get.php/-1099751450/WinXP_Sp2_uE_v7_-_Bj_-_Spanish.rar

http://www.pando.com/link/preinstall?package=528B9BB227D760F452373474161AAB8F6A3803AC&key=0D283BBB422B70E0D0CB34DD02591E0B148FCC3627F32A873D8C877823765252&referer=http%3A%2F%2Fwww.taringa.net%2Fpost.php%3Fid%3D868308

http://www.megaupload.com/es/?d=GPWLZBTE

espero que les sirva