Comment vivre dans ce monde de GeeK
Pour supprimer les révisions d'articles sous WordPress, il faut ouvrir le fichier wp-config.php puis ajouter la ligne suivante:
define('WP_POST_REVISIONS', false );
Et voilà vous venez de désactiver la révision d'articles sous WordPress…
Read more
2 mois après sa sortie officielle, une nouvelle mouture du logiciel de supervision NetSysInfo est disponible.
Cette version 1.7 de NetSysInfo apporte la correction de bugs mineurs et l'ajout de nouvelles fonctionnalités tels que l'optimisation des ressources utilisées, l'ajout du filtrage par adresse IP et l'ajout de statistiques sous forme de graphiques pour la CPU, la mémoire, l'utilisation des disques durs et l'utilisation réseau.
Les graphiques générés sont disponibles sous plusieurs aggrégations temporelles: 1 minute, 5 minutes, 15 minutes, 30 minutes, 1 heure.…
Read more
Aujourd'hui j'ai dû générer des mots de passe en MD5 sous mon serveur Ubuntu.
Pour celà, j'ai utilisé une petite commande sympathique:
echo -n monpass | md5sum
Ce qui retournera:
a936465247b1be65cc02997f74b5a971 -
Comme vous le voyez c'est super simple de générer des MD5 sous Linux 🙂…
Read more
Voila une petite classe qui permet de compresser et décompresser en utilisant un stream GZIP:
Imports System.IO
Imports System.IO.Compression
Imports System.Text
Public Class GZipper
'Fonction qui zip une chaine de caractères
Public Shared Function Zip(ByVal value As String) As StringBuilder
'On transforme la chaine en tableau de byte
Dim byteArray(value.Length - 1) As Byte
Dim i As Integer = 0
For Each item As Char In value.ToCharArray()
byteArray(i) = CByte(AscW(item))
i += 1
Next
'On prepare pour la compression
Dim ms As New System.IO.MemoryStream()
Dim sw As New System.IO.Compression.GZipStream(ms, System.IO.Compression.CompressionMode.Compress)
'On compresse
sw.Write(byteArray, 0, byteArray.Length)
sw.Close()
'On convertit le tableau de bytes en string
byteArray = ms.ToArray()
Dim sB As New System.Text.StringBuilder(byteArray.Length)
For Each item As Byte In byteArray
sB.Append(ChrW(item))
Next
ms.Close()
sw.Dispose()
ms.Dispose()
Return sB
End Function
Public Shared Function UnZip(value As String) As StringBuilder
'On transforme la chaine en tableau de bytes
Dim byteArray(value.Length - 1) As Byte
Dim i As Integer = 0
For Each item As Char In value.ToCharArray()
byteArray(i) = CByte(AscW(item))
i += 1
Next
'On prepare la decompression
Dim ms As New System.IO.MemoryStream(byteArray)
Dim sr As New System.IO.Compression.GZipStream(ms, System.IO.Compression.CompressionMode.Decompress)
byteArray = New Byte(byteArray.Length - 1) {}
'On decompresse
Dim rByte As Integer = sr.Read(byteArray, 0, byteArray.Length)
'On convertit le tableau de bytes en string
Dim sB As New System.Text.StringBuilder(rByte)
For i = 0 To rByte - 1
sB.Append(ChrW(byteArray(i)))
Next
sr.Close()
ms.Close()
sr.Dispose()
ms.Dispose()
Return sB
End Function
End Class
… Read more
Aujourd'hui j'ai été amené à compresser du JSON en PHP afin de gagner de la bande passante sur mon serveur Web.
Pour cela, il suffit d'ajouter une compression GZIP dans votre code PHP afin de compresser automatiquement votre JSON.
Voici le code, vous verrez c'est tout simple:
//On recupere les données
$data = get_data();
//On active le buffer de sortie via gzhandler
ob_start('ob_gzhandler');
//On envoie le résultat normalement
echo json_encode($data);
Sans compression GZIP j'avais le header HTTP suivant:
Content-Length 500800 Content-Type application/json
Et avec la compression j'obtiens cela:
Content-Encoding gzip Vary Accept-Encoding Content-Length 15922 Content-Type application/json
C'est donc super performant, d'autant plus que la majorité des navigateurs supporte la compression GZIP nativement 🙂…
Read more
Aujourd'hui j'ai besoin de me connecter à une base de données MySQL en Vb.Net afin de récupérer et sauver des données.
Tout d'abord, il faut télécharger le connecteur .Net disponible sur le site de MySQL.
Ensuite, dans votre projet il faut ajouter une référence à MySql.Data.
Puis faire un import de la librairie: Imports MySql.Data.MySqlClient
Vous pouvez ensuite utiliser une fonction telle que la suivante pour requêter votre base de données MySQL:
Public Sub Test()
Dim connStr As String = "SERVER=localhost;DATABASE=xflows;UID=root;PASSWORD="
Dim connection As New MySqlConnection(connStr)
Dim command As MySqlCommand = connection.CreateCommand()
Dim reader As MySqlDataReader
command.CommandText = "select * from table"
connection.Open()
reader = command.ExecuteReader()
While reader.Read()
Dim row As String = vbNullString
For i As Integer = 0 To reader.FieldCount - 1
Debug.WriteLine(reader.GetValue(i).ToString())
Next
End While
connection.Close()
End Sub
… Read more