Ayuda con tus Tareas

Creando Punto de Restauración en Windows 7

Mr. FotoPex — Fri, 19 Mar 2010 16:03:41 +0000

Se recomienda crear un Punto de Restauración antes de la instalación de programas o de realizar un gran cambio en el sistema operativo.

Para poder crear un punto de restauración en el sistema operativo de Windows 7 (Windows Seven) vamos a:

Click en el Botón Inicio y después click derecho sobre el elemento Equipo y seleccionamos Propiedades.

Ahora damos click en el enlace Protección del Sistema situado a la izquierda de la carpeta.

En la pestaña Protección de Sistema debemos de darle click en el botón que dice Crear.

En la ventana que aparecerá debemos escribir una descripción que nos ayude a recordar el punto de restauración que estamos creado. Y damos click en Crear.

El proceso tardara dependiendo de la cantidad de datos que tengamos y la velocidad de nuestro equipo. Una vez creado nuestro punto de restauración podemos instalar y modificar nuestro sistema.

Solución error SQL_BIG_SELECTS

Mr. FotoPex — Wed, 17 Mar 2010 21:03:50 +0000

El problema viene porque estas cargando una consulta que MySqL considera que puede ser grande ó se hacen bastantes relaciones entre las tablas.

The SELECT would examine more than MAX_JOIN_SIZE rows; check your WHERE and use SET SQL_BIG_SELECTS=1 or SET SQL_MAX_JOIN_SIZE=# if the SELECT is okay

Ese error es debido a la variable de MySQL SQL_BIG_SELECTS, y en el mensaje mismo te indica la respuesta:

SELECT examinará más de MAX_JOIN_SIZE filas, revisa tu WHERE y usa SET SQL_BIG_SELECTS = 1 o SET SQL_MAX_JOIN_SIZE = # si el SELECT está bien.

Así que antes de correr tu consulta debes indicar al MySQL que permita el uso de consultas extendidas, para eso hay que ejecutar el siguiente query con la variable SQL_BIG_SELECTS:

mysql_query("set sql_big_selects=1");

Ejemplo:

Texto Plano

PHP:

mysql_query('SQL_BIG_SELECTS=1'); // aquí ampliamos la consulta
$Ssql = 'SELECT .... FROM ...
INNER JOIN ...
INNER JOIN ...
WHERE ....
AND ...
ORDER BY ...';
$result = mysql_query($Ssql);

SQL_BIG_SELECTS = {0 | 1}

Con valor 0, MySQL aborta los comandos SELECT que probablemente tardarán mucho tiempo (esto es, comandos para los que el optimizador estima que el número de registros examinados excede el valor de max_join_size). Esto es útil cuando un comando WHERE no aconsejable se ejecuta. El valor por defecto para una nueva conexión es 1, que permite todos los comandos SELECT .

Si cambia la variable de sistema max_join_size a un valor distinto a DEFAULT, SQL_BIG_SELECTS se pone a 0.

Convertir un archivo .nrg (Nero) a .iso en Linux

Mr. FotoPex — Wed, 17 Mar 2010 14:32:04 +0000

Vamos a utilizar nrg2iso, nrg2iso es un programa que extrae los datos ISO9660 de un archivo .nrg (Nero).

Primero instalamos nrg2iso:

$ sudo apt-get install nrg2iso

La sintaxis para ser utilizado es:

nrg2iso [nrg-file] [iso-file]

Una vez que lo tengas instalado, para convertir un fichero de nero llamado image.nrg a un fichero iso llamado image.iso, ejecutamos:

$ nrg2iso image.nrg image.iso

Algunas ocasiones recibiremos el mensaje is already an ISO 9660 image, "ya es una imagen ISO 9660", entonces no es necesario convertirlo, solamente cambia la extensión y podrás utilizar tu archivo.

Kubuntu 9.10 sin sonido en youtube

Mr. FotoPex — Mon, 15 Mar 2010 17:43:02 +0000

Después de la instalación de Kubuntu y posteriormente de Firefox, al reproducir un video, solo podemos observarlo pero no se escucha el sonido de este. De igual forma no son solo los videos de youtube, sino cualquier video que se encuentre en la web y que este basado en flash (flv) tiene ese problema.

La solución es tan simple como subir el volumen:

1.- Click sobre el ícono de la bocina (de KMix) que aparece en la parte inferior derecha de la pantalla (en el panel de tareas).

2.- Click sobre el botón mezclador. Eso abrirá una ventana pequeña.

3.- Click sostenido y subir el control que aparece en el medio PCM.

Así de fácil.

Escribir datos de un OleDbDataReader a un archivo de texto

Mr. FotoPex — Wed, 10 Mar 2010 23:46:01 +0000

OleDbDataReader proporciona el modo de lectura de una secuencia de filas de datos de tipo sólo avance de un origen de datos. Esta clase no se puede heredar.

Para crear OleDbDataReader, se debe llamar al método ExecuteReader del objeto OleDbCommand, en lugar de utilizar directamente un constructor.

Mientras se está utilizando OleDbDataReader, el objeto OleDbConnection asociado está ocupado dando servicio a OleDbDataReader, y en OleDbConnection no se puede realizar ninguna otra operación, excepto la de cerrar. Esto es así hasta que se llama al método Close de OleDbDataReader. Por ejemplo, no se pueden recuperar parámetros de salida hasta después de llamar a Close.

Los cambios que realiza otro proceso o subproceso en un conjunto de resultados mientras se leen los datos, pueden ser visibles para el usuario de OleDbDataReader. Sin embargo, el comportamiento exacto depende de los intervalos de tiempo.

IsClosed y RecordsAffected son las únicas propiedades a las que se puede llamar después de cerrarse OleDbDataReader. Si bien se puede obtener acceso a la propiedad RecordsAffected mientras exista OleDbDataReader, se debe llamar siempre al método Close antes de devolver el valor de RecordsAffected para garantizar que el valor devuelto sea exacto.

En el siguiente ejemplo se crean OleDbConnection, OleDbCommand y OleDbDataReader. En el ejemplo se leen los datos y se escriben en la consola. Por último, en el ejemplo se cierra OleDbDataReader y, a continuación, OleDbConnection.

Texto Plano

VB.NET:

Public Sub ReadData()
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\FotoPex\FpTimer\data\data.mdb"
Dim queryString As String = "SELECT usuario, Format(entrada, 'hh:mm:ss') as Entrada, Format(salida, 'hh:mm:ss') as Salida FROM(bitacora) WHERE (((fecha)=#03/04/2010#)) Order by id DESC ;"
Using connection As New OleDbConnection(connectionString)
Dim command As New OleDbCommand(queryString, connection)
connection.Open()
Dim reader As OleDbDataReader = command.ExecuteReader()
While reader.Read()
Console.WriteLine(reader(0).ToString())
End While
reader.Close()
End Using
End Sub

Ahora vamos a ver una variante del ejemplo para escribir datos de una tabla a un archivo de texto, pero esta vez utilizaremos un OleDbDataReader para obtener los datos. No olvidemos declarar el NameSpace Imports System.IO

Texto Plano

VB.NET:

Private Sub GrabaArchivo()
Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\FotoPex\FpTimer\data\data.mdb")
Dim sql As String
Try
' preparamos el archivo
Dim Bitacora As StreamWriter
Dim NuevaLinea As String = ""
Dim newFileName As String = BitacoraPath & Date.Today.ToString("MMM dd yyyy") & ".txt"
' verificamos si existe
If File.Exists(newFileName) = False Then
' lo creamos
Bitacora = File.CreateText(newFileName)
Else
' lo abrimos para agregar texto
Bitacora = File.AppendText(newFileName)
End If
NuevaLinea = "Time: " & Date.Now.ToShortTimeString & vbCrLf & _
"Usuario" & vbTab & " Entrada " & vbTab & " Salida " & vbTab & "Total"
'agregamos datos al buffer en una linea nueva
Bitacora.WriteLine(NuevaLinea)
' buscamos los resultados
cn.Open()
' por otro carácter
sql = "SELECT usuario, Format(entrada, 'hh:mm:ss') as Entrada, Format(salida, 'hh:mm:ss') as Salida FROM(bitacora) WHERE (((fecha)=#03/04/2010#)) Order by id DESC ;"
'creamos un comando
Dim cmd As New OleDbCommand(sql, cn)
Dim dr As OleDbDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
Do While dr.Read()
NuevaLinea = dr.Item("usuario").ToString & vbTab & dr.Item("Entrada").ToString & vbTab & dr.Item("Salida").ToString & vbTab & "Total"
Bitacora.WriteLine(NuevaLinea)
' limpiamos el buffer y escribimos los datos contenidos al stream
Bitacora.Flush()
Loop
NuevaLinea = vbCrLf & "********************* ***** " & vbCrLf
Bitacora.WriteLine(NuevaLinea)
Bitacora.Flush()
Bitacora.Close() ' no olvides cerrar el archivo
dr.Close()
Catch ex As Exception
'mostramos el error
If Err.Number = 91 Or Err.Number = 5 Then
'MessageBox.Show("No se encontro registro")
Err.Clear()
Else
MessageBox.Show("error " & Err.Number.ToString & vbCrLf & ex.Message)
End If
'Finally
End Try
End Sub

Clausula LIMIT en Access, SQL, MySQL y ORACLE

Mr. FotoPex — Mon, 08 Mar 2010 18:53:38 +0000

Para limitar el número de registros que debe devolver una consulta podemos utilizar:

Para Access y MS SQL utilizaremos TOP n de esa forma obtendremos los n primeros resultados de la búsqueda, y si nos interesa son los n últimos, utilizaremos la cláusula ORDER BY

Texto Plano

SQL:

SELECT TOP n ... FROM ...
WHERE ...
ORDER BY...

Para MySQL utilizaremos LIMIT n , que ademas permite el compaginado agregando al final de un SELECTla clausula "LIMIT".
MySQL - LIMIT n

Texto Plano

MySQL:

SELECT ... FROM ...
WHERE ...
LIMIT n, n

Para ver cinco registros a partir del registro 10:

Texto Plano

SQL:

SELECT * FROM tabla LIMIT 10,5

ORACLE genera una variable, tal y como si fuera un campo más de cada registro de la tabla, llamada “rownum”, la cual se incrementa por cada registro que vamos recuperando. De esta manera, sólo tenemos que acceder a esta variable y controlar que no sobrepasa el número que nos hemos propuesto como límite.

Texto Plano

ORACLE8:

SELECT campos
FROM TABLE
WHERE condicion
AND ROWNUM <= 2

Activar Windows 7 actualizado

Mr. FotoPex — Wed, 03 Mar 2010 16:54:29 +0000

La actualización de Windows 7 kb971033 que elimina la mayoría de los métodos de activación del sistema operativo, ya tiene una solución, y mucho que tienen Windows 7 pirata lo han probado.

Enlace Protégete del WAT (Windows Activation Technologies).

Crea un Emoticon Animado Fácilmente

Mr. FotoPex — Tue, 02 Mar 2010 15:22:47 +0000

Un emoticono es una secuencia de caracteres ASCII que, en un principio, representaba una cara humana y expresaba una emoción. Pero, posteriormente, fueron creándose otros emoticonos con significados muy diversos. Los emoticonos que expresan alegría u otras emociones positivas se clasifican normalmente como smileys (de smile, «sonrisa» en inglés). Los emoticonos se emplean frecuentemente en mensajes de correo electrónico, en foros, SMS y en los chats mediante servicios de mensajería instantánea. Si se gira a la derecha el emoticono se obtiene una cara. Una cara sonriente derivada del emoticono (smiley).

Los emoticonos se han ido desarrollando a lo largo de los años, principalmente, para imitar las expresiones faciales y las emociones, para vencer las limitaciones de tener que comunicarse sólo en forma de texto y porque sirven como abreviaturas. Se han escrito libros sobre este tema, con listas interminables de emoticonos.

En los foros de Internet, los emoticonos se suelen reemplazar automáticamente por las imágenes correspondientes. En algunos editores de texto (como por ejemplo Microsoft Word), la opción de «corrección automática» reconoce emoticonos básicos como y , cambiándolos por el carácter correspondiente.

Para esos amigos que les gusta ver su conversación en el mensajero repleto de emoticonos en el blog de Softonic te muestran cómo crear un emoticon animado en 10 pasos

Elimina referencias a la version de WordPress

Mr. FotoPex — Tue, 02 Mar 2010 14:43:06 +0000

Una solución muy limpia, segura y efectiva es añadir el siguiente código al fichero functions.php de tu tema activo:

Texto Plano

PHP:

function quitar_version_wp() {
return '';
}
add_filter('the_generator', 'quitar_version_wp');

De este modo el número de versión de WordPress no se mostrará en ninguna parte de blog.

SHA-1 Con VB.NET 2008

Mr. FotoPex — Tue, 02 Mar 2010 01:50:18 +0000

Necesitamos :

1 caja de texto TextBox1
1 botón Button1
1 etiqueta para el mensaje lblMsg

Ya sabes que puedes bajarte los archivos sha1 con vb.net

Texto Plano

VB.NET:

Imports System.Security.Cryptography
Imports System.Text
Public Class Form1
Private Function generarClaveSHA1(ByVal nombre As String) As String
Dim enc As New UTF8Encoding
Dim data() As Byte = enc.GetBytes(nombre)
Dim result() As Byte
Dim sha As New SHA1CryptoServiceProvider()
result = sha.ComputeHash(data)
Dim sb As New StringBuilder
For i As Integer = 0 To result.Length - 1
If result(i) <16 Then
sb.Append("0")
End If
sb.Append(result(i).ToString("x"))
Next
Return sb.ToString.ToUpper
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.lblMsg.Text = generarClaveSHA1(Me.TextBox1.Text)
End Sub
End Class