You should get to Now

I recently stumbled across this amazing GIVE-AWAY running for 3 days only!!! 15 FREEBIES for anyone who is interested!!

You should get to {http://www.freemailinglistbuilding.com} NOW!

Safco Multi Purpose Book Shelves

Great Design of Safco Multi Purpose Book Shelves. You can buy this for decorate your drawing rooms or your office. It is contemporarily designed for office and home use & adjusted in small space. Some times you can setup this in your Office Desk or wall hang.
Below the sort specification of Safco Multi Purpose Book Shelves.
All steel construction
Desktop or wall-mounted
Great for organizing all those piles of books
Available in single or double tier


For More Click Here

UK Visa Form- VAFs

UK VISA APPLICATION FORM

Windows XP Tips

How to Create a Bootable Windows XP Setup CD/DVD on a Preinstalled Windows System

Broke any password in Excel

Break Excel sheet Protection
When you are facing any excel sheets are protected with password or you protect that sheet with password long time ago and you forgot that password, then you can use these below code to break the password. Just Right click on sheet tab and click View Code. Microsoft Visual basic editor will open. Paste these code and Click Run. A popup window will come with your password. That's it.



Sub BreakPass()
Dim i as Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126

ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub


Collected!!!