Saturday, March 22, 2008

The Maha Mrityunjaya Mantra

The Maha Mrityunjaya Mantra


Om Tryamlakam Yajamahe
Sugandhim Pusti - vardhanam |
Urva - rukamiva Bandhanan
Mrtyor - muksheeya Ma - amritat ||

Meaning:
Om. We worship The Three-Eyed Lord Shiva who is fragrant and who increasingly nourishes the devotees. Worshipping him may we be liberated from death for the sake of immortality just as the ripe cucumber easily separates itself from the binding stalk.

Explanation:
The mantra is a prayer to Lord Shiva who is addressed as Sankara and Trayambaka. Sankara is sana (blessings) and Kara (the Giver). Trayambaka is the three eyed one (where the third eye signifies the giver of knowledge, which destroys ignorance and releases us from the cycle of death and rebirth).

Best Time to Chant
Chanting the Maha Mrityunjaya Mantra with sincerity, faith and devotion in Bramha Muhurata is very beneficial. But one can also do Maha Mrityunjaya japa anytime in a pure environment with great benefit and discover the happiness that's already within.

Wednesday, January 23, 2008

break

Sub PasswordBreaker()
'Author unknown
'Breaks worksheet password protection.
Dim counter As Long, startTimer As Long
startTimer = Timer
counter = 0
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)
counter = counter + 1
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) & _
vbCrLf & "Found in " & counter & " tries," & _
vbCrLf & "taking " & (Timer - startTimer) & " sec."
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub


Sub PasswordBreaker()
'Author unknown
'Breaks worksheet password protection.
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)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub