dimanche 17 août 2014

[AdwCleaner] : Outil de nettoyage gratuit




Hello au peu de monde qui visite mon blog :-p , 

Ça fait vraiment longtemps que je n'ai posté , je viens aujourd'hui pour vous suggérer un outil puissant qui permet le nettoyage de votre machine , les principales tâches sont : 
  • Supprimer les moteurs de recherche crées sur vos différents navigateurs web ( chrome ..ect ) lors d'installation de logiciel .
  • Supprimer les logiciels malveillants ( plug-in par exemple ) .
  • Nettoyer le registre en supprimant les clés suspectes .

Il est gratuit , sans installation préalable et simple d'utilisation , ci-joint le lien de téléchargement :
https://toolslib.net/downloads/viewd.../1-adwcleaner/

Testé et approuvé par moi  .

@ +

mardi 28 février 2012

[Part-2 ] : Travailler avec VBA sous Excel



Je vous fais part de la suite de mes tutoriels sur VBA , cette fois ci , on travaillera sur la mise en place d'un programme qui applique le théorème de THALES , le célèbre théorème qu'on a appliqué durant nos études au collège :p . Pour ce faire , on doit déjà connaître le théorème :p , et après c'est facile de l'appliquer . Je peux vous dire que ça vous servira dans vos applications , par exemple dans cet article , le but est de déterminer la distance (x) (Fig.1) donc, notre fabuleux théorème nous aidera dans cette tâche fastidieuse .. :p :D . En déterminant la distance (X) et en additionnant le point (C) , on aura le point d'intersection entre les deux droites . :D

Pour commencer , je vous joins le petit schéma (Fig.1) , qui nous servira de base pour la programmation .




Après une analyse intensive du schéma :p , on doit :

  • Faire un tri des données où on doit déterminer le premier point négatif et le dernier point positif ;
  • Déterminer la correspondance de ces points en ordonnée.
Maintenant , on doit appliquer cette théorie  :p .

Il faut saisir vos données dans le tableur EXCEL , et après avoir renseigné  le nombre de données ( = nombre de ligne :p ) . On applique la procédure ! .

Sub deterX()
Dim n As Integer
'Le nombre de données ( lignes )
n = Cells(1, 3)
For i = 1 To n
'Lorsqu'on trouve le premier point négatif on sort de la boucle .
If Cells(i, 1) < 0 Then
Cells(5, 5) = Cells(i, 1) ' le dernier point négatif ( )
Cells(5, 6) = Cells(i - 1, 1) ' le dernier point positif (A)
Cells(5, 7) = Cells(i, 2) ' la correspondance du point négatif
Cells(5, 8) = Cells(i - 1, 2) ' la correspondance du point positif
' la distance x : théorème de Thalès
X = (E - C) * ((A - C) / (C - B))
'Détermination du point D , intersection entre les deux courbes
D = X + C
Exit Sub ' dehors :D
End If
Next i
End Sub

J'ai oublié de vous dire un truc  , j'ai rédigé cet article il y a un an et j'ai oublié de le publier ( pourquoi ? , I don't know ) donc ,s'il y a des erreurs dans mon code , j'aimerais bien avoir des retours  :) .

à bientôt pour de nouvelles aventures :) .

 Islem M .





mercredi 5 octobre 2011

Où es-tu ?

Aie Aie Aie ! J’espère que vous avez passé une bonne année , pour ma part c’était une année très chargée et je viens de la finir , d'où mon absence totale de la circulation depuis le mois de décembre dernier " Waw ! je n'arrive pas à y croire , le temps passe très vite ! " . Cependant , je vais essayer de réanimer le Blog avec des nouvelles publications passionnantes . J'ai mis a votre droite un petit logo de Skype qui vous permettra de prendre contacte avec moi et d’échanger des idées , donner des suggestions pour améliorer le Blog , poser des questions ... etc .

Toutefois , vous trouverez les anciens tutoriels vidéos en cliquant sur le menu qui se trouve en bas , à droite de la page .

Je vous remercie !

Islem M

dimanche 12 décembre 2010

[ Part-1] Travailler avec VBA sous Excel



Bonjour tout le monde ,après une longue période d'absence , je reviens avec un nouveau projet mais cette fois ci sur Excel et VBA (Visual Basic for Application ) . Je vais essayer de vous faire un petit programme simple pour comprendre la logique de programmation et lier les cellules de la feuille de calcul au code VBA , vous allez donc programmer des "Macro" ( ce sont des fonctions que vous programmez au préalable a l'aide du code Visual Basic ). Si vous avez lu l'article précédent sur le "Alarme : Gestionnaire d'évènements version 2 " où on a crée un code a partir de l'environnement visual basic 6 et on a importé et exporté les données de Excel vers VB et réciproquement donc là , le but c'est de travailler tout le code sous Excel . Vous allez me demander quelle est la différence entre ces deux méthodes ?.
La première chose a savoir c'est que le code sera intégrer dans la feuille de calcul Excel alors que lorsqu'on programme avec VB et exporté ou importé les données , ça sera séparé c'est à dire , on a la feuille excel qui sert de base de données et le code sera dans l'exécutable qui est crée avec VB .
C'est vrai que vous pouvez intégrer les formules dans la feuille de calcul directement , mais si vous voulez faire un programme avancé ( Modérément !! ) vous devez travailler avec VBA .
La première procédure a connaitre c'est comment intégrer les données dans les cellules , suivez ces étapes :
N.B : je travaille avec Excel 2007 .
  1. Lancez Excel et faite ( Alt + F11 ) pour lancer le VBA .
  2. Créez un module en cliquant avec le bouton droit de la souris sur la fenêtre "project" ( qui se trouve a votre gauche ) , choisissez "insertion > Module "
  3. Maintenant , on écrit ce code :
Sub remplissage ()
If Cells(1,1) = "" Then ' Vérifie si la cellule (1,1) est rempli .
MsgBox "Veuillez entrer le Nombre d'année" , vbinformation,"Message"
End If
N = Cells(1,1)
For x = 1 To N ' le boucle sert a répéter l'instruction N fois "
Cells(2, x + 2) = "Année" & x 'Affiche dans la ligne 2 , x+1 colonne , le numéro de l'année
Next x
End sub
Avant de lancer le macro , assurez vous bien que vous avez inséré le nombre d'année dans la cellule (1,A) .
Ensuite , allez sur la feuille où vous avez insérer le nombre d'année , et cliquez sur l'onglet affichage , et choisissez "Macro " => remplissage . Vous obtenez une ligne de N colonne .
Par exemple : N= 3
vous aurez : Année 1 Année 2 Année 3 .

Cet article est une introduction seulement , donc je vais essayer de faire des petits code amusant et intéressant : p .

A +

mardi 5 octobre 2010

[Transition] : De retour avec d'autres idées

Bonjour a vous ,

Je suppose que vous vous dites que j'ai arrêté le Blogging !!! , je vous rassure , je suis de retour dans quelques semaines ou quelques jours avec d'autres idées et d'autres projets .
Mais comme j'ai changé de pays alors vous en douter que ça ma pris beaucoup de temps ( démarches administratives) , du coup je n'avais plus le temps de poster sur mon blog .

Alors @ bientôt .

Islem

jeudi 14 janvier 2010

Alarme : Gestionnaire d'évènements version 2 :p


Sur mon dernier article , je vous ai dit que cette application est très basique et elle peut être largement améliorée.
ça reste une version très simple , et qui pourra être largement améliorée :) , par l'ajout d'un historique d’événements ,amélioration graphique ...ect .
a déclaré Islem dans son précèdent article ... lol

Du coup , j'ai essayé de modifier vu que je n'ai rien trouvé à faire ces derniers jours :p , donc je vais tout simplement parler des modifications . La plus importante c'est l'historique des événements , bof ! c'était une chose facile à faire , j'ai voulu vous laisser essayer ( et moi aussi j'ai essayé vu que je ne savais pas le faire :) ) et maintenant je dévoile la solution :) :p qui n'a rien de spécial .
Bon, j'ai rajouté une autre fenêtre qui gère les tâches , j'ai modifié l'instruction conditionnelle "if " en ajoutant la comparaison avec la date , donc vous avez une comparaison date et heure , ce qui veut dire que vous pourriez gérer vos tâches du mois ou de l'année .. :p :D
La procédure du Timer n'a pas trop changée

Private Sub Timer1_Timer()
On Error Resume Next
Label1 = Time
Label7 = Date
For i = 0 To 10
If Label1 = time1(i) And Label7 = date1(i) Then
mp.FileName = App.Path & "\newemail.wav"
MsgBox "Votre tache : " & tache(i)
End If
Next i
End Sub
Et voila , la procédure du bouton "Créer des événements" , le code important seulement .
Private Sub Command1_Click()
On Error Resume Next
For i = 0 To 10
tache(i) = Text1(i)
date1(i) = Text5(i)
time1(i) = Text2(i) & ":" & Text3(i) & ":" & Text4(i)
Next i
For i = 0 To 10
If Text1(i) <> "" Then
Actioninscrire = Inscrire(App.Path & "\Event", Text1(i), i + 1, 1)
If Text2(i) <> "" And Text3(i) <> "" And Text4(i) <> "" Then
Actioninscrire = Inscrire(App.Path & "\Event", Text2(i), i + 1, 2)
Actioninscrire = Inscrire(App.Path & "\Event", Text3(i), i + 1, 3)
Actioninscrire = Inscrire(App.Path & "\Event", Text4(i), i + 1, 4)
List1.AddItem date1(i)
If Text5(i) <> "" Then
Actioninscrire = Inscrire(App.Path & "\Event", Text5(i), i + 1, 5)
End If
End If
End If
Next i
Label2 = List1.ListCount
Actioninscrire = Inscrire(App.Path & "\Event", Label2, 12, 6)
Unload Me
End Sub
La sauvegarde des données se fait dans un fichier Excel ( c'est mon premier essai ) . L'inconvénient de ce concept c'est la lourdeur de l'application lorsqu'elle charge les données enregistrées mais j'ai pu gérer ça en intégrant un compteur " je l'appel compteur de chargement :p" d'où cette ligne de commande "Label2 = List1.ListCount".
Voici la nouvelle version téléchargement ici , s'il y aura d'autres modifications , je mettrai a jour le lien : )

@Bientot
M.Islem




lundi 21 décembre 2009

Alarme : Gestionnaire d'évènements


Oh ! Je sais que ça fait longtemps que je n’ai pas écrit d’article sur mon blog, là je suis de retour après deux mois d'absence .Eh ! oui , je reviens avec un nouveau petit projet, c’est un gestionnaire d’événements, genre une alarme ou bien un agenda  si vous voulez :-) .

Le principe est simple, vous programmez les tâches que vous voulez faire pendant votre journée , vous introduisez « Votre tâche » et l’heure où vous devez effectuer cette événement et à partir de là vous aurez une journée organisée…. :p . Je pense que ça existe dans les téléphones portables :) , mais bon ça sert toujours à quelque chose ce genre d'application , surtout du coté programmation .
Au fait, j'ai fait deux programmes , mais je mettrais en évidence le code du deuxième vu qu'il est plus réussi que le premier ( c'est mon avis ) algorithme qui était un petit peu complexe .
Bon voici la procédure d'ajout des événements

On Error Resume Next
For i = 0 To 10
msg(i) = Text1(i)
time1(i) = Text2(i) & ":" & Text3(i) & ":" & Text4(i)
If msg(i) <> "" Then
List1.AddItem time1(i) & " -> " & msg(i)
Text1(i) = ""
Label2 = List1.ListCount
End If
Next i
On a déclaré deux tableaux en public dans un module , le premier sert à enregistrer la tâche et le second sert à enregistrer l'heure . On peut ajouter autant de tâche qu'on veut dans notre listbox .
Pour déclencher notre Alarme , on a tout simplement ajouté un " Timer " dont la procédure est comme suite:
On Error Resume Next
Label1 = Time
If Label2 = 0 Then
Exit Sub
Else
For i = 0 To List1.ListCount
If Label1 = time1(i) Then
mp.FileName = App.Path & "\newemail.wav"
MsgBox "Votre tache : " & msg(i)
End If
Next i
End If
Grâce à la boucle "for .. to ... next " , on parcourt notre liste des tâches .  Un signal sonore a été rajouté .
Toutefois , vous pouvez télécharger et tester cette application en cliquant ici .  C'est une version très simple , et qui pourra être largement améliorée :) , par l'ajout d'un historique d’événements ,amélioration graphique ...ect .
J'ai ajouté quelques trucs que j'ai pas mis sur le blog , vous allez le constater en testant l'application :) .

Si vous avez n'importe qu'elle question n'hésitez surtout pas à me contacter par mail ( vous trouverez mon mail sur mon profil ) :) je serai ravi de vous répondre ;)
N'hésitez pas à me faire part de vos impressions.
@ Bientôt

M.Islem

samedi 26 septembre 2009

Mot de passe du BIOS oublié



Le But de ce petit article c'est de vous montrer comment faire pour la réinitialisation du BIOS (Basic Input Ouput System ) a fin qu'il perde toute trace de mot de passe .
Il existe plusieurs méthodes pour y remédier : Méthodes matérielles et méthodes logicielles , dans cet article , je vais vous montrer une des méthodes matérielles que j'ai testé :-p .
Pourquoi j'ai utilisé une méthode matérielle et pas une méthode logicielle ?
C'est simple , j'avais une machine vraiment infecter de virus , j'avais même pas le droit d'ouvrir un fichier ( doc ,pdf , exe ... ect ) , et même mon antivirus se désactivais tout seul donc , j'ai voulu appliquer un formatage directe afin de désinfecter toute ma machine et j'ai oublié le mot de passe du BIOS :-s .
Cette manœuvre se base essentiellement sur le déplacement du cavalier , qui est rien d'autre qu'une fiche se trouvant sur la carte de mère à proximité de la pile ( la pile sert à régler l'horloge interne de votre ordinateur ) .
Procédure :
  1. Éteigniez et débranchez votre PC ;
  2. Ouvrez le boitier de votre ordinateur , déchargez vous de l'électricité statique ( en touchant une partie métallique de votre unité centrale ) ;
  3. Consultez la documentation de votre carte mère afin de localiser le CAVALIER , si vous n'avez pas de documentation , cherchez sur votre carte mère les inscriptions suivant : CRL BIOS , CLEAR BIOS ,CRL CMOS ,CLEAR CMOS , RESET BIOS ou RESET CMOS . L'image ci dessous illustre le positionnement du cavalier .
  4. Après avoir repérer le cavalier , faites cette manipulation :
- Si le cavalier se trouve sur un connecteur à 3 pins , placez le sur le pin du milieu et le pin non recouvert initialement , patientez une seconde puis remettez le cavalier a sa position d'origine .
- Si le cavalier se trouve sur un connecteur à 2 pins et qu'il n'est branché que sur un seul pin , placez le sur les deux , patientez une seconde puis remettez le a sa position initiale.
5 . Rebranchez le tout et démarrez votre PC , le mot de passe a disparu :-) .

Note : cette procédure est applicable pour les ordinateurs de bureau .

Votez ( Répondre au sondage ) et laissez des commentaires . Merci :-D

M.Islem